Maksimov and Kolovsky, Equation (4)

Time bar (total: 13.2s)

analyze0.0ms (0%)

Memory
1.1MiB live, 1.1MiB 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.8s (13.4%)

Memory
13.5MiB live, 3 502.6MiB allocated
Samples
720.0ms1 859×1valid
719.0ms6 397×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.2s
ival-exp: 427.0ms (36.2% of total)
ival-cos: 316.0ms (26.8% of total)
ival-mult: 133.0ms (11.3% of total)
ival-add: 73.0ms (6.2% of total)
ival-sub: 69.0ms (5.8% of total)
ival-div: 57.0ms (4.8% of total)
ival-neg: 45.0ms (3.8% of total)
adjust: 43.0ms (3.6% of total)
ival-true: 7.0ms (0.6% of total)
exact: 6.0ms (0.5% of total)
ival-assert: 3.0ms (0.3% of total)
Bogosity

preprocess112.0ms (0.8%)

Memory
14.8MiB live, 136.3MiB allocated
Algorithm
egg-herbie
Rules
1 266×times-frac
1 252×lower-fma.f64
1 252×lower-fma.f32
1 150×unsub-neg
770×distribute-lft-in
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 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
Symmetry

(abs K)

explain282.0ms (2.1%)

Memory
9.6MiB live, 392.5MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1320-2(4.983061727118756e-172 0.015658582794384215 8.525385727338718e+93 6.8185143410091216e+187)(-.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))))
0120(3.2024539534191483e+158 1.0332881345322101e-125 8.435984662566469e+270 3.5383494523942116e+40)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)))sensitivity1200
-.f64(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))cancellation411
Confusion
Predicted +Predicted -
+400
-95121
Precision
0.2962962962962963
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+4000
-950121
Precision?
0.2962962962962963
Recall?
1.0
Freqs
test
numberfreq
0121
1109
226
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
65.0ms178×1valid
46.0ms68×2valid
41.0ms266×0valid
Compiler

Compiled 164 to 60 computations (63.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 106.0ms
ival-exp: 52.0ms (49% of total)
ival-mult: 16.0ms (15.1% of total)
ival-cos: 15.0ms (14.1% of total)
adjust: 7.0ms (6.6% of total)
ival-sub: 4.0ms (3.8% of total)
ival-div: 4.0ms (3.8% of total)
ival-add: 4.0ms (3.8% of total)
ival-neg: 2.0ms (1.9% of total)
ival-true: 1.0ms (0.9% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

eval0.0ms (0%)

Memory
0.3MiB live, 0.3MiB allocated
Compiler

Compiled 4 to 4 computations (0% saved)

prune1.0ms (0%)

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

Compiled 19 to 14 computations (26.3% saved)

simplify75.0ms (0.6%)

Memory
24.1MiB live, 60.7MiB 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)
Rules
1 252×lower-fma.f64
1 252×lower-fma.f32
564×lower-*.f32
560×lower-*.f64
270×distribute-lft-in
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 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J (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 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J (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

localize111.0ms (0.8%)

Memory
-73.7MiB live, 176.0MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy100.0%
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
accuracy100.0%
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
accuracy99.9%
(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
accuracy53.5%
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
Samples
34.0ms89×1valid
20.0ms34×2valid
15.0ms133×0valid
Compiler

Compiled 63 to 16 computations (74.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 50.0ms
ival-exp: 24.0ms (48.2% of total)
ival-cos: 8.0ms (16.1% of total)
ival-mult: 6.0ms (12.1% of total)
ival-sub: 4.0ms (8% of total)
adjust: 3.0ms (6% of total)
ival-div: 2.0ms (4% of total)
ival-add: 2.0ms (4% of total)
ival-neg: 1.0ms (2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series15.0ms (0.1%)

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

30 calls:

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

simplify459.0ms (3.5%)

Memory
33.4MiB live, 579.2MiB allocated
Algorithm
egg-herbie
Rules
15 664×lower-fma.f64
15 664×lower-fma.f32
5 762×lower-+.f64
5 762×lower-+.f32
4 998×lower-*.f64
Iterations

Useful iterations: 0 (0.0ms)

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

rewrite325.0ms (2.5%)

Memory
18.6MiB live, 251.2MiB allocated
Algorithm
batch-egg-rewrite
Rules
4 096×lower-fma.f64
4 096×lower-fma.f32
3 120×lower-*.f32
3 116×lower-*.f64
1 830×lower-/.f32
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 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) U)
(+.f64 U (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))))
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (-.f64 U (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))))
(fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) U)
(fma.f64 J (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) J) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))))
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) U)
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (/.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64))))))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))))
(fma.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) U)
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) U)
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (sinh.f64 l)) J) U)
(fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) U)
(fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (pow.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal 2 binary64))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))))
(fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))))
(fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) U)
(fma.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))))
(fma.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) U)
(fma.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) U)
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(fma.f64 (*.f64 J J) (/.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))))
(fma.f64 (pow.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal 2 binary64)) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))))
(fma.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (sinh.f64 l)) U)
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) J)) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))))
(fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64))))))) (/.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (pow.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal 2 binary64))) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 J (sinh.f64 l)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J #s(literal 2 binary64))) (sinh.f64 l) U)
(fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (sinh.f64 l) U)
(fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (sinh.f64 l)) #s(literal 2 binary64) U)
(fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) U)
(fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)) U)
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U))) (fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (*.f64 U (*.f64 U U)))) (fma.f64 U (fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))))
(neg.f64 (/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (*.f64 U U)))))
(neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U)) (neg.f64 (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (*.f64 U U))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 U (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (*.f64 U U)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U)) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))
(/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (*.f64 U U))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))))
(/.f64 (fma.f64 (*.f64 U (*.f64 U U)) (*.f64 (*.f64 U (*.f64 U U)) (*.f64 U (*.f64 U U))) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 9 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (*.f64 U U)) (fma.f64 (*.f64 U (*.f64 U U)) (-.f64 (*.f64 U (*.f64 U U)) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 6 binary64)))))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 U (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 6 binary64)) (*.f64 (*.f64 U (*.f64 U U)) (*.f64 U (*.f64 U U)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (*.f64 U U)) (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (*.f64 U (*.f64 U U)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 6 binary64)) (*.f64 (*.f64 U (*.f64 U U)) (*.f64 U (*.f64 U U)))) (*.f64 (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (fma.f64 (*.f64 U U) (fma.f64 U U (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 (*.f64 U U) (*.f64 U U))) (*.f64 (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (fma.f64 U U (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (*.f64 (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))))
(/.f64 (*.f64 (fma.f64 (*.f64 U (*.f64 U U)) (*.f64 (*.f64 U (*.f64 U U)) (*.f64 U (*.f64 U U))) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 9 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 U (*.f64 U U)) (-.f64 (*.f64 U (*.f64 U U)) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 6 binary64))) (fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (*.f64 U U))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 6 binary64)) (*.f64 (*.f64 U (*.f64 U U)) (*.f64 U (*.f64 U U)))) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (*.f64 U (*.f64 U U))) (fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (*.f64 U U))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 6 binary64)) (*.f64 (*.f64 U (*.f64 U U)) (*.f64 U (*.f64 U U)))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 U U) (fma.f64 U U (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 4 binary64))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 (*.f64 U U) (*.f64 U U))) #s(literal 1 binary64)) (*.f64 (fma.f64 U U (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (*.f64 U U)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U)))) (neg.f64 (neg.f64 (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 U (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (/.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (fma.f64 (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (/.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))) (*.f64 (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))))) (+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))))
(/.f64 (*.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 1 binary64)) (fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (*.f64 U U)))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U)) #s(literal 1 binary64)) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))
(/.f64 (*.f64 (fma.f64 (*.f64 U (*.f64 U U)) (*.f64 (*.f64 U (*.f64 U U)) (*.f64 U (*.f64 U U))) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 9 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (*.f64 U U)))) (fma.f64 (*.f64 U (*.f64 U U)) (-.f64 (*.f64 U (*.f64 U U)) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 6 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 6 binary64)) (*.f64 (*.f64 U (*.f64 U U)) (*.f64 U (*.f64 U U)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (*.f64 U U)))) (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (*.f64 U (*.f64 U U))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 6 binary64)) (*.f64 (*.f64 U (*.f64 U U)) (*.f64 U (*.f64 U U)))) (/.f64 #s(literal 1 binary64) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))) (fma.f64 (*.f64 U U) (fma.f64 U U (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 4 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 (*.f64 U U) (*.f64 U U))) (/.f64 #s(literal 1 binary64) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))) (fma.f64 U U (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)) #s(literal -1 binary64))
(*.f64 (fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (*.f64 (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (/.f64 #s(literal 1 binary64) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))))
(*.f64 (fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (/.f64 (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))))
(*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U))
(*.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (*.f64 U U))))
(*.f64 (fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (*.f64 U U)) (*.f64 (fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (*.f64 U U)))))
(*.f64 (fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (*.f64 U U)) (/.f64 (fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (*.f64 U U))))
(*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U)) (/.f64 #s(literal 1 binary64) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))))
(*.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (*.f64 U U)))))
(*.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)))))
(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U)) (*.f64 U U))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 U))) (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U)))
(*.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 U (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U))) (fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U))
(*.f64 (/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 6 binary64)) (pow.f64 (*.f64 U (-.f64 U (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 U (-.f64 U (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))) (-.f64 (*.f64 U (-.f64 U (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 4 binary64))))
(*.f64 (/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (pow.f64 (*.f64 U (-.f64 U (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U (-.f64 U (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))))))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (*.f64 U (*.f64 U U)))) (fma.f64 U (fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))))
(+.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (exp.f64 l))) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 (*.f64 (exp.f64 (neg.f64 l)) J))))
(+.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (exp.f64 l)) (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 (exp.f64 (neg.f64 l)))))
(+.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 (exp.f64 (neg.f64 l)))) (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (exp.f64 l)))
(+.f64 (*.f64 (*.f64 J (exp.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (*.f64 (exp.f64 (neg.f64 l)) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (exp.f64 l) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))))
(+.f64 (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (*.f64 (exp.f64 l) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))))
(fma.f64 (exp.f64 l) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))))
(fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (exp.f64 l)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 (*.f64 (exp.f64 (neg.f64 l)) J))))
(fma.f64 (neg.f64 (exp.f64 (neg.f64 l))) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (*.f64 (exp.f64 l) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))))
(fma.f64 (*.f64 J (exp.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (exp.f64 (neg.f64 l)) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (exp.f64 l) (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 (exp.f64 (neg.f64 l)))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 (exp.f64 (neg.f64 l))) (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (exp.f64 l)))
(/.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(/.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 J (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 (*.f64 J (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(/.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))))) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (+.f64 (neg.f64 (exp.f64 (+.f64 l l))) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 #s(literal -2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(/.f64 (*.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64))))) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 (*.f64 (+.f64 (neg.f64 (exp.f64 (+.f64 l l))) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (*.f64 #s(literal -2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64))))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64))))) J) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) J) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(*.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))
(*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (sinh.f64 l)) J))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))))
(*.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))))
(*.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))))
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J)
(*.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (sinh.f64 l)))
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 J (sinh.f64 l)))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J #s(literal 2 binary64))) (sinh.f64 l))
(*.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (sinh.f64 l))
(*.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (sinh.f64 l)) #s(literal 2 binary64))
(*.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(*.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)))
(+.f64 (*.f64 J (exp.f64 l)) (neg.f64 (*.f64 (exp.f64 (neg.f64 l)) J)))
(+.f64 (neg.f64 (*.f64 (exp.f64 (neg.f64 l)) J)) (*.f64 J (exp.f64 l)))
(fma.f64 J (exp.f64 l) (neg.f64 (*.f64 (exp.f64 (neg.f64 l)) J)))
(fma.f64 J (neg.f64 (exp.f64 (neg.f64 l))) (*.f64 J (exp.f64 l)))
(fma.f64 (exp.f64 l) J (neg.f64 (*.f64 (exp.f64 (neg.f64 l)) J)))
(fma.f64 (neg.f64 (exp.f64 (neg.f64 l))) J (*.f64 J (exp.f64 l)))
(fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 l)) J) (*.f64 J (exp.f64 l)))
(fma.f64 (*.f64 J #s(literal -1 binary64)) (exp.f64 (neg.f64 l)) (*.f64 J (exp.f64 l)))
(/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 J (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 J (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 (*.f64 J (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 (*.f64 J (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (neg.f64 (*.f64 J (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))))) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 (neg.f64 (*.f64 J (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (*.f64 #s(literal -2 binary64) (cosh.f64 l)))
(/.f64 (+.f64 (pow.f64 (*.f64 J (exp.f64 l)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (exp.f64 (neg.f64 l)) J)) #s(literal 3 binary64))) (fma.f64 (*.f64 J (exp.f64 l)) (*.f64 J (exp.f64 l)) (-.f64 (*.f64 (neg.f64 (*.f64 (exp.f64 (neg.f64 l)) J)) (neg.f64 (*.f64 (exp.f64 (neg.f64 l)) J))) (*.f64 (*.f64 J (exp.f64 l)) (neg.f64 (*.f64 (exp.f64 (neg.f64 l)) J))))))
(/.f64 (-.f64 (*.f64 (*.f64 J (exp.f64 l)) (*.f64 J (exp.f64 l))) (*.f64 (neg.f64 (*.f64 (exp.f64 (neg.f64 l)) J)) (neg.f64 (*.f64 (exp.f64 (neg.f64 l)) J)))) (-.f64 (*.f64 J (exp.f64 l)) (neg.f64 (*.f64 (exp.f64 (neg.f64 l)) J))))
(/.f64 (*.f64 J #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(/.f64 (*.f64 J (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))))) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 (*.f64 J (+.f64 (neg.f64 (exp.f64 (+.f64 l l))) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 #s(literal -2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) J) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(/.f64 (*.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64))))) J) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 (*.f64 (+.f64 (neg.f64 (exp.f64 (+.f64 l l))) (exp.f64 (-.f64 (neg.f64 l) l))) J) (*.f64 #s(literal -2 binary64) (cosh.f64 l)))
(/.f64 (/.f64 (*.f64 J (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) #s(literal 2 binary64)) (cosh.f64 l))
(*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l)))
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)
(*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))
(*.f64 (sinh.f64 l) (*.f64 J #s(literal 2 binary64)))
(*.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) J))
(*.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))) (/.f64 J (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(*.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)) J))
(*.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (/.f64 J (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))
(*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64))
(*.f64 (*.f64 J (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(*.f64 (*.f64 J (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)))
(*.f64 (/.f64 J #s(literal 2 binary64)) (/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (cosh.f64 l)))
(*.f64 (/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 2 binary64)) (/.f64 J (cosh.f64 l)))
(*.f64 (/.f64 (*.f64 J (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64))))) (+.f64 (exp.f64 (*.f64 (+.f64 l l) #s(literal 3 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 3 binary64)))) (+.f64 (exp.f64 (fma.f64 #s(literal 2 binary64) l (+.f64 l l))) (-.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 2 binary64)) (fma.f64 #s(literal 1 binary64) (exp.f64 (+.f64 l l)) #s(literal 1 binary64)))))
(*.f64 (/.f64 (*.f64 J (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64))))) (-.f64 (exp.f64 (fma.f64 #s(literal 2 binary64) l (+.f64 l l))) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 2 binary64)))) (-.f64 (expm1.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))
(*.f64 (/.f64 (*.f64 J (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))
(*.f64 (/.f64 (*.f64 J (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (+.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64))))) (+.f64 (exp.f64 (+.f64 l l)) (expm1.f64 (-.f64 (neg.f64 l) l))))
(+.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))
(+.f64 (neg.f64 (exp.f64 (neg.f64 l))) (exp.f64 l))
(+.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (neg.f64 (/.f64 (exp.f64 (*.f64 l #s(literal -3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))))
(+.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (neg.f64 (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(-.f64 #s(literal 0 binary64) (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)))
(-.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (/.f64 (exp.f64 (*.f64 l #s(literal -3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(-.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(-.f64 (+.f64 (exp.f64 l) #s(literal 0 binary64)) (exp.f64 (neg.f64 l)))
(fma.f64 (exp.f64 l) #s(literal 1 binary64) (neg.f64 (exp.f64 (neg.f64 l))))
(fma.f64 (exp.f64 l) (/.f64 (exp.f64 l) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (neg.f64 (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))
(fma.f64 (exp.f64 l) (/.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (neg.f64 (/.f64 (exp.f64 (*.f64 l #s(literal -3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))))
(fma.f64 (exp.f64 (neg.f64 l)) #s(literal -1 binary64) (exp.f64 l))
(fma.f64 #s(literal 1 binary64) (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))
(fma.f64 #s(literal 1 binary64) (neg.f64 (exp.f64 (neg.f64 l))) (exp.f64 l))
(fma.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (neg.f64 (/.f64 (exp.f64 (*.f64 l #s(literal -3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))))
(fma.f64 (exp.f64 (+.f64 l l)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)) (neg.f64 (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))
(fma.f64 (exp.f64 (+.f64 l l)) (/.f64 (exp.f64 l) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (neg.f64 (/.f64 (exp.f64 (*.f64 l #s(literal -3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))))
(fma.f64 #s(literal -1 binary64) (exp.f64 (neg.f64 l)) (exp.f64 l))
(fma.f64 (exp.f64 (*.f64 l #s(literal 3/2 binary64))) (/.f64 (exp.f64 (*.f64 l #s(literal 3/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (neg.f64 (/.f64 (exp.f64 (*.f64 l #s(literal -3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))))
(fma.f64 (/.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 (exp.f64 l) (cosh.f64 l)) (neg.f64 (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))
(fma.f64 (/.f64 (exp.f64 (+.f64 l l)) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (neg.f64 (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))
(fma.f64 (/.f64 (exp.f64 (+.f64 l l)) (+.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64))))) (+.f64 (exp.f64 (+.f64 l l)) (expm1.f64 (-.f64 (neg.f64 l) l))) (neg.f64 (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))
(fma.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 (exp.f64 (*.f64 (+.f64 l l) #s(literal 3 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 3 binary64)))) (+.f64 (exp.f64 (fma.f64 #s(literal 2 binary64) l (+.f64 l l))) (-.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 2 binary64)) (fma.f64 #s(literal 1 binary64) (exp.f64 (+.f64 l l)) #s(literal 1 binary64)))) (neg.f64 (/.f64 (exp.f64 (*.f64 l #s(literal -3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))))
(fma.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (-.f64 (exp.f64 (fma.f64 #s(literal 2 binary64) l (+.f64 l l))) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 2 binary64)))) (-.f64 (expm1.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (neg.f64 (/.f64 (exp.f64 (*.f64 l #s(literal -3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))))
(neg.f64 (/.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))))
(neg.f64 (/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 #s(literal -2 binary64) (cosh.f64 l))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(neg.f64 (/.f64 (+.f64 (neg.f64 (exp.f64 (+.f64 l l))) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal 1 binary64)))
(/.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))) (+.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (-.f64 (exp.f64 (+.f64 l l)) #s(literal -1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))))
(/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64))))) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 (+.f64 (neg.f64 (exp.f64 (+.f64 l l))) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 #s(literal -2 binary64) (cosh.f64 l)))
(/.f64 (-.f64 (exp.f64 (*.f64 (+.f64 l l) #s(literal 3 binary64))) (exp.f64 (*.f64 (-.f64 (neg.f64 l) l) #s(literal 3 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (+.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64))))))
(/.f64 (-.f64 (exp.f64 (*.f64 (+.f64 l l) #s(literal 3 binary64))) (exp.f64 (*.f64 (-.f64 (neg.f64 l) l) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (+.f64 (exp.f64 (fma.f64 #s(literal 2 binary64) l (+.f64 l l))) (+.f64 #s(literal 1 binary64) (exp.f64 (fma.f64 l #s(literal -2 binary64) (-.f64 (neg.f64 l) l)))))))
(/.f64 (-.f64 (exp.f64 (*.f64 (*.f64 l #s(literal 3 binary64)) #s(literal 3 binary64))) (exp.f64 (*.f64 (*.f64 l #s(literal -3 binary64)) #s(literal 3 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (+.f64 (exp.f64 (*.f64 (+.f64 l l) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (-.f64 (neg.f64 l) l) #s(literal 3 binary64)))))))
(/.f64 (-.f64 (exp.f64 (fma.f64 #s(literal 2 binary64) l (+.f64 l l))) (exp.f64 (fma.f64 l #s(literal -2 binary64) (-.f64 (neg.f64 l) l)))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 (-.f64 (*.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (exp.f64 (*.f64 l #s(literal -3 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 (-.f64 (*.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (-.f64 (exp.f64 (*.f64 (*.f64 l #s(literal 3 binary64)) #s(literal 3 binary64))) (exp.f64 (*.f64 (*.f64 l #s(literal -3 binary64)) #s(literal 3 binary64)))) #s(literal 1 binary64)) (*.f64 (+.f64 (exp.f64 (*.f64 (+.f64 l l) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (-.f64 (neg.f64 l) l) #s(literal 3 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 (*.f64 (-.f64 (exp.f64 (*.f64 (+.f64 l l) #s(literal 3 binary64))) (exp.f64 (*.f64 (-.f64 (neg.f64 l) l) #s(literal 3 binary64)))) #s(literal 1 binary64)) (*.f64 (+.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 (*.f64 (-.f64 (exp.f64 (*.f64 (+.f64 l l) #s(literal 3 binary64))) (exp.f64 (*.f64 (-.f64 (neg.f64 l) l) #s(literal 3 binary64)))) #s(literal 1 binary64)) (*.f64 (+.f64 (exp.f64 (fma.f64 #s(literal 2 binary64) l (+.f64 l l))) (+.f64 #s(literal 1 binary64) (exp.f64 (fma.f64 l #s(literal -2 binary64) (-.f64 (neg.f64 l) l))))) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (*.f64 (-.f64 (exp.f64 (fma.f64 #s(literal 2 binary64) l (+.f64 l l))) (exp.f64 (fma.f64 l #s(literal -2 binary64) (-.f64 (neg.f64 l) l)))) #s(literal 1 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))))
(/.f64 (neg.f64 (+.f64 (neg.f64 (exp.f64 (+.f64 l l))) (exp.f64 (-.f64 (neg.f64 l) l)))) (neg.f64 (*.f64 #s(literal -2 binary64) (cosh.f64 l))))
(/.f64 (/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 2 binary64)) (cosh.f64 l))
(/.f64 (-.f64 (pow.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (exp.f64 (*.f64 l #s(literal -3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (fma.f64 (/.f64 (exp.f64 (*.f64 l #s(literal -3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (/.f64 (exp.f64 (*.f64 l #s(literal -3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (*.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (/.f64 (exp.f64 (*.f64 l #s(literal -3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) #s(literal 3 binary64)) (pow.f64 (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) #s(literal 3 binary64))) (fma.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (fma.f64 (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (*.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))))
(/.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (exp.f64 (+.f64 l l))) (-.f64 (neg.f64 (exp.f64 (neg.f64 l))) (exp.f64 l)))
(/.f64 (-.f64 (*.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))) (*.f64 (/.f64 (exp.f64 (*.f64 l #s(literal -3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (/.f64 (exp.f64 (*.f64 l #s(literal -3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))) (+.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (/.f64 (exp.f64 (*.f64 l #s(literal -3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))) (*.f64 (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))) (fma.f64 (exp.f64 (+.f64 l l)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (exp.f64 (*.f64 (*.f64 l #s(literal 3 binary64)) #s(literal 3 binary64))) (exp.f64 (*.f64 (*.f64 l #s(literal -3 binary64)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))) (+.f64 (exp.f64 (*.f64 (+.f64 l l) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (-.f64 (neg.f64 l) l) #s(literal 3 binary64))))))
(/.f64 (*.f64 (-.f64 (exp.f64 (*.f64 (+.f64 l l) #s(literal 3 binary64))) (exp.f64 (*.f64 (-.f64 (neg.f64 l) l) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))) (+.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))))
(/.f64 (*.f64 (-.f64 (exp.f64 (*.f64 (+.f64 l l) #s(literal 3 binary64))) (exp.f64 (*.f64 (-.f64 (neg.f64 l) l) #s(literal 3 binary64)))) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l))) (+.f64 (exp.f64 (fma.f64 #s(literal 2 binary64) l (+.f64 l l))) (+.f64 #s(literal 1 binary64) (exp.f64 (fma.f64 l #s(literal -2 binary64) (-.f64 (neg.f64 l) l))))))
(/.f64 (*.f64 (-.f64 (exp.f64 (fma.f64 #s(literal 2 binary64) l (+.f64 l l))) (exp.f64 (fma.f64 l #s(literal -2 binary64) (-.f64 (neg.f64 l) l)))) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l))) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal -1 binary64))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))
(*.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))))
(*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(*.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)))
(*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l))))
(*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(*.f64 (cosh.f64 l) (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cosh.f64 l)))
(*.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))))
(*.f64 (+.f64 (neg.f64 (exp.f64 (+.f64 l l))) (exp.f64 (-.f64 (neg.f64 l) l))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (cosh.f64 l))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))
(*.f64 (/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))
(*.f64 (/.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))) (+.f64 (exp.f64 (*.f64 (+.f64 l l) #s(literal 3 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 3 binary64)))) (+.f64 (exp.f64 (fma.f64 #s(literal 2 binary64) l (+.f64 l l))) (-.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 2 binary64)) (fma.f64 #s(literal 1 binary64) (exp.f64 (+.f64 l l)) #s(literal 1 binary64)))))
(*.f64 (/.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64)))) (-.f64 (exp.f64 (fma.f64 #s(literal 2 binary64) l (+.f64 l l))) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 2 binary64)))) (-.f64 (expm1.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))
(*.f64 (/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (+.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 l #s(literal -3 binary64))))) (+.f64 (exp.f64 (+.f64 l l)) (expm1.f64 (-.f64 (neg.f64 l) l))))

eval131.0ms (1%)

Memory
4.4MiB live, 80.1MiB allocated
Compiler

Compiled 11 089 to 1 113 computations (90% saved)

prune138.0ms (1%)

Memory
-18.2MiB live, 101.5MiB allocated
Pruning

13 alts after pruning (13 fresh and 0 done)

PrunedKeptTotal
New36513378
Fresh000
Picked101
Done000
Total36613379
Accuracy
100.0%
Counts
379 → 13
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.9%
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
99.9%
(+.f64 (*.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
51.9%
(+.f64 (*.f64 (*.f64 J (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
94.3%
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
96.9%
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
87.8%
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
94.4%
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 J (*.f64 l l)) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 J #s(literal 1/3 binary64))) (*.f64 J #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
91.0%
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
86.3%
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
65.3%
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))))) U)
65.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
86.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 l (*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U))
78.0%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))
Compiler

Compiled 628 to 390 computations (37.9% saved)

simplify288.0ms (2.2%)

Memory
14.0MiB live, 259.7MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(exp.f64 l)
cost-diff0
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
cost-diff0
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))
cost-diff6400
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
cost-diff0
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64)))))
cost-diff0
(*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
cost-diff128
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
cost-diff320
(fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64)))
cost-diff0
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
cost-diff0
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))))
cost-diff0
(*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
cost-diff128
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
cost-diff0
(*.f64 #s(literal 1/2 binary64) K)
cost-diff0
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
cost-diff0
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U)
cost-diff0
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
cost-diff0
(sinh.f64 l)
cost-diff0
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
cost-diff0
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
cost-diff0
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
Rules
7 106×lower-fma.f32
7 094×lower-fma.f64
3 378×lower-*.f32
3 346×lower-*.f64
1 528×distribute-lft-in
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
054424
093422
1169422
2357417
3817397
41544397
52879397
08423388
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
#s(literal 2 binary64)
(sinh.f64 l)
l
(cos.f64 (*.f64 K #s(literal 1/2 binary64)))
(*.f64 K #s(literal 1/2 binary64))
K
#s(literal 1/2 binary64)
J
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 J (*.f64 l #s(literal 2 binary64))) U))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U)
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(*.f64 #s(literal 1/2 binary64) K)
#s(literal 1/2 binary64)
K
(*.f64 J (*.f64 l #s(literal 2 binary64)))
J
(*.f64 l #s(literal 2 binary64))
l
#s(literal 2 binary64)
U
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
l
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
J
(fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))
(*.f64 l #s(literal 1/3 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
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64)))))
(*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64))))
l
(fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64)))
(*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
J
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(*.f64 l l)
#s(literal 1/60 binary64)
#s(literal 1/3 binary64)
(*.f64 J #s(literal 2 binary64))
#s(literal 2 binary64)
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal 2 binary64))
K
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
J
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(exp.f64 l)
l
(exp.f64 (neg.f64 l))
(neg.f64 l)
U
Outputs
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) U)
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
#s(literal 2 binary64)
(sinh.f64 l)
l
(cos.f64 (*.f64 K #s(literal 1/2 binary64)))
(*.f64 K #s(literal 1/2 binary64))
K
#s(literal 1/2 binary64)
J
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 J (*.f64 l #s(literal 2 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 l (*.f64 #s(literal 2 binary64) J)) U))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U)
(fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 l (*.f64 #s(literal 2 binary64) J)) U)
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos.f64 (*.f64 K #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) K)
(*.f64 K #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
K
(*.f64 J (*.f64 l #s(literal 2 binary64)))
(*.f64 l (*.f64 #s(literal 2 binary64) J))
J
(*.f64 l #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) l)
l
#s(literal 2 binary64)
U
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 l J))) (cos.f64 (/.f64 K #s(literal 2 binary64))) U)
(*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 l J))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 l J)))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 l J))
l
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
J
(fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))
(*.f64 l #s(literal 1/3 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
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l J) (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U)
(*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l J) (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64)))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l J) (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64))))
(*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64))))
(*.f64 (*.f64 l J) (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
l
(fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64)))
(*.f64 J (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
J
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(*.f64 l l)
#s(literal 1/60 binary64)
#s(literal 1/3 binary64)
(*.f64 J #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) J)
#s(literal 2 binary64)
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal 2 binary64))
K
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J) U))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(fma.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J) U)
J
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(exp.f64 l)
l
(exp.f64 (neg.f64 l))
(neg.f64 l)
U

localize381.0ms (2.9%)

Memory
4.2MiB live, 273.4MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy100.0%
(exp.f64 l)
accuracy100.0%
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
accuracy83.6%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))
accuracy53.5%
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
accuracy99.8%
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
accuracy99.8%
(*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
accuracy95.3%
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
accuracy91.1%
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64)))))
accuracy99.9%
(fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))
accuracy99.4%
(*.f64 l #s(literal 1/3 binary64))
accuracy95.6%
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
accuracy85.8%
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))))
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) K)
accuracy100.0%
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
accuracy99.9%
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U)
accuracy65.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
accuracy100.0%
(cos.f64 (*.f64 K #s(literal 1/2 binary64)))
accuracy100.0%
(sinh.f64 l)
accuracy100.0%
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
accuracy99.9%
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
Samples
107.0ms34×2valid
71.0ms89×1valid
53.0ms133×0valid
Compiler

Compiled 330 to 47 computations (85.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 195.0ms
ival-exp: 71.0ms (36.5% of total)
ival-mult: 67.0ms (34.4% of total)
ival-cos: 19.0ms (9.8% of total)
adjust: 11.0ms (5.6% of total)
ival-add: 11.0ms (5.6% of total)
const: 8.0ms (4.1% of total)
ival-sub: 2.0ms (1% of total)
ival-sinh: 2.0ms (1% of total)
ival-div: 1.0ms (0.5% of total)
ival-neg: 1.0ms (0.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series126.0ms (1%)

Memory
-1.3MiB live, 38.9MiB allocated
Counts
27 → 708
Calls
Call 1
Inputs
#<alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)>
#<alt (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))>
#<alt (*.f64 #s(literal 2 binary64) (sinh.f64 l))>
#<alt (sinh.f64 l)>
#<alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))>
#<alt (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U)>
#<alt (cos.f64 (*.f64 #s(literal 1/2 binary64) K))>
#<alt (*.f64 #s(literal 1/2 binary64) K)>
#<alt (+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)>
#<alt (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64))))>
#<alt #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))))>
#<alt (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))>
#<alt (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64)))>
#<alt (+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)>
#<alt (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64))))>
#<alt #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64)))))>
#<alt (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))>
#<alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))>
#<alt (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)>
#<alt (exp.f64 l)>
#<alt (cos.f64 (*.f64 K #s(literal 1/2 binary64)))>
#<alt (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))>
#<alt (*.f64 l #s(literal 1/3 binary64))>
#<alt (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))>
#<alt (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))>
#<alt (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))>
#<alt (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))>
Outputs
#<alt U>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))>
#<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)))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))>
#<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))))))))))>
#<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)))))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt U>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))>
#<alt (* 2 (* l (cos (* 1/2 K))))>
#<alt (* l (+ (* 1/3 (* (pow l 2) (cos (* 1/2 K)))) (* 2 (cos (* 1/2 K)))))>
#<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)))))))>
#<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)))))))))>
#<alt (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))>
#<alt (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))>
#<alt (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))>
#<alt (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))>
#<alt (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))>
#<alt (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))>
#<alt (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))>
#<alt (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))>
#<alt (- (exp l) (/ 1 (exp l)))>
#<alt (- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))>
#<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)))>
#<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)))>
#<alt (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))>
#<alt (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))>
#<alt (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))>
#<alt (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))>
#<alt (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))>
#<alt (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))>
#<alt (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))>
#<alt (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))>
#<alt (* 2 l)>
#<alt (* l (+ 2 (* 1/3 (pow l 2))))>
#<alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))>
#<alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))>
#<alt (- (exp l) (/ 1 (exp l)))>
#<alt (- (exp l) (/ 1 (exp l)))>
#<alt (- (exp l) (/ 1 (exp l)))>
#<alt (- (exp l) (/ 1 (exp l)))>
#<alt (- (exp l) (/ 1 (exp l)))>
#<alt (- (exp l) (/ 1 (exp l)))>
#<alt (- (exp l) (/ 1 (exp l)))>
#<alt (- (exp l) (/ 1 (exp l)))>
#<alt l>
#<alt (* l (+ 1 (* 1/6 (pow l 2))))>
#<alt (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))>
#<alt (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt U>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt U>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))>
#<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)))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))>
#<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))))))))))>
#<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)))))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (+ U (* 2 (* J l)))>
#<alt (+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))>
#<alt (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))>
#<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))))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt U>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (* 2 (* J (* l (cos (* 1/2 K)))))>
#<alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))>
#<alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))>
#<alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))>
#<alt (* 2 (* J (* l (cos (* 1/2 K)))))>
#<alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))>
#<alt U>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (* 2 (* J (* l (cos (* 1/2 K)))))>
#<alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))>
#<alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))>
#<alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))>
#<alt (* 2 (* J (* l (cos (* 1/2 K)))))>
#<alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))>
#<alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))>
#<alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))>
#<alt (* 2 (* J (* l (cos (* 1/2 K)))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt U>
#<alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))>
#<alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))>
#<alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))>
#<alt U>
#<alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))>
#<alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))>
#<alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))>
#<alt 1>
#<alt (+ 1 (* -1/8 (pow K 2)))>
#<alt (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))>
#<alt (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))>
#<alt (cos (* 1/2 K))>
#<alt (cos (* 1/2 K))>
#<alt (cos (* 1/2 K))>
#<alt (cos (* 1/2 K))>
#<alt (cos (* 1/2 K))>
#<alt (cos (* 1/2 K))>
#<alt (cos (* 1/2 K))>
#<alt (cos (* 1/2 K))>
#<alt (* 1/2 K)>
#<alt (* 1/2 K)>
#<alt (* 1/2 K)>
#<alt (* 1/2 K)>
#<alt (* 1/2 K)>
#<alt (* 1/2 K)>
#<alt (* 1/2 K)>
#<alt (* 1/2 K)>
#<alt (* 1/2 K)>
#<alt (* 1/2 K)>
#<alt (* 1/2 K)>
#<alt (* 1/2 K)>
#<alt U>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt U>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))>
#<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)))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))>
#<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))))))))))>
#<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)))))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* 2 (* J (* l (cos (* 1/2 K)))))>
#<alt (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))>
#<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))))))))>
#<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))))))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))>
#<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)))))))))>
#<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))))))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* 2 (* J l))>
#<alt (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))>
#<alt (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))>
#<alt (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (* -1 l))))>
#<alt (* J (- (exp l) (exp (* -1 l))))>
#<alt (* J (- (exp l) (exp (* -1 l))))>
#<alt (* J (- (exp l) (exp (* -1 l))))>
#<alt (* 2 (* J l))>
#<alt (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))>
#<alt (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))>
#<alt (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))>
#<alt (* 1/3 (* J (pow l 3)))>
#<alt (* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))>
#<alt (* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))>
#<alt (* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))>
#<alt (* 1/3 (* J (pow l 3)))>
#<alt (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))>
#<alt (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))>
#<alt (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))>
#<alt (* J (* l (+ 2 (* 1/3 (pow l 2)))))>
#<alt (* J (* l (+ 2 (* 1/3 (pow l 2)))))>
#<alt (* J (* l (+ 2 (* 1/3 (pow l 2)))))>
#<alt (* J (* l (+ 2 (* 1/3 (pow l 2)))))>
#<alt (* J (* l (+ 2 (* 1/3 (pow l 2)))))>
#<alt (* J (* l (+ 2 (* 1/3 (pow l 2)))))>
#<alt (* J (* l (+ 2 (* 1/3 (pow l 2)))))>
#<alt (* J (* l (+ 2 (* 1/3 (pow l 2)))))>
#<alt (* J (* l (+ 2 (* 1/3 (pow l 2)))))>
#<alt (* J (* l (+ 2 (* 1/3 (pow l 2)))))>
#<alt (* J (* l (+ 2 (* 1/3 (pow l 2)))))>
#<alt (* J (* l (+ 2 (* 1/3 (pow l 2)))))>
#<alt (* 2 J)>
#<alt (+ (* 1/3 (* J (pow l 2))) (* 2 J))>
#<alt (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))>
#<alt (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))>
#<alt (* 1/60 (* J (pow l 4)))>
#<alt (* (pow l 4) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))>
#<alt (* (pow l 4) (+ (* 1/60 J) (+ (* 1/3 (/ J (pow l 2))) (* 2 (/ J (pow l 4))))))>
#<alt (* (pow l 4) (+ (* 1/60 J) (+ (* 1/3 (/ J (pow l 2))) (* 2 (/ J (pow l 4))))))>
#<alt (* 1/60 (* J (pow l 4)))>
#<alt (* (pow l 4) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))>
#<alt (* (pow l 4) (+ (* 1/60 J) (+ (* 1/3 (/ J (pow l 2))) (* 2 (/ J (pow l 4))))))>
#<alt (* (pow l 4) (+ (* 1/60 J) (+ (* 1/3 (/ J (pow l 2))) (* 2 (/ J (pow l 4))))))>
#<alt (* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))>
#<alt (* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))>
#<alt (* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))>
#<alt (* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))>
#<alt (* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))>
#<alt (* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))>
#<alt (* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))>
#<alt (* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))>
#<alt (* -1 (* J (- (* -1 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))) 2)))>
#<alt (* -1 (* J (- (* -1 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))) 2)))>
#<alt (* -1 (* J (- (* -1 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))) 2)))>
#<alt (* -1 (* J (- (* -1 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))) 2)))>
#<alt U>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt U>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))>
#<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)))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))>
#<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))))))))))>
#<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)))))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* 2 (* J (* l (cos (* 1/2 K)))))>
#<alt (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))>
#<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))))))))>
#<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))))))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))>
#<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)))))))))>
#<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))))))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* 2 (* J l))>
#<alt (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))>
#<alt (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))>
#<alt (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (* -1 l))))>
#<alt (* J (- (exp l) (exp (* -1 l))))>
#<alt (* J (- (exp l) (exp (* -1 l))))>
#<alt (* J (- (exp l) (exp (* -1 l))))>
#<alt (* 2 l)>
#<alt (* l (+ 2 (* 1/3 (pow l 2))))>
#<alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))>
#<alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))>
#<alt (- (exp l) (exp (neg l)))>
#<alt (- (exp l) (exp (neg l)))>
#<alt (- (exp l) (exp (neg l)))>
#<alt (- (exp l) (exp (neg l)))>
#<alt (- (exp l) (exp (* -1 l)))>
#<alt (- (exp l) (exp (* -1 l)))>
#<alt (- (exp l) (exp (* -1 l)))>
#<alt (- (exp l) (exp (* -1 l)))>
#<alt U>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt U>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))>
#<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)))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))>
#<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))))))))))>
#<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)))))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt U>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (+ (exp l) (/ U J)) (exp (neg l))))>
#<alt (* J (- (+ (exp l) (/ U J)) (exp (neg l))))>
#<alt (* J (- (+ (exp l) (/ U J)) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))>
#<alt U>
#<alt (+ U (* 2 (* J l)))>
#<alt (+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))>
#<alt (+ U (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))>
#<alt (* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))>
#<alt (* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))>
#<alt 1>
#<alt (+ 1 l)>
#<alt (+ 1 (* l (+ 1 (* 1/2 l))))>
#<alt (+ 1 (* l (+ 1 (* l (+ 1/2 (* 1/6 l))))))>
#<alt (exp l)>
#<alt (exp l)>
#<alt (exp l)>
#<alt (exp l)>
#<alt (exp l)>
#<alt (exp l)>
#<alt (exp l)>
#<alt (exp l)>
#<alt 1>
#<alt (+ 1 (* -1/8 (pow K 2)))>
#<alt (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))>
#<alt (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))>
#<alt (cos (* 1/2 K))>
#<alt (cos (* 1/2 K))>
#<alt (cos (* 1/2 K))>
#<alt (cos (* 1/2 K))>
#<alt (cos (* 1/2 K))>
#<alt (cos (* 1/2 K))>
#<alt (cos (* 1/2 K))>
#<alt (cos (* 1/2 K))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* 2 J)>
#<alt (+ (* 1/3 (* J (pow l 2))) (* 2 J))>
#<alt (+ (* 1/3 (* J (pow l 2))) (* 2 J))>
#<alt (+ (* 1/3 (* J (pow l 2))) (* 2 J))>
#<alt (* 1/3 (* J (pow l 2)))>
#<alt (* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))>
#<alt (* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))>
#<alt (* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))>
#<alt (* 1/3 (* J (pow l 2)))>
#<alt (* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))>
#<alt (* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))>
#<alt (* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt 2>
#<alt (+ 2 (* 1/3 (pow l 2)))>
#<alt (+ 2 (* 1/3 (pow l 2)))>
#<alt (+ 2 (* 1/3 (pow l 2)))>
#<alt (* 1/3 (pow l 2))>
#<alt (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))>
#<alt (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))>
#<alt (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))>
#<alt (* 1/3 (pow l 2))>
#<alt (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))>
#<alt (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))>
#<alt (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))>
#<alt (* J (+ 1/3 (* 1/60 (pow l 2))))>
#<alt (* J (+ 1/3 (* 1/60 (pow l 2))))>
#<alt (* J (+ 1/3 (* 1/60 (pow l 2))))>
#<alt (* J (+ 1/3 (* 1/60 (pow l 2))))>
#<alt (* J (+ 1/3 (* 1/60 (pow l 2))))>
#<alt (* J (+ 1/3 (* 1/60 (pow l 2))))>
#<alt (* J (+ 1/3 (* 1/60 (pow l 2))))>
#<alt (* J (+ 1/3 (* 1/60 (pow l 2))))>
#<alt (* J (+ 1/3 (* 1/60 (pow l 2))))>
#<alt (* J (+ 1/3 (* 1/60 (pow l 2))))>
#<alt (* J (+ 1/3 (* 1/60 (pow l 2))))>
#<alt (* J (+ 1/3 (* 1/60 (pow l 2))))>
#<alt (* 1/3 J)>
#<alt (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))>
#<alt (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))>
#<alt (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))>
#<alt (* 1/60 (* J (pow l 2)))>
#<alt (* (pow l 2) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))>
#<alt (* (pow l 2) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))>
#<alt (* (pow l 2) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))>
#<alt (* 1/60 (* J (pow l 2)))>
#<alt (* (pow l 2) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))>
#<alt (* (pow l 2) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))>
#<alt (* (pow l 2) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))>
#<alt (* 1/3 (* J l))>
#<alt (* l (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))>
#<alt (* l (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))>
#<alt (* l (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))>
#<alt (* 1/60 (* J (pow l 3)))>
#<alt (* (pow l 3) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))>
#<alt (* (pow l 3) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))>
#<alt (* (pow l 3) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))>
#<alt (* 1/60 (* J (pow l 3)))>
#<alt (* -1 (* (pow l 3) (+ (* -1/3 (/ J (pow l 2))) (* -1/60 J))))>
#<alt (* -1 (* (pow l 3) (+ (* -1/3 (/ J (pow l 2))) (* -1/60 J))))>
#<alt (* -1 (* (pow l 3) (+ (* -1/3 (/ J (pow l 2))) (* -1/60 J))))>
#<alt (* J (* l (+ 1/3 (* 1/60 (pow l 2)))))>
#<alt (* J (* l (+ 1/3 (* 1/60 (pow l 2)))))>
#<alt (* J (* l (+ 1/3 (* 1/60 (pow l 2)))))>
#<alt (* J (* l (+ 1/3 (* 1/60 (pow l 2)))))>
#<alt (* J (* l (+ 1/3 (* 1/60 (pow l 2)))))>
#<alt (* J (* l (+ 1/3 (* 1/60 (pow l 2)))))>
#<alt (* J (* l (+ 1/3 (* 1/60 (pow l 2)))))>
#<alt (* J (* l (+ 1/3 (* 1/60 (pow l 2)))))>
#<alt (* J (* l (+ 1/3 (* 1/60 (pow l 2)))))>
#<alt (* J (* l (+ 1/3 (* 1/60 (pow l 2)))))>
#<alt (* J (* l (+ 1/3 (* 1/60 (pow l 2)))))>
#<alt (* J (* l (+ 1/3 (* 1/60 (pow l 2)))))>
#<alt 1/3>
#<alt (+ 1/3 (* 1/60 (pow l 2)))>
#<alt (+ 1/3 (* 1/60 (pow l 2)))>
#<alt (+ 1/3 (* 1/60 (pow l 2)))>
#<alt (* 1/60 (pow l 2))>
#<alt (* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* 1/60 (pow l 2))>
#<alt (* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
Calls

177 calls:

TimeVariablePointExpression
7.0ms
J
@0
(+ (* l (* l (* J (+ (* (* l l) 1/60) 1/3)))) (* J 2))
3.0ms
K
@-inf
(+ (* (* (* 2 (sinh l)) (cos (* K 1/2))) J) U)
2.0ms
l
@inf
(+ (* (* (* 2 (sinh l)) (cos (* K 1/2))) J) U)
2.0ms
l
@-inf
(+ (* (* (* 2 (sinh l)) (cos (* K 1/2))) J) U)
1.0ms
K
@inf
(+ (* (* (* 2 (sinh l)) (cos (* K 1/2))) J) U)

simplify510.0ms (3.9%)

Memory
7.8MiB live, 669.0MiB allocated
Algorithm
egg-herbie
Rules
16 082×lower-fma.f64
16 082×lower-fma.f32
6 692×lower-*.f64
6 692×lower-*.f32
4 496×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03699218
112529020
237528576
081868043
Stop Event
iter limit
node limit
Counts
708 → 679
Calls
Call 1
Inputs
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 (* 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))))))
(+ 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))))))
(+ 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)))))))))))
(+ 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))))))
(+ 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))))))
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 (* (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) (/ 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) (/ 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
(* 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
(* -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)))
(* 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)))))))))
(* (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)) (- (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/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)))
(* (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)) (- (exp l) (/ 1 (exp l))))
(* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))
(* 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))))))))
(- (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)))
(- (exp l) (/ 1 (exp l)))
(- (exp l) (/ 1 (exp l)))
(- (exp l) (/ 1 (exp l)))
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))))))))
(* 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/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
(+ 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)))) (/ 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)))))
(* -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)))))
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 (* 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 (* -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 (- (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 (* 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))))))
(+ 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))))))
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 (* 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 (* 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 (* 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 (* 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 (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 (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 (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(* 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 (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 (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 (* 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 (- (* -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)))
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)))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(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)
(* 1/2 K)
(* 1/2 K)
(* 1/2 K)
(* 1/2 K)
(* 1/2 K)
(* 1/2 K)
(* 1/2 K)
(* 1/2 K)
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)))) (/ 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)))))
(* -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)))))
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 (* 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 (* -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 (- (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 (* 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))))))
(+ 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))))))
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)))
(* 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 (* (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 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* 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))))))))))
(* 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 (* -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 (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))))))))))
(* 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 (* (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 (- (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 (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* 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)))))))
(* 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 (- (exp l) (exp (* -1 l))))
(* J (- (exp l) (exp (* -1 l))))
(* J (- (exp l) (exp (* -1 l))))
(* J (- (exp l) (exp (* -1 l))))
(* 2 (* J l))
(* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))
(* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))
(* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))
(* 1/3 (* J (pow l 3)))
(* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(* 1/3 (* J (pow l 3)))
(* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))
(* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))
(* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(* 2 J)
(+ (* 1/3 (* J (pow l 2))) (* 2 J))
(+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))
(+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))
(* 1/60 (* J (pow l 4)))
(* (pow l 4) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(* (pow l 4) (+ (* 1/60 J) (+ (* 1/3 (/ J (pow l 2))) (* 2 (/ J (pow l 4))))))
(* (pow l 4) (+ (* 1/60 J) (+ (* 1/3 (/ J (pow l 2))) (* 2 (/ J (pow l 4))))))
(* 1/60 (* J (pow l 4)))
(* (pow l 4) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(* (pow l 4) (+ (* 1/60 J) (+ (* 1/3 (/ J (pow l 2))) (* 2 (/ J (pow l 4))))))
(* (pow l 4) (+ (* 1/60 J) (+ (* 1/3 (/ J (pow l 2))) (* 2 (/ J (pow l 4))))))
(* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(* -1 (* J (- (* -1 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))) 2)))
(* -1 (* J (- (* -1 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))) 2)))
(* -1 (* J (- (* -1 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))) 2)))
(* -1 (* J (- (* -1 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))) 2)))
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)))) (/ 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)))))
(* -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)))))
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 (* 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 (* -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 (- (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 (* 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))))))
(+ 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))))))
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)))
(* 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 (* (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 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* 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))))))))))
(* 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 (* -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 (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))))))))))
(* 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 (* (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 (- (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 (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* 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)))))))
(* 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 (- (exp l) (exp (* -1 l))))
(* J (- (exp l) (exp (* -1 l))))
(* J (- (exp l) (exp (* -1 l))))
(* J (- (exp l) (exp (* -1 l))))
(* 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))))))))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 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)))) (/ 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)))))
(* -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)))))
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 (* 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 (* -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 (- (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 (* 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))))))
(+ 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))))))
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
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(* J (- (exp l) (exp (neg l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
U
(+ U (* 2 (* J l)))
(+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
(+ U (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(* J (- (exp l) (exp (neg l))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
U
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
U
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
1
(+ 1 l)
(+ 1 (* l (+ 1 (* 1/2 l))))
(+ 1 (* l (+ 1 (* l (+ 1/2 (* 1/6 l))))))
(exp l)
(exp l)
(exp l)
(exp l)
(exp l)
(exp l)
(exp l)
(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)))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* 2 J)
(+ (* 1/3 (* J (pow l 2))) (* 2 J))
(+ (* 1/3 (* J (pow l 2))) (* 2 J))
(+ (* 1/3 (* J (pow l 2))) (* 2 J))
(* 1/3 (* J (pow l 2)))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(* 1/3 (* J (pow l 2)))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(* 1/3 l)
(* 1/3 l)
(* 1/3 l)
(* 1/3 l)
(* 1/3 l)
(* 1/3 l)
(* 1/3 l)
(* 1/3 l)
(* 1/3 l)
(* 1/3 l)
(* 1/3 l)
(* 1/3 l)
2
(+ 2 (* 1/3 (pow l 2)))
(+ 2 (* 1/3 (pow l 2)))
(+ 2 (* 1/3 (pow l 2)))
(* 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/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)))))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(* 1/3 J)
(+ (* 1/60 (* J (pow l 2))) (* 1/3 J))
(+ (* 1/60 (* J (pow l 2))) (* 1/3 J))
(+ (* 1/60 (* J (pow l 2))) (* 1/3 J))
(* 1/60 (* J (pow l 2)))
(* (pow l 2) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(* (pow l 2) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(* (pow l 2) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(* 1/60 (* J (pow l 2)))
(* (pow l 2) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(* (pow l 2) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(* (pow l 2) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(* 1/3 (* J l))
(* l (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))
(* l (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))
(* l (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))
(* 1/60 (* J (pow l 3)))
(* (pow l 3) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(* (pow l 3) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(* (pow l 3) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(* 1/60 (* J (pow l 3)))
(* -1 (* (pow l 3) (+ (* -1/3 (/ J (pow l 2))) (* -1/60 J))))
(* -1 (* (pow l 3) (+ (* -1/3 (/ J (pow l 2))) (* -1/60 J))))
(* -1 (* (pow l 3) (+ (* -1/3 (/ J (pow l 2))) (* -1/60 J))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
1/3
(+ 1/3 (* 1/60 (pow l 2)))
(+ 1/3 (* 1/60 (pow l 2)))
(+ 1/3 (* 1/60 (pow l 2)))
(* 1/60 (pow l 2))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* 1/60 (pow l 2))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
Outputs
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (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 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) 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 l (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 l l)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) (*.f64 J #s(literal -1/8 binary64)) 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 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) (*.f64 J (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)))) 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 J (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (*.f64 J (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))) (*.f64 (*.f64 K K) (*.f64 K K)) U))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 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 J (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) (/ 1 (exp l))))) (* -1 (/ U J)))))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U))) U)
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J U)) #s(literal -1 binary64)) (neg.f64 U))
(* 2 (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) l))
(* l (+ (* 1/3 (* (pow l 2) (cos (* 1/2 K)))) (* 2 (cos (* 1/2 K)))))
(*.f64 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 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 l (fma.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 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 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 l (fma.f64 (*.f64 l l) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))))
(* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.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/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))
(*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #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 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 K (*.f64 K (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)))) (-.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 (*.f64 K K) (*.f64 (*.f64 K K) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* l (+ 2 (* 1/3 (pow l 2))))
(*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))
(*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 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)))
(- (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)))
l
(* l (+ 1 (* 1/6 (pow l 2))))
(fma.f64 l (*.f64 l (*.f64 l #s(literal 1/6 binary64))) l)
(* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))
(fma.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/120 binary64) #s(literal 1/6 binary64)) l) l)
(* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))
(fma.f64 (*.f64 l l) (*.f64 (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/5040 binary64) #s(literal 1/120 binary64))) #s(literal 1/6 binary64)) l) 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/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/2 (- (exp l) (/ 1 (exp l))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 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 J (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 J (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 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (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 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) 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 l (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 l l)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) (*.f64 J #s(literal -1/8 binary64)) 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 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) (*.f64 J (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)))) 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 J (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (*.f64 J (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))) (*.f64 (*.f64 K K) (*.f64 K K)) U))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U))) U)
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J U)) #s(literal -1 binary64)) (neg.f64 U))
(+ U (* 2 (* J l)))
(fma.f64 #s(literal 2 binary64) (*.f64 J l) U)
(+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))
(fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #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 K K) (*.f64 (*.f64 J l) (fma.f64 #s(literal 1/192 binary64) (*.f64 K K) #s(literal -1/4 binary64))) (fma.f64 #s(literal 2 binary64) (*.f64 J l) 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 #s(literal 2 binary64) (*.f64 J l) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 J (*.f64 l (*.f64 K K))) (fma.f64 #s(literal -1/23040 binary64) (*.f64 K K) #s(literal 1/192 binary64)) (*.f64 J (*.f64 l #s(literal -1/4 binary64)))) U))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) l) (/.f64 U J)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) l) (/.f64 U J)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) l) (/.f64 U J)))
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) l) (/.f64 U J)))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) l) (/.f64 U J)))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) l) (/.f64 U J)))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 l (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J) (/.f64 U l)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 l (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J) (/.f64 U l)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 l (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J) (/.f64 U l)))
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 l (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J) (/.f64 U l)))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 l (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J) (/.f64 U l)))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 l (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J) (/.f64 U l)))
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
U
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (*.f64 J l) U)) (*.f64 #s(literal 2 binary64) U) U)
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (*.f64 J l) U)) (*.f64 #s(literal 2 binary64) U) U)
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (*.f64 J l) U)) (*.f64 #s(literal 2 binary64) U) U)
U
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J l)) (/.f64 #s(literal -2 binary64) U) #s(literal -1 binary64)) (neg.f64 U))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J l)) (/.f64 #s(literal -2 binary64) U) #s(literal -1 binary64)) (neg.f64 U))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J l)) (/.f64 #s(literal -2 binary64) U) #s(literal -1 binary64)) (neg.f64 U))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (pow K 2)))
(fma.f64 #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 K (*.f64 K (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64))) #s(literal 1 binary64))
(+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))
(fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)) #s(literal 1 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))
(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/2 K)
(*.f64 #s(literal 1/2 binary64) K)
(* 1/2 K)
(*.f64 #s(literal 1/2 binary64) K)
(* 1/2 K)
(*.f64 #s(literal 1/2 binary64) K)
(* 1/2 K)
(*.f64 #s(literal 1/2 binary64) K)
(* 1/2 K)
(*.f64 #s(literal 1/2 binary64) K)
(* 1/2 K)
(*.f64 #s(literal 1/2 binary64) K)
(* 1/2 K)
(*.f64 #s(literal 1/2 binary64) K)
(* 1/2 K)
(*.f64 #s(literal 1/2 binary64) K)
(* 1/2 K)
(*.f64 #s(literal 1/2 binary64) K)
(* 1/2 K)
(*.f64 #s(literal 1/2 binary64) K)
(* 1/2 K)
(*.f64 #s(literal 1/2 binary64) K)
(* 1/2 K)
(*.f64 #s(literal 1/2 binary64) K)
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 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 J (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 J (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 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (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 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) 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 l (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 l l)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) (*.f64 J #s(literal -1/8 binary64)) 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 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) (*.f64 J (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)))) 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 J (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (*.f64 J (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))) (*.f64 (*.f64 K K) (*.f64 K K)) U))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U))) U)
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J U)) #s(literal -1 binary64)) (neg.f64 U))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))
(*.f64 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K))))))))
(*.f64 l (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 l l)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/2520 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/60 (* J (cos (* 1/2 K))))))))))
(*.f64 l (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 l l) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 l l)) (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64)))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) (*.f64 J #s(literal -1/8 binary64)) 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 K K) (*.f64 J (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)))) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 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))))))))))
(fma.f64 (*.f64 J (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))) (*.f64 (*.f64 K K) (*.f64 K K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) (*.f64 J #s(literal -1/8 binary64)) J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* 2 (* J l))
(*.f64 #s(literal 2 binary64) (*.f64 J l))
(* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64))))
(* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))
(*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64)))) (*.f64 J #s(literal 1/3 binary64))) (*.f64 #s(literal 2 binary64) J)))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (* -1 l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (* -1 l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (* -1 l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (* -1 l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* 2 (* J l))
(*.f64 #s(literal 2 binary64) (*.f64 J l))
(* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(* 1/3 (* J (pow l 3)))
(*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l (*.f64 l l))))
(* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(*.f64 l (fma.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) J) #s(literal 1 binary64))))
(* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(*.f64 l (fma.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) J) #s(literal 1 binary64))))
(* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(*.f64 l (fma.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) J) #s(literal 1 binary64))))
(* 1/3 (* J (pow l 3)))
(*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l (*.f64 l l))))
(* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))
(*.f64 l (fma.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) J) #s(literal 1 binary64))))
(* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))
(*.f64 l (fma.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) J) #s(literal 1 binary64))))
(* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))
(*.f64 l (fma.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) J) #s(literal 1 binary64))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(* 2 J)
(*.f64 #s(literal 2 binary64) J)
(+ (* 1/3 (* J (pow l 2))) (* 2 J))
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))
(*.f64 J (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))
(*.f64 J (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(* 1/60 (* J (pow l 4)))
(*.f64 J (*.f64 l (*.f64 l (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))))
(* (pow l 4) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 J (+.f64 #s(literal 1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 l l)))))
(* (pow l 4) (+ (* 1/60 J) (+ (* 1/3 (/ J (pow l 2))) (* 2 (/ J (pow l 4))))))
(*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (fma.f64 #s(literal 2 binary64) (/.f64 J (*.f64 (*.f64 l l) (*.f64 l l))) (*.f64 J (+.f64 #s(literal 1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 l l))))))
(* (pow l 4) (+ (* 1/60 J) (+ (* 1/3 (/ J (pow l 2))) (* 2 (/ J (pow l 4))))))
(*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (fma.f64 #s(literal 2 binary64) (/.f64 J (*.f64 (*.f64 l l) (*.f64 l l))) (*.f64 J (+.f64 #s(literal 1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 l l))))))
(* 1/60 (* J (pow l 4)))
(*.f64 J (*.f64 l (*.f64 l (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))))
(* (pow l 4) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 J (+.f64 #s(literal 1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 l l)))))
(* (pow l 4) (+ (* 1/60 J) (+ (* 1/3 (/ J (pow l 2))) (* 2 (/ J (pow l 4))))))
(*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (fma.f64 #s(literal 2 binary64) (/.f64 J (*.f64 (*.f64 l l) (*.f64 l l))) (*.f64 J (+.f64 #s(literal 1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 l l))))))
(* (pow l 4) (+ (* 1/60 J) (+ (* 1/3 (/ J (pow l 2))) (* 2 (/ J (pow l 4))))))
(*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (fma.f64 #s(literal 2 binary64) (/.f64 J (*.f64 (*.f64 l l) (*.f64 l l))) (*.f64 J (+.f64 #s(literal 1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 l l))))))
(* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(*.f64 J (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(*.f64 J (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(*.f64 J (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(*.f64 J (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(*.f64 J (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(*.f64 J (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(*.f64 J (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(* J (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(*.f64 J (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(* -1 (* J (- (* -1 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))) 2)))
(neg.f64 (*.f64 J (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)) (*.f64 l (neg.f64 l)) #s(literal -2 binary64))))
(* -1 (* J (- (* -1 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))) 2)))
(neg.f64 (*.f64 J (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)) (*.f64 l (neg.f64 l)) #s(literal -2 binary64))))
(* -1 (* J (- (* -1 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))) 2)))
(neg.f64 (*.f64 J (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)) (*.f64 l (neg.f64 l)) #s(literal -2 binary64))))
(* -1 (* J (- (* -1 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))) 2)))
(neg.f64 (*.f64 J (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)) (*.f64 l (neg.f64 l)) #s(literal -2 binary64))))
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 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 J (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 J (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 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (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 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) 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 l (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 l l)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) (*.f64 J #s(literal -1/8 binary64)) 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 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) (*.f64 J (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)))) 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 J (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (*.f64 J (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))) (*.f64 (*.f64 K K) (*.f64 K K)) U))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U))) U)
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J U)) #s(literal -1 binary64)) (neg.f64 U))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))
(*.f64 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K))))))))
(*.f64 l (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 l l)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/2520 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/60 (* J (cos (* 1/2 K))))))))))
(*.f64 l (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 l l) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 l l)) (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64)))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) (*.f64 J #s(literal -1/8 binary64)) 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 K K) (*.f64 J (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)))) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 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))))))))))
(fma.f64 (*.f64 J (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))) (*.f64 (*.f64 K K) (*.f64 K K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) (*.f64 J #s(literal -1/8 binary64)) J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* 2 (* J l))
(*.f64 #s(literal 2 binary64) (*.f64 J l))
(* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64))))
(* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))
(*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64)))) (*.f64 J #s(literal 1/3 binary64))) (*.f64 #s(literal 2 binary64) J)))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (* -1 l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (* -1 l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (* -1 l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (* -1 l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* l (+ 2 (* 1/3 (pow l 2))))
(*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))
(*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(- (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)))
(- (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
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 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 J (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 J (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 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (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 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) 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 l (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 l l)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) (*.f64 J #s(literal -1/8 binary64)) 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 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) (*.f64 J (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)))) 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 J (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (*.f64 J (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))) (*.f64 (*.f64 K K) (*.f64 K K)) U))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U))) U)
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J U)) #s(literal -1 binary64)) (neg.f64 U))
U
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
U
(+ U (* 2 (* J l)))
(fma.f64 #s(literal 2 binary64) (*.f64 J l) U)
(+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
(fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)
(+ U (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))))
(fma.f64 l (*.f64 J (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(fma.f64 U (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U)) U)
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(fma.f64 U (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U)) U)
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(fma.f64 U (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U)) U)
U
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(*.f64 (fma.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J U) #s(literal -1 binary64)) (neg.f64 U))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(*.f64 (fma.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J U) #s(literal -1 binary64)) (neg.f64 U))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(*.f64 (fma.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J U) #s(literal -1 binary64)) (neg.f64 U))
1
#s(literal 1 binary64)
(+ 1 l)
(+.f64 l #s(literal 1 binary64))
(+ 1 (* l (+ 1 (* 1/2 l))))
(fma.f64 l (fma.f64 l #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1 binary64))
(+ 1 (* l (+ 1 (* l (+ 1/2 (* 1/6 l))))))
(fma.f64 l (fma.f64 l (fma.f64 l #s(literal 1/6 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(exp l)
(exp.f64 l)
(exp l)
(exp.f64 l)
(exp l)
(exp.f64 l)
(exp l)
(exp.f64 l)
(exp l)
(exp.f64 l)
(exp l)
(exp.f64 l)
(exp l)
(exp.f64 l)
(exp l)
(exp.f64 l)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (pow K 2)))
(fma.f64 #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 K (*.f64 K (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64))) #s(literal 1 binary64))
(+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))
(fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)) #s(literal 1 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))
(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))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(* 2 J)
(*.f64 #s(literal 2 binary64) J)
(+ (* 1/3 (* J (pow l 2))) (* 2 J))
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(+ (* 1/3 (* J (pow l 2))) (* 2 J))
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(+ (* 1/3 (* J (pow l 2))) (* 2 J))
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(* 1/3 (* J (pow l 2)))
(*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(fma.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) J) #s(literal 1 binary64)))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(fma.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) J) #s(literal 1 binary64)))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(fma.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) J) #s(literal 1 binary64)))
(* 1/3 (* J (pow l 2)))
(*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(fma.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) J) #s(literal 1 binary64)))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(fma.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) J) #s(literal 1 binary64)))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(fma.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) J) #s(literal 1 binary64)))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
2
#s(literal 2 binary64)
(+ 2 (* 1/3 (pow l 2)))
(fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))
(+ 2 (* 1/3 (pow l 2)))
(fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))
(+ 2 (* 1/3 (pow l 2)))
(fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))
(* 1/3 (pow l 2))
(*.f64 l (*.f64 l #s(literal 1/3 binary64)))
(* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))
(* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))
(* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))
(* 1/3 (pow l 2))
(*.f64 l (*.f64 l #s(literal 1/3 binary64)))
(* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))
(* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))
(* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* J (+ 1/3 (* 1/60 (pow l 2))))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* 1/3 J)
(*.f64 J #s(literal 1/3 binary64))
(+ (* 1/60 (* J (pow l 2))) (* 1/3 J))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(+ (* 1/60 (* J (pow l 2))) (* 1/3 J))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(+ (* 1/60 (* J (pow l 2))) (* 1/3 J))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* 1/60 (* J (pow l 2)))
(*.f64 J (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))
(* (pow l 2) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* (pow l 2) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* (pow l 2) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* 1/60 (* J (pow l 2)))
(*.f64 J (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))
(* (pow l 2) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* (pow l 2) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* (pow l 2) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* 1/3 (* J l))
(*.f64 J (*.f64 l #s(literal 1/3 binary64)))
(* l (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))
(*.f64 J (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(* l (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))
(*.f64 J (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(* l (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))
(*.f64 J (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(* 1/60 (* J (pow l 3)))
(*.f64 J (*.f64 l (*.f64 (*.f64 l l) #s(literal 1/60 binary64))))
(* (pow l 3) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(*.f64 J (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(* (pow l 3) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(*.f64 J (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(* (pow l 3) (+ (* 1/60 J) (* 1/3 (/ J (pow l 2)))))
(*.f64 J (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(* 1/60 (* J (pow l 3)))
(*.f64 J (*.f64 l (*.f64 (*.f64 l l) #s(literal 1/60 binary64))))
(* -1 (* (pow l 3) (+ (* -1/3 (/ J (pow l 2))) (* -1/60 J))))
(*.f64 J (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(* -1 (* (pow l 3) (+ (* -1/3 (/ J (pow l 2))) (* -1/60 J))))
(*.f64 J (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(* -1 (* (pow l 3) (+ (* -1/3 (/ J (pow l 2))) (* -1/60 J))))
(*.f64 J (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(*.f64 J (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(*.f64 J (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(*.f64 J (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(*.f64 J (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(*.f64 J (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(*.f64 J (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(*.f64 J (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(*.f64 J (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(*.f64 J (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(*.f64 J (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(*.f64 J (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(* J (* l (+ 1/3 (* 1/60 (pow l 2)))))
(*.f64 J (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
1/3
#s(literal 1/3 binary64)
(+ 1/3 (* 1/60 (pow l 2)))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(+ 1/3 (* 1/60 (pow l 2)))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(+ 1/3 (* 1/60 (pow l 2)))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(* 1/60 (pow l 2))
(*.f64 (*.f64 l l) #s(literal 1/60 binary64))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(* 1/60 (pow l 2))
(*.f64 (*.f64 l l) #s(literal 1/60 binary64))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))

rewrite396.0ms (3%)

Memory
-22.1MiB live, 805.8MiB allocated
Algorithm
batch-egg-rewrite
Rules
5 256×lower-*.f32
5 224×lower-*.f64
5 204×lower-fma.f32
5 192×lower-fma.f64
3 722×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
054343
093319
1302319
21823319
08303317
Stop Event
iter limit
node limit
iter limit
Counts
27 → 558
Calls
Call 1
Inputs
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(sinh.f64 l)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U)
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(*.f64 #s(literal 1/2 binary64) K)
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64)))
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64)))))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(exp.f64 l)
(cos.f64 (*.f64 K #s(literal 1/2 binary64)))
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(*.f64 l #s(literal 1/3 binary64))
(fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
Outputs
(+.f64 U (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))))
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (-.f64 U (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))))
(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 (sinh.f64 l) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) U)
(fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) J U)
(fma.f64 J (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) U)
(fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) 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 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) U)
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) U)
(fma.f64 (/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 2 binary64)) (/.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (cosh.f64 l)) U)
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)) (-.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U))))
(/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))))
(/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 J U))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)) (-.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U)) (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)))
(/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 J U)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 U (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)) (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 9 binary64)) (*.f64 (*.f64 U (*.f64 U U)) (*.f64 (*.f64 U U) (*.f64 (*.f64 U U) (*.f64 U U))))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 6 binary64)) (-.f64 (*.f64 (*.f64 U U) (*.f64 (*.f64 U U) (*.f64 U U))) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 J U))) #s(literal 3 binary64)))) (fma.f64 U (-.f64 U (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 6 binary64)) (*.f64 (*.f64 U U) (*.f64 (*.f64 U U) (*.f64 U U)))) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (*.f64 U (*.f64 U U))) (fma.f64 U (-.f64 U (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 6 binary64)) (*.f64 (*.f64 U U) (*.f64 (*.f64 U U) (*.f64 U U)))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (fma.f64 (*.f64 U U) (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 J U))) #s(literal 2 binary64)))) (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 (*.f64 U U) (*.f64 U U))) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J) #s(literal 2 binary64)) (*.f64 U U)) (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)))))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 U (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 U U) (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) (/.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) (fma.f64 (/.f64 (*.f64 U U) (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)))))))
(pow.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)) (-.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U))) #s(literal -1 binary64))
(*.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 U (-.f64 U (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))))
(+.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (exp.f64 l)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 (exp.f64 (neg.f64 l)))))
(+.f64 (*.f64 (exp.f64 l) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (exp.f64 l) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 (exp.f64 (neg.f64 l)))))
(fma.f64 (exp.f64 l) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)))
(/.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))))) (neg.f64 (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (*.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (neg.f64 (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (exp.f64 l)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 (exp.f64 (neg.f64 l)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (exp.f64 l)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (exp.f64 l)) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 (exp.f64 (neg.f64 l)))) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 (exp.f64 (neg.f64 l))))) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (exp.f64 l)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 (exp.f64 (neg.f64 l))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (exp.f64 l) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (exp.f64 l) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (*.f64 (exp.f64 l) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (*.f64 (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (*.f64 (*.f64 (exp.f64 l) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))))))
(*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))
(*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(*.f64 (*.f64 (sinh.f64 l) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sinh.f64 l))
(*.f64 (/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 2 binary64)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (cosh.f64 l)))
(*.f64 (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (cosh.f64 l)))
(+.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))
(+.f64 (neg.f64 (exp.f64 (neg.f64 l))) (exp.f64 l))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(-.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))) (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))))
(-.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(-.f64 (/.f64 (exp.f64 (+.f64 l l)) (-.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (-.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))))
(fma.f64 #s(literal -1 binary64) (exp.f64 (neg.f64 l)) (exp.f64 l))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)))
(/.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (+.f64 (exp.f64 (+.f64 l l)) (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (-.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l)))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (neg.f64 (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (neg.f64 (+.f64 (exp.f64 (+.f64 l l)) (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (neg.f64 (-.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))) (*.f64 (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (*.f64 (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (*.f64 (-.f64 (exp.f64 (*.f64 (*.f64 l #s(literal 3 binary64)) #s(literal 3 binary64))) (exp.f64 (*.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)) #s(literal 3 binary64)))) #s(literal 1 binary64)) (*.f64 (+.f64 (exp.f64 (*.f64 (+.f64 l l) #s(literal 3 binary64))) (+.f64 (exp.f64 (*.f64 (+.f64 (neg.f64 l) (neg.f64 l)) #s(literal 3 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))))
(/.f64 (*.f64 (-.f64 (exp.f64 (*.f64 (+.f64 l l) #s(literal 3 binary64))) (exp.f64 (*.f64 (+.f64 (neg.f64 l) (neg.f64 l)) #s(literal 3 binary64)))) #s(literal 1 binary64)) (*.f64 (+.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))))
(/.f64 (*.f64 (-.f64 (exp.f64 (*.f64 (+.f64 l l) #s(literal 3 binary64))) (exp.f64 (*.f64 (+.f64 (neg.f64 l) (neg.f64 l)) #s(literal 3 binary64)))) #s(literal 1 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (+.f64 l l) (+.f64 l l))) (+.f64 (exp.f64 (+.f64 (+.f64 (neg.f64 l) (neg.f64 l)) (+.f64 (neg.f64 l) (neg.f64 l)))) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (+.f64 l l) (+.f64 l l))) (exp.f64 (+.f64 (+.f64 (neg.f64 l) (neg.f64 l)) (+.f64 (neg.f64 l) (neg.f64 l))))) #s(literal 1 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))))) (neg.f64 (neg.f64 (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (neg.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 2 binary64))) #s(literal -2 binary64))
(/.f64 (+.f64 (neg.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (exp.f64 (*.f64 l #s(literal 3 binary64)))) (+.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (-.f64 (exp.f64 (+.f64 l l)) (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) (exp.f64 l)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))) #s(literal 3 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))) (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))) (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))) (*.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))) (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) #s(literal 3 binary64)) (pow.f64 (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) #s(literal 3 binary64))) (fma.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (fma.f64 (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (*.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))))
(pow.f64 (/.f64 (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) #s(literal -1 binary64))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(*.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))))
(*.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(*.f64 (cosh.f64 l) (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cosh.f64 l)))
(-.f64 (/.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 (exp.f64 (neg.f64 l)) #s(literal 2 binary64)))
(-.f64 (/.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))) #s(literal 2 binary64)) (/.f64 (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))) #s(literal 2 binary64)))
(-.f64 (/.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) #s(literal 2 binary64)) (/.f64 (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) #s(literal 2 binary64)))
(-.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)))) (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)))))
(-.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))
(sinh.f64 l)
(/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(/.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))))
(/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))
(/.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 (neg.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (/.f64 (exp.f64 l) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (exp.f64 (neg.f64 l)) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 (exp.f64 l) #s(literal 2 binary64)) (fma.f64 (/.f64 (exp.f64 (neg.f64 l)) #s(literal 2 binary64)) (/.f64 (exp.f64 (neg.f64 l)) #s(literal 2 binary64)) (*.f64 (/.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 (exp.f64 (neg.f64 l)) #s(literal 2 binary64))))))
(pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #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))
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 1/2 binary64))
(*.f64 (cosh.f64 l) (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(*.f64 (/.f64 (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) U))
(+.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))))
(+.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U)
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64))))))) (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U)))
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64))))))) (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))))))
(fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) U)
(fma.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) U)
(fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J)) U)
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(fma.f64 (*.f64 l J) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) U)
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) l) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) l)) J U)
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 l J)) #s(literal 2 binary64) U)
(fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) l U)
(fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U)
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J)))))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 U U)))))
(/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J)))))))
(/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) #s(literal 3 binary64))) (fma.f64 U U (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64))))))) (*.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J)))))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 U U))))))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 U U))) (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U))
(/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))))))))
(/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U U (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64))))))) (*.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 U U)))) (neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U)))
(/.f64 (-.f64 (*.f64 U U) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))))) (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64))))))) (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U)) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U) (*.f64 U U))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U) (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) #s(literal 9 binary64)) (*.f64 (*.f64 U (*.f64 U U)) (*.f64 (*.f64 U U) (*.f64 (*.f64 U U) (*.f64 U U))))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) #s(literal 6 binary64)) (-.f64 (*.f64 (*.f64 U U) (*.f64 (*.f64 U U) (*.f64 U U))) (pow.f64 (*.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J)))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) #s(literal 6 binary64)) (*.f64 (*.f64 U U) (*.f64 (*.f64 U U) (*.f64 U U)))) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) #s(literal 3 binary64)) (*.f64 U (*.f64 U U))) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) #s(literal 6 binary64)) (*.f64 (*.f64 U U) (*.f64 (*.f64 U U) (*.f64 U U)))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) #s(literal 4 binary64)) (fma.f64 (*.f64 U U) (*.f64 U U) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64))))))) (*.f64 U U)))) (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U)))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) #s(literal 4 binary64)) (*.f64 (*.f64 U U) (*.f64 U U))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 U U)) (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U)))
(/.f64 (neg.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J)))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 U U))))) (neg.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U))))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64))))))))) (neg.f64 (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64))))))) (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 U U) (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U)) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64))))))) (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U)) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64))))))) (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U)) (fma.f64 (/.f64 (*.f64 U U) (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64))))))) (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J)))))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 U U)))) #s(literal -1 binary64))
(*.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 U U))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U)))
(cos.f64 (*.f64 K #s(literal 1/2 binary64)))
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) K)) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 K #s(literal -2 binary64)))
(neg.f64 (/.f64 K #s(literal -2 binary64)))
(/.f64 K #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) K))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) K) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 2 binary64) K))))
(/.f64 (neg.f64 K) #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) K)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 2 binary64) K) #s(literal 1 binary64))))
(/.f64 (neg.f64 (neg.f64 K)) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (neg.f64 K))) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) K) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 2 binary64) K) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 K #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) K)
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) K) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 K #s(literal 1/2 binary64)))
(*.f64 (neg.f64 K) #s(literal -1/2 binary64))
(+.f64 U (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) U)
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)))) (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))))
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)))) (-.f64 U (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))))
(fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) U)
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U (-.f64 U (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J))))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J))) (neg.f64 (*.f64 U U)))))
(/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J))))))
(/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 U U (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)))) (*.f64 U (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J))))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J))) (neg.f64 (*.f64 U U))))))
(/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J))) (neg.f64 (*.f64 U U))) (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)))
(/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)))))))
(/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U U (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)))) (*.f64 U (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))))))
(/.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J))) (neg.f64 (*.f64 U U)))) (neg.f64 (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J))))) (-.f64 U (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)))) (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) (*.f64 (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)) (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 9 binary64)) (*.f64 (*.f64 U (*.f64 U U)) (*.f64 (*.f64 U U) (*.f64 (*.f64 U U) (*.f64 U U))))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 6 binary64)) (-.f64 (*.f64 (*.f64 U U) (*.f64 (*.f64 U U) (*.f64 U U))) (pow.f64 (*.f64 U (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) #s(literal 3 binary64)))) (fma.f64 U (-.f64 U (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 6 binary64)) (*.f64 (*.f64 U U) (*.f64 (*.f64 U U) (*.f64 U U)))) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (*.f64 U (*.f64 U U))) (fma.f64 U (-.f64 U (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 6 binary64)) (*.f64 (*.f64 U U) (*.f64 (*.f64 U U) (*.f64 U U)))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (fma.f64 (*.f64 U U) (*.f64 U U) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)))) (*.f64 U U)))) (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 (*.f64 U U) (*.f64 U U))) #s(literal 1 binary64)) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J))) (*.f64 U U)) (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 U (-.f64 U (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J))) (neg.f64 (*.f64 U U))))) (neg.f64 (neg.f64 (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)))))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)))))) (neg.f64 (-.f64 U (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)))) (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 U U) (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)))) (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)))) (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) (fma.f64 (/.f64 (*.f64 U U) (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) (*.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)))) (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)))))))
(pow.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J))))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J))) (neg.f64 (*.f64 U U)))) #s(literal -1 binary64))
(*.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 U (-.f64 U (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)))))))
(*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J))) (neg.f64 (*.f64 U U))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))))
(*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J))
(+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 (*.f64 l J) (*.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 l J)))
(+.f64 (*.f64 l (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l)))) (*.f64 #s(literal 2 binary64) (*.f64 l J)))
(+.f64 (*.f64 (*.f64 l J) (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (*.f64 #s(literal 2 binary64) (*.f64 l J)))
(+.f64 (*.f64 (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) l) (*.f64 #s(literal 2 binary64) (*.f64 l J)))
(+.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J)))
(fma.f64 #s(literal 2 binary64) (*.f64 l J) (*.f64 (*.f64 l J) (*.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(fma.f64 #s(literal 2 binary64) (*.f64 l J) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 l J)))
(fma.f64 l (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 l J) (*.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(fma.f64 l (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 l J)))
(fma.f64 l (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (*.f64 #s(literal 2 binary64) (*.f64 l J)))
(fma.f64 J (*.f64 #s(literal 2 binary64) l) (*.f64 (*.f64 l J) (*.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(fma.f64 J (*.f64 #s(literal 2 binary64) l) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 l J)))
(fma.f64 (*.f64 #s(literal 2 binary64) l) J (*.f64 (*.f64 l J) (*.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(fma.f64 (*.f64 #s(literal 2 binary64) l) J (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 l J)))
(fma.f64 (*.f64 #s(literal 2 binary64) J) l (*.f64 (*.f64 l J) (*.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(fma.f64 (*.f64 #s(literal 2 binary64) J) l (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 l J)))
(fma.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 l J) (*.f64 #s(literal 2 binary64) (*.f64 l J)))
(fma.f64 (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) l (*.f64 #s(literal 2 binary64) (*.f64 l J)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) (*.f64 (*.f64 l J) (*.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 l J)))
(fma.f64 (*.f64 l J) (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 #s(literal 2 binary64) (*.f64 l J)))
(/.f64 (*.f64 (*.f64 l J) (fma.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l))) #s(literal 8 binary64))) (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (*.f64 (*.f64 l J) (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 l J) (fma.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l))) #s(literal 8 binary64)))) (neg.f64 (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 l J) (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64)))) (neg.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J))) (*.f64 l (*.f64 l l)) (pow.f64 (*.f64 (*.f64 l J) (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J)) (-.f64 (*.f64 (*.f64 (*.f64 l J) (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (*.f64 (*.f64 l J) (*.f64 #s(literal 1/3 binary64) (*.f64 l l)))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 (*.f64 l J) (*.f64 #s(literal 1/3 binary64) (*.f64 l l)))))))
(/.f64 (fma.f64 (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J))) (*.f64 l (*.f64 l l)) (pow.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 l J)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 l J)) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 l J))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 l J))))))
(/.f64 (+.f64 (pow.f64 (*.f64 l (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l)))) #s(literal 3 binary64)) (*.f64 (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J))) (*.f64 l (*.f64 l l)))) (fma.f64 (*.f64 l (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l)))) (*.f64 l (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l)))) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (*.f64 (*.f64 l (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l)))) (*.f64 #s(literal 2 binary64) (*.f64 l J))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l J) (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) #s(literal 3 binary64)) (*.f64 (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J))) (*.f64 l (*.f64 l l)))) (fma.f64 (*.f64 (*.f64 l J) (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (*.f64 (*.f64 l J) (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (*.f64 (*.f64 (*.f64 l J) (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (*.f64 #s(literal 2 binary64) (*.f64 l J))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) l) #s(literal 3 binary64)) (*.f64 (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J))) (*.f64 l (*.f64 l l)))) (fma.f64 (*.f64 (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) l) (*.f64 (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) l) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (*.f64 (*.f64 (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) l) (*.f64 #s(literal 2 binary64) (*.f64 l J))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 l J)) #s(literal 3 binary64)) (*.f64 (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J))) (*.f64 l (*.f64 l l)))) (fma.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 l J)) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 l J)) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (*.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))))))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(*.f64 J (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) l))
(*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 l J))
(*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) l)
(*.f64 (*.f64 l J) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J)
(+.f64 (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))
(+.f64 (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)) (*.f64 #s(literal 2 binary64) J))
(-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 J J)) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J))))
(-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 J J)) (-.f64 (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (-.f64 (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))))
(fma.f64 #s(literal 2 binary64) J (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))
(fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))
(fma.f64 J #s(literal 2 binary64) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))
(fma.f64 (*.f64 l l) (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal 2 binary64) J))
(fma.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l l) (*.f64 #s(literal 2 binary64) J))
(fma.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) l (*.f64 #s(literal 2 binary64) J))
(fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal 2 binary64) J))
(fma.f64 (*.f64 l (*.f64 l J)) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 #s(literal 2 binary64) J))
(fma.f64 (*.f64 (*.f64 l l) J) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 #s(literal 2 binary64) J))
(fma.f64 (*.f64 (*.f64 l l) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) J (*.f64 #s(literal 2 binary64) J))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l))) (*.f64 (*.f64 #s(literal 2 binary64) J) (-.f64 (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l))))) (fma.f64 (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)) (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J)) (*.f64 (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J)))))
(/.f64 (fma.f64 (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)) (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J)))) (fma.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l))) (*.f64 (*.f64 #s(literal 2 binary64) J) (-.f64 (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l))))))
(/.f64 (fma.f64 (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)) (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J)))) (fma.f64 #s(literal 4 binary64) (*.f64 J J) (-.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l))) (*.f64 (*.f64 #s(literal 2 binary64) J) (-.f64 (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l))))) (fma.f64 (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)) (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J)) (*.f64 (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J))))))
(/.f64 (*.f64 (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J))) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J)))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)) (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J))))) (neg.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l))) (*.f64 (*.f64 #s(literal 2 binary64) J) (-.f64 (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)) (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J))))) (neg.f64 (fma.f64 #s(literal 4 binary64) (*.f64 J J) (-.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J)))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J)))) (neg.f64 (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J))))
(/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 J J)) (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l))))) (-.f64 (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J))) (*.f64 (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J)) (*.f64 #s(literal 4 binary64) (*.f64 J J)))) (*.f64 (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J)) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)) #s(literal 9 binary64)) (*.f64 (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J))) (*.f64 (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J))) (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J)))))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)) #s(literal 6 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J))) (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J)))) (*.f64 (*.f64 (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)) (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l))))) (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J)))))) (fma.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l))) (*.f64 (*.f64 #s(literal 2 binary64) J) (-.f64 (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)) #s(literal 6 binary64)) (*.f64 (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J))) (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J))))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)) (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l))))) (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J)))) (fma.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l))) (*.f64 (*.f64 #s(literal 2 binary64) J) (-.f64 (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)) #s(literal 6 binary64)) (*.f64 (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J))) (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J))))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 J J)) (*.f64 #s(literal 4 binary64) (*.f64 J J)) (*.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (*.f64 #s(literal 4 binary64) (*.f64 J J))))) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l))))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 J J)) (*.f64 #s(literal 4 binary64) (*.f64 J J)))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l))) (*.f64 #s(literal 4 binary64) (*.f64 J J))) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)) (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J)))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l))) (*.f64 (*.f64 #s(literal 2 binary64) J) (-.f64 (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J)))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 J J)) (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))))) (neg.f64 (-.f64 (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 J J)) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J))) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J))) (fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 J J)) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 J J)) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J))) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 J J)) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J)))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l))) (*.f64 (*.f64 #s(literal 2 binary64) J) (-.f64 (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l))))) (fma.f64 (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)) (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J)) (*.f64 (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J)))) #s(literal -1 binary64))
(*.f64 (fma.f64 (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)) (*.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))) (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 l l) (*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l))) (*.f64 (*.f64 #s(literal 2 binary64) J) (-.f64 (*.f64 #s(literal 2 binary64) J) (*.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)))))))
(*.f64 (*.f64 (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 l J) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l) (*.f64 #s(literal -2 binary64) J))))
(+.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))))
(+.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) U)
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U))))
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))) (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))))))
(fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) U)
(fma.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) (neg.f64 (*.f64 U U)))))
(/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))))))
(/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) #s(literal 3 binary64))) (fma.f64 U U (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) U)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) (neg.f64 (*.f64 U U))))))
(/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) (neg.f64 (*.f64 U U))) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U)))
(/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))))))
(/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U U (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) U))))))
(/.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) (neg.f64 (*.f64 U U)))) (neg.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))))) (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U))) (*.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U)) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) #s(literal 9 binary64)) (*.f64 (*.f64 U (*.f64 U U)) (*.f64 (*.f64 U U) (*.f64 (*.f64 U U) (*.f64 U U))))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) #s(literal 6 binary64)) (-.f64 (*.f64 (*.f64 U U) (*.f64 (*.f64 U U) (*.f64 U U))) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) U)) #s(literal 3 binary64)))) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) #s(literal 6 binary64)) (*.f64 (*.f64 U U) (*.f64 (*.f64 U U) (*.f64 U U)))) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) #s(literal 3 binary64)) (*.f64 U (*.f64 U U))) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) #s(literal 6 binary64)) (*.f64 (*.f64 U U) (*.f64 (*.f64 U U) (*.f64 U U)))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) #s(literal 4 binary64)) (fma.f64 (*.f64 U U) (*.f64 U U) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))) (*.f64 U U)))) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) #s(literal 4 binary64)) (*.f64 (*.f64 U U) (*.f64 U U))) #s(literal 1 binary64)) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) (*.f64 U U)) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) (neg.f64 (*.f64 U U))))) (neg.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U)))))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))))) (neg.f64 (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U))) (fma.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U))) (*.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U)))))))
(pow.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) (neg.f64 (*.f64 U U)))) #s(literal -1 binary64))
(*.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))))))
(*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))) (neg.f64 (*.f64 U U))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (neg.f64 U))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))))
(*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J)) (*.f64 #s(literal 2 binary64) J))))
(+.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))
(+.f64 (neg.f64 (exp.f64 (neg.f64 l))) (exp.f64 l))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(-.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))) (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))))
(-.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(-.f64 (/.f64 (exp.f64 (+.f64 l l)) (-.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (-.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))))
(fma.f64 #s(literal -1 binary64) (exp.f64 (neg.f64 l)) (exp.f64 l))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)))
(/.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (+.f64 (exp.f64 (+.f64 l l)) (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (-.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l)))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (neg.f64 (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (neg.f64 (+.f64 (exp.f64 (+.f64 l l)) (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (neg.f64 (-.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))) (*.f64 (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (*.f64 (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (*.f64 (-.f64 (exp.f64 (*.f64 (*.f64 l #s(literal 3 binary64)) #s(literal 3 binary64))) (exp.f64 (*.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)) #s(literal 3 binary64)))) #s(literal 1 binary64)) (*.f64 (+.f64 (exp.f64 (*.f64 (+.f64 l l) #s(literal 3 binary64))) (+.f64 (exp.f64 (*.f64 (+.f64 (neg.f64 l) (neg.f64 l)) #s(literal 3 binary64))) #s(literal 1 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))))
(/.f64 (*.f64 (-.f64 (exp.f64 (*.f64 (+.f64 l l) #s(literal 3 binary64))) (exp.f64 (*.f64 (+.f64 (neg.f64 l) (neg.f64 l)) #s(literal 3 binary64)))) #s(literal 1 binary64)) (*.f64 (+.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))))
(/.f64 (*.f64 (-.f64 (exp.f64 (*.f64 (+.f64 l l) #s(literal 3 binary64))) (exp.f64 (*.f64 (+.f64 (neg.f64 l) (neg.f64 l)) #s(literal 3 binary64)))) #s(literal 1 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (+.f64 l l) (+.f64 l l))) (+.f64 (exp.f64 (+.f64 (+.f64 (neg.f64 l) (neg.f64 l)) (+.f64 (neg.f64 l) (neg.f64 l)))) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (+.f64 l l) (+.f64 l l))) (exp.f64 (+.f64 (+.f64 (neg.f64 l) (neg.f64 l)) (+.f64 (neg.f64 l) (neg.f64 l))))) #s(literal 1 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))))) (neg.f64 (neg.f64 (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (neg.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 2 binary64))) #s(literal -2 binary64))
(/.f64 (+.f64 (neg.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (exp.f64 (*.f64 l #s(literal 3 binary64)))) (+.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (-.f64 (exp.f64 (+.f64 l l)) (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) (exp.f64 l)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))) #s(literal 3 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))) (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))) (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))) (*.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))) (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) #s(literal 3 binary64)) (pow.f64 (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) #s(literal 3 binary64))) (fma.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (fma.f64 (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (*.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))))
(pow.f64 (/.f64 (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) #s(literal -1 binary64))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(*.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64))))
(*.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(*.f64 (cosh.f64 l) (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cosh.f64 l)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) U))
(+.f64 U (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)))
(+.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64)) (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U))))
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)))) (/.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64)) (-.f64 U (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)))))
(fma.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J) U)
(fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) U)
(fma.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l)) U)
(fma.f64 (*.f64 #s(literal 2 binary64) J) (sinh.f64 l) U)
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J U)
(fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U)
(fma.f64 (/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 2 binary64)) (/.f64 J (cosh.f64 l)) U)
(fma.f64 (/.f64 J #s(literal 2 binary64)) (/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (cosh.f64 l)) U)
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U (-.f64 U (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J))) (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U)) (-.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64)) (*.f64 U U))))
(/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J))) (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64))))
(/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 J U)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J))) (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U)) (-.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64)) (*.f64 U U)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64)) (*.f64 U U)) (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U)))
(/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J))) (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U U (-.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 J U))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64))) (-.f64 U (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64)) (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U))) (*.f64 (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U)) (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 9 binary64)) (*.f64 (*.f64 U (*.f64 U U)) (*.f64 (*.f64 U U) (*.f64 (*.f64 U U) (*.f64 U U))))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 6 binary64)) (-.f64 (*.f64 (*.f64 U U) (*.f64 (*.f64 U U) (*.f64 U U))) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 J U)) #s(literal 3 binary64)))) (fma.f64 U (-.f64 U (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J))) (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 6 binary64)) (*.f64 (*.f64 U U) (*.f64 (*.f64 U U) (*.f64 U U)))) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 3 binary64)) (*.f64 U (*.f64 U U))) (fma.f64 U (-.f64 U (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J))) (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 6 binary64)) (*.f64 (*.f64 U U) (*.f64 (*.f64 U U) (*.f64 U U)))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 4 binary64)) (fma.f64 (*.f64 U U) (*.f64 U U) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 J U)) #s(literal 2 binary64)))) (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 4 binary64)) (*.f64 (*.f64 U U) (*.f64 U U))) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (*.f64 U U)) (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 U (-.f64 U (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J))) (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64)) (*.f64 U U)))) (neg.f64 (neg.f64 (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U)))))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64)))) (neg.f64 (-.f64 U (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64)) (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 U U) (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64)) (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U))) (/.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64)) (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U))) (fma.f64 (/.f64 (*.f64 U U) (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U))) (*.f64 (/.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64)) (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U)))))))
(pow.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J))) (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U)) (-.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64)) (*.f64 U U))) #s(literal -1 binary64))
(*.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 U (-.f64 U (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J))) (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64)) (*.f64 U U)) (/.f64 #s(literal 1 binary64) (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) (neg.f64 U))))
(exp.f64 l)
(cos.f64 (*.f64 K #s(literal 1/2 binary64)))
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(+.f64 (*.f64 #s(literal 2 binary64) J) (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(+.f64 (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (*.f64 #s(literal 2 binary64) J))
(-.f64 (/.f64 (*.f64 (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l)))) (-.f64 (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (*.f64 #s(literal 2 binary64) J))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 J J)) (-.f64 (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (*.f64 #s(literal 2 binary64) J))))
(fma.f64 #s(literal 2 binary64) J (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(fma.f64 l (*.f64 (*.f64 l #s(literal 1/3 binary64)) J) (*.f64 #s(literal 2 binary64) J))
(fma.f64 J #s(literal 2 binary64) (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(fma.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 #s(literal 2 binary64) J))
(fma.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 l J) (*.f64 #s(literal 2 binary64) J))
(fma.f64 (*.f64 l l) (*.f64 J #s(literal 1/3 binary64)) (*.f64 #s(literal 2 binary64) J))
(fma.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) J (*.f64 #s(literal 2 binary64) J))
(fma.f64 (*.f64 l J) (*.f64 l #s(literal 1/3 binary64)) (*.f64 #s(literal 2 binary64) J))
(fma.f64 (*.f64 J (*.f64 l l)) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J))
(fma.f64 (*.f64 J (*.f64 l #s(literal 1/3 binary64))) l (*.f64 #s(literal 2 binary64) J))
(/.f64 (fma.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l)))) (*.f64 J (*.f64 J J)) (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J)))) (fma.f64 (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 J J)) (*.f64 (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (*.f64 #s(literal 2 binary64) J)))))
(/.f64 (-.f64 (*.f64 (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l)))) (*.f64 #s(literal 4 binary64) (*.f64 J J))) (-.f64 (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (*.f64 #s(literal 2 binary64) J)))
(/.f64 (*.f64 J (fma.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l))) #s(literal 8 binary64))) (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (*.f64 J (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64)))
(/.f64 (*.f64 (fma.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l))) #s(literal 8 binary64)) J) (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (*.f64 (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64)) J) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64)))
(/.f64 (neg.f64 (fma.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l)))) (*.f64 J (*.f64 J J)) (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J))))) (neg.f64 (fma.f64 (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 J J)) (*.f64 (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (*.f64 #s(literal 2 binary64) J))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l)))) (*.f64 #s(literal 4 binary64) (*.f64 J J)))) (neg.f64 (-.f64 (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (*.f64 #s(literal 2 binary64) J))))
(/.f64 (neg.f64 (*.f64 J (fma.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l))) #s(literal 8 binary64)))) (neg.f64 (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))))
(/.f64 (neg.f64 (*.f64 J (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64)))) (neg.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l))) #s(literal 8 binary64)) J)) (neg.f64 (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64)) J)) (neg.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64))))
(/.f64 (fma.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J)) (*.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l)))) (*.f64 J (*.f64 J J)))) (fma.f64 #s(literal 4 binary64) (*.f64 J J) (-.f64 (*.f64 (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l)))) (*.f64 (*.f64 #s(literal 2 binary64) J) (*.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l)))))))
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) J)
(*.f64 l #s(literal 1/3 binary64))
(*.f64 #s(literal 1/3 binary64) l)
(+.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 l l)))
(+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64))
(-.f64 (/.f64 (*.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64))) (/.f64 #s(literal 4 binary64) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64))))
(-.f64 (/.f64 #s(literal 4 binary64) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 l l)))) (/.f64 (*.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 l l)))))
(fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))
(fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))
(fma.f64 (*.f64 l #s(literal 1/3 binary64)) l #s(literal 2 binary64))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))) (fma.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l))) #s(literal 8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64)) (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64))))
(/.f64 (fma.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l))) #s(literal 8 binary64)) (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (fma.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l))) #s(literal 8 binary64)) (+.f64 #s(literal 4 binary64) (-.f64 (*.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))) (fma.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l))) #s(literal 8 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64)) (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64)))))
(/.f64 (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64)) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64)))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l))) #s(literal 8 binary64))) (neg.f64 (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l))) #s(literal 8 binary64))) (neg.f64 (+.f64 #s(literal 4 binary64) (-.f64 (*.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64))) (neg.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64))))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64))) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64)) #s(literal 4 binary64))) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64)) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l)))) (*.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l)))) (*.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l))))) #s(literal 512 binary64)) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l)))) (*.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l)))) (-.f64 #s(literal 64 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l))) #s(literal 8/27 binary64)))) (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l)))) (*.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l))))) #s(literal 64 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l)))) #s(literal 8 binary64)) (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l)))) (*.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l))))) #s(literal 64 binary64)) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (*.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (+.f64 #s(literal 16 binary64) (*.f64 (*.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) #s(literal 4 binary64)))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (*.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)))) #s(literal 16 binary64)) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 4 binary64)) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l))) #s(literal 8 binary64)))) (neg.f64 (neg.f64 (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64)))) (neg.f64 (neg.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l))))) (neg.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 l l)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 4 binary64) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64))) (/.f64 (*.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64))) (fma.f64 (/.f64 #s(literal 4 binary64) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64))) (/.f64 #s(literal 4 binary64) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64))) (*.f64 (/.f64 (*.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64))) (/.f64 #s(literal 4 binary64) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64)))))))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))) (fma.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l))) #s(literal 8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64)) (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64))) #s(literal -1 binary64))
(*.f64 (fma.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l))) #s(literal 8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))))
(*.f64 (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64))))
(+.f64 (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) (*.f64 J #s(literal 1/3 binary64)))
(+.f64 (*.f64 J #s(literal 1/3 binary64)) (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)))
(-.f64 (/.f64 (*.f64 (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J))) (-.f64 (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) (*.f64 J #s(literal 1/3 binary64)))) (/.f64 (*.f64 (*.f64 J #s(literal 1/3 binary64)) (*.f64 J #s(literal 1/3 binary64))) (-.f64 (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) (*.f64 J #s(literal 1/3 binary64)))))
(fma.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J) (*.f64 J #s(literal 1/3 binary64)))
(fma.f64 J #s(literal 1/3 binary64) (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)))
(fma.f64 J (*.f64 l (*.f64 l #s(literal 1/60 binary64))) (*.f64 J #s(literal 1/3 binary64)))
(fma.f64 #s(literal 1/3 binary64) J (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)))
(fma.f64 (*.f64 l l) (*.f64 #s(literal 1/60 binary64) J) (*.f64 J #s(literal 1/3 binary64)))
(fma.f64 #s(literal 1/60 binary64) (*.f64 (*.f64 l l) J) (*.f64 J #s(literal 1/3 binary64)))
(fma.f64 (*.f64 l (*.f64 l #s(literal 1/60 binary64))) J (*.f64 J #s(literal 1/3 binary64)))
(fma.f64 (*.f64 l J) (*.f64 l #s(literal 1/60 binary64)) (*.f64 J #s(literal 1/3 binary64)))
(fma.f64 (*.f64 J (*.f64 l l)) #s(literal 1/60 binary64) (*.f64 J #s(literal 1/3 binary64)))
(fma.f64 (*.f64 J #s(literal 1/60 binary64)) (*.f64 l l) (*.f64 J #s(literal 1/3 binary64)))
(/.f64 (fma.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64))) (*.f64 J (*.f64 J J)) (*.f64 #s(literal 1/27 binary64) (*.f64 J (*.f64 J J)))) (fma.f64 (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) (-.f64 (*.f64 (*.f64 J #s(literal 1/3 binary64)) (*.f64 J #s(literal 1/3 binary64))) (*.f64 (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) (*.f64 J #s(literal 1/3 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J))) (*.f64 (*.f64 J #s(literal 1/3 binary64)) (*.f64 J #s(literal 1/3 binary64)))) (-.f64 (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) (*.f64 J #s(literal 1/3 binary64))))
(/.f64 (*.f64 J (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64))) (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) #s(literal 1/180 binary64)))))
(/.f64 (*.f64 J (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -1/9 binary64))) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)))
(/.f64 (*.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)) J) (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) #s(literal 1/180 binary64)))))
(/.f64 (*.f64 (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -1/9 binary64)) J) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64))) (*.f64 J (*.f64 J J)) (*.f64 #s(literal 1/27 binary64) (*.f64 J (*.f64 J J))))) (neg.f64 (fma.f64 (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) (-.f64 (*.f64 (*.f64 J #s(literal 1/3 binary64)) (*.f64 J #s(literal 1/3 binary64))) (*.f64 (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) (*.f64 J #s(literal 1/3 binary64)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J))) (*.f64 (*.f64 J #s(literal 1/3 binary64)) (*.f64 J #s(literal 1/3 binary64))))) (neg.f64 (-.f64 (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) (*.f64 J #s(literal 1/3 binary64)))))
(/.f64 (neg.f64 (*.f64 J (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)))) (neg.f64 (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (*.f64 J (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -1/9 binary64)))) (neg.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)) J)) (neg.f64 (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -1/9 binary64)) J)) (neg.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))))
(/.f64 (fma.f64 #s(literal 1/27 binary64) (*.f64 J (*.f64 J J)) (*.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64))) (*.f64 J (*.f64 J J)))) (fma.f64 (*.f64 J #s(literal 1/3 binary64)) (*.f64 J #s(literal 1/3 binary64)) (-.f64 (*.f64 (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J))) (*.f64 (*.f64 J #s(literal 1/3 binary64)) (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J))))))
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))
(*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) J)
(+.f64 (*.f64 l (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J))) (*.f64 l (*.f64 J #s(literal 1/3 binary64))))
(+.f64 (*.f64 (*.f64 l J) #s(literal 1/3 binary64)) (*.f64 (*.f64 l J) (*.f64 l (*.f64 l #s(literal 1/60 binary64)))))
(+.f64 (*.f64 (*.f64 l J) (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 (*.f64 l J) #s(literal 1/3 binary64)))
(+.f64 (*.f64 (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) l) (*.f64 (*.f64 J #s(literal 1/3 binary64)) l))
(+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l J)) (*.f64 (*.f64 l (*.f64 l #s(literal 1/60 binary64))) (*.f64 l J)))
(+.f64 (*.f64 (*.f64 l (*.f64 l #s(literal 1/60 binary64))) (*.f64 l J)) (*.f64 #s(literal 1/3 binary64) (*.f64 l J)))
(fma.f64 l (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) (*.f64 l (*.f64 J #s(literal 1/3 binary64))))
(fma.f64 #s(literal 1/3 binary64) (*.f64 l J) (*.f64 (*.f64 l (*.f64 l #s(literal 1/60 binary64))) (*.f64 l J)))
(fma.f64 (*.f64 l (*.f64 l #s(literal 1/60 binary64))) (*.f64 l J) (*.f64 #s(literal 1/3 binary64) (*.f64 l J)))
(fma.f64 (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) l (*.f64 (*.f64 J #s(literal 1/3 binary64)) l))
(fma.f64 (*.f64 l J) #s(literal 1/3 binary64) (*.f64 (*.f64 l J) (*.f64 l (*.f64 l #s(literal 1/60 binary64)))))
(fma.f64 (*.f64 l J) (*.f64 l (*.f64 l #s(literal 1/60 binary64))) (*.f64 (*.f64 l J) #s(literal 1/3 binary64)))
(/.f64 (*.f64 (*.f64 l J) (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64))) (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) #s(literal 1/180 binary64)))))
(/.f64 (*.f64 (*.f64 l J) (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -1/9 binary64))) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 l J) (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)))) (neg.f64 (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 l J) (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -1/9 binary64)))) (neg.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 l (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J))) #s(literal 3 binary64)) (pow.f64 (*.f64 l (*.f64 J #s(literal 1/3 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 l (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J))) (*.f64 l (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J))) (-.f64 (*.f64 (*.f64 l (*.f64 J #s(literal 1/3 binary64))) (*.f64 l (*.f64 J #s(literal 1/3 binary64)))) (*.f64 (*.f64 l (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J))) (*.f64 l (*.f64 J #s(literal 1/3 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l J) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 l J) (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 l J) #s(literal 1/3 binary64)) (*.f64 (*.f64 l J) #s(literal 1/3 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 l J) (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 (*.f64 l J) (*.f64 l (*.f64 l #s(literal 1/60 binary64))))) (*.f64 (*.f64 (*.f64 l J) #s(literal 1/3 binary64)) (*.f64 (*.f64 l J) (*.f64 l (*.f64 l #s(literal 1/60 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l J) (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 l J) #s(literal 1/3 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 l J) (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 (*.f64 l J) (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 l J) #s(literal 1/3 binary64)) (*.f64 (*.f64 l J) #s(literal 1/3 binary64))) (*.f64 (*.f64 (*.f64 l J) (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 (*.f64 l J) #s(literal 1/3 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) l) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 J #s(literal 1/3 binary64)) l) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) l) (*.f64 (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) l) (-.f64 (*.f64 (*.f64 (*.f64 J #s(literal 1/3 binary64)) l) (*.f64 (*.f64 J #s(literal 1/3 binary64)) l)) (*.f64 (*.f64 (*.f64 l (*.f64 (*.f64 l #s(literal 1/60 binary64)) J)) l) (*.f64 (*.f64 J #s(literal 1/3 binary64)) l)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l J)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 l (*.f64 l #s(literal 1/60 binary64))) (*.f64 l J)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l J)) (*.f64 #s(literal 1/3 binary64) (*.f64 l J)) (-.f64 (*.f64 (*.f64 (*.f64 l (*.f64 l #s(literal 1/60 binary64))) (*.f64 l J)) (*.f64 (*.f64 l (*.f64 l #s(literal 1/60 binary64))) (*.f64 l J))) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l J)) (*.f64 (*.f64 l (*.f64 l #s(literal 1/60 binary64))) (*.f64 l J))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l (*.f64 l #s(literal 1/60 binary64))) (*.f64 l J)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l J)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 l (*.f64 l #s(literal 1/60 binary64))) (*.f64 l J)) (*.f64 (*.f64 l (*.f64 l #s(literal 1/60 binary64))) (*.f64 l J)) (-.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l J)) (*.f64 #s(literal 1/3 binary64) (*.f64 l J))) (*.f64 (*.f64 (*.f64 l (*.f64 l #s(literal 1/60 binary64))) (*.f64 l J)) (*.f64 #s(literal 1/3 binary64) (*.f64 l J))))))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))
(*.f64 J (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l))
(*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l J))
(*.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) l)
(*.f64 (*.f64 l J) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))
(*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) J)
(+.f64 #s(literal 1/3 binary64) (*.f64 l (*.f64 l #s(literal 1/60 binary64))))
(+.f64 (*.f64 l (*.f64 l #s(literal 1/60 binary64))) #s(literal 1/3 binary64))
(-.f64 (/.f64 (*.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))) (/.f64 #s(literal 1/9 binary64) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))))
(-.f64 (/.f64 #s(literal 1/9 binary64) (-.f64 #s(literal 1/3 binary64) (*.f64 l (*.f64 l #s(literal 1/60 binary64))))) (/.f64 (*.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (-.f64 #s(literal 1/3 binary64) (*.f64 l (*.f64 l #s(literal 1/60 binary64))))))
(fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64))
(fma.f64 (*.f64 l #s(literal 1/60 binary64)) l #s(literal 1/3 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) #s(literal 1/180 binary64)))) (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)) (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -1/9 binary64))))
(/.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)) (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) #s(literal 1/180 binary64)))))
(/.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)) (+.f64 #s(literal 1/9 binary64) (-.f64 (*.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (*.f64 (*.f64 l l) #s(literal 1/180 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) #s(literal 1/180 binary64)))) (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)) (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -1/9 binary64)))))
(/.f64 (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -1/9 binary64)) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)))
(/.f64 (neg.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64))) (neg.f64 (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64))) (neg.f64 (+.f64 #s(literal 1/9 binary64) (-.f64 (*.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (*.f64 (*.f64 l l) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -1/9 binary64))) (neg.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))))
(/.f64 (-.f64 #s(literal 1/9 binary64) (*.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)))) (-.f64 #s(literal 1/3 binary64) (*.f64 l (*.f64 l #s(literal 1/60 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)) #s(literal 1/9 binary64))) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64))) (*.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64))) (*.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)))) #s(literal 1/19683 binary64)) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64))) (*.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64))) (-.f64 #s(literal 1/729 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 l l) (*.f64 l l))) #s(literal 1/5832000 binary64)))) (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) #s(literal 1/180 binary64))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64))) (*.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)))) #s(literal 1/729 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64))) #s(literal 1/27 binary64)) (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) #s(literal 1/180 binary64))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64))) (*.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)))) #s(literal 1/729 binary64)) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (*.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (+.f64 #s(literal 1/81 binary64) (*.f64 (*.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) #s(literal 1/9 binary64)))) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (*.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)))) #s(literal 1/81 binary64)) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/9 binary64)) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)))) (neg.f64 (neg.f64 (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) #s(literal 1/180 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -1/9 binary64)))) (neg.f64 (neg.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/9 binary64) (*.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l))))) (neg.f64 (-.f64 #s(literal 1/3 binary64) (*.f64 l (*.f64 l #s(literal 1/60 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1/9 binary64) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))) (/.f64 (*.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))) (fma.f64 (/.f64 #s(literal 1/9 binary64) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))) (/.f64 #s(literal 1/9 binary64) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))) (*.f64 (/.f64 (*.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l))) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))) (/.f64 #s(literal 1/9 binary64) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)))))))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) #s(literal 1/180 binary64)))) (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)) (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -1/9 binary64))) #s(literal -1 binary64))
(*.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) #s(literal 1/180 binary64))))))
(*.f64 (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -1/9 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))))

eval160.0ms (1.2%)

Memory
28.7MiB live, 457.8MiB allocated
Compiler

Compiled 36 730 to 2 827 computations (92.3% saved)

prune157.0ms (1.2%)

Memory
-35.9MiB live, 295.2MiB allocated
Pruning

20 alts after pruning (20 fresh and 0 done)

PrunedKeptTotal
New1 218191 237
Fresh718
Picked505
Done000
Total1 230201 250
Accuracy
100.0%
Counts
1 250 → 20
Alt Table
Click to see full alt table
StatusAccuracyProgram
68.9%
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U)
96.9%
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
94.4%
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
65.3%
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
87.8%
(fma.f64 #s(approx (* (* 2 (sinh l)) (cos (* K 1/2))) (*.f64 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) J U)
99.9%
(+.f64 (*.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
65.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U))
83.6%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))
43.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (cos (* 1/2 K)) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)) #s(literal 1 binary64))) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
62.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) (+.f64 l #s(literal 1 binary64))) (exp.f64 (neg.f64 l))) U))
57.8%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))
81.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
79.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
73.9%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
54.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
46.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 U U))))))
48.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
34.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 #s(literal 2 binary64) (*.f64 J l) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 J (*.f64 l (*.f64 K K))) (fma.f64 #s(literal -1/23040 binary64) (*.f64 K K) #s(literal 1/192 binary64)) (*.f64 J (*.f64 l #s(literal -1/4 binary64)))) U))))
29.0%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
72.8%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)))
Compiler

Compiled 856 to 524 computations (38.8% saved)

simplify221.0ms (1.7%)

Memory
10.8MiB live, 401.9MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
cost-diff0
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l)
cost-diff0
(fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U)
cost-diff0
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U))
cost-diff0
#s(approx (exp l) #s(literal 1 binary64))
cost-diff0
(-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))
cost-diff0
(fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U)
cost-diff0
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))
cost-diff0
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
cost-diff0
#s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64))))
cost-diff0
(fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U)
cost-diff0
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
cost-diff0
(*.f64 #s(literal 2 binary64) l)
cost-diff0
#s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))
cost-diff0
(fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U)
cost-diff0
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
cost-diff0
(*.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
cost-diff128
(+.f64 (*.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
cost-diff320
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))
cost-diff768
(/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
Rules
5 510×lower-fma.f32
5 498×lower-fma.f64
3 456×lower-*.f32
3 438×lower-*.f64
1 606×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
050373
081365
1141365
2268365
3610345
41304345
53179345
08033340
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(+.f64 (*.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(*.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
J
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))
#s(literal 1 binary64)
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
#s(literal 2 binary64)
(sinh.f64 l)
l
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal 2 binary64))
K
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
(fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U)
J
#s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))
(*.f64 #s(literal 2 binary64) l)
#s(literal 2 binary64)
l
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
(fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U)
J
#s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
l
(fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64))
(*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(*.f64 l l)
#s(literal 1/60 binary64)
#s(literal 1/3 binary64)
#s(literal 2 binary64)
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))
(fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U)
J
(-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))
#s(approx (exp l) #s(literal 1 binary64))
#s(literal 1 binary64)
(exp.f64 (neg.f64 l))
(neg.f64 l)
l
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U))
(fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U)
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l)
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
J
(cos.f64 (*.f64 K #s(literal 1/2 binary64)))
(*.f64 K #s(literal 1/2 binary64))
K
#s(literal 1/2 binary64)
l
#s(literal 2 binary64)
U
Outputs
(+.f64 (*.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l))) U)
(*.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 J (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l)))
J
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))
(/.f64 #s(literal 1/2 binary64) (sinh.f64 l))
#s(literal 1 binary64)
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
#s(literal 2 binary64)
(sinh.f64 l)
l
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal 2 binary64))
K
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
(fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U)
J
#s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))
(*.f64 #s(literal 2 binary64) l)
#s(literal 2 binary64)
l
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
(fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U)
(fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U)
J
#s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64))))
#s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) #s(literal 2 binary64)))
l
(fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64))
(fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) #s(literal 2 binary64))
(*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))
(*.f64 l l)
#s(literal 1/60 binary64)
#s(literal 1/3 binary64)
#s(literal 2 binary64)
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))
(fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U)
J
(-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))
#s(approx (exp l) #s(literal 1 binary64))
#s(literal 1 binary64)
(exp.f64 (neg.f64 l))
(neg.f64 l)
l
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) U))
(fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U)
(fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) U)
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l)
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
J
(cos.f64 (*.f64 K #s(literal 1/2 binary64)))
(*.f64 K #s(literal 1/2 binary64))
K
#s(literal 1/2 binary64)
l
#s(literal 2 binary64)
U

localize511.0ms (3.9%)

Memory
23.0MiB live, 857.9MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy100.0%
(fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U)
accuracy99.9%
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l)
accuracy99.9%
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
accuracy99.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U))
accuracy100.0%
(fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U)
accuracy97.7%
#s(approx (exp l) #s(literal 1 binary64))
accuracy91.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))
accuracy53.5%
(-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))
accuracy100.0%
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
accuracy99.7%
(*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
accuracy99.6%
#s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64))))
accuracy91.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
accuracy100.0%
(*.f64 #s(literal 2 binary64) l)
accuracy100.0%
(fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U)
accuracy98.5%
#s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))
accuracy91.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
accuracy100.0%
(+.f64 (*.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
accuracy100.0%
(sinh.f64 l)
accuracy99.9%
(*.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
accuracy99.9%
(/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
Samples
309.0ms122×5exit
75.0ms89×1valid
34.0ms34×2valid
4.0ms11×0valid
Compiler

Compiled 281 to 41 computations (85.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 353.0ms
ival-cos: 148.0ms (41.9% of total)
adjust: 57.0ms (16.1% of total)
ival-mult: 54.0ms (15.3% of total)
ival-exp: 33.0ms (9.3% of total)
ival-add: 26.0ms (7.4% of total)
ival-div: 11.0ms (3.1% of total)
const: 10.0ms (2.8% of total)
ival-sinh: 8.0ms (2.3% of total)
ival-sub: 5.0ms (1.4% of total)
ival-neg: 1.0ms (0.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series51.0ms (0.4%)

Memory
-30.9MiB live, 47.6MiB allocated
Counts
23 → 636
Calls
Call 1
Inputs
#<alt (/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))>
#<alt (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))>
#<alt (+.f64 (*.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)>
#<alt (*.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))>
#<alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))>
#<alt (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U)>
#<alt #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))>
#<alt (*.f64 #s(literal 2 binary64) l)>
#<alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))>
#<alt (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U)>
#<alt #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64))))>
#<alt (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))>
#<alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))>
#<alt (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U)>
#<alt (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))>
#<alt #s(approx (exp l) #s(literal 1 binary64))>
#<alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U))>
#<alt (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U)>
#<alt (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l)>
#<alt (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))>
#<alt (sinh.f64 l)>
#<alt (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))>
#<alt (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))>
Outputs
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (* 2 (* J l))>
#<alt (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))>
#<alt (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))>
#<alt (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (/ 1/2 l)>
#<alt (/ (+ 1/2 (* -1/12 (pow l 2))) l)>
#<alt (/ (+ 1/2 (* (pow l 2) (- (* 7/720 (pow l 2)) 1/12))) l)>
#<alt (/ (+ 1/2 (* (pow l 2) (- (* (pow l 2) (+ 7/720 (* -31/30240 (pow l 2)))) 1/12))) l)>
#<alt (/ 1 (- (exp l) (/ 1 (exp l))))>
#<alt (/ 1 (- (exp l) (/ 1 (exp l))))>
#<alt (/ 1 (- (exp l) (/ 1 (exp l))))>
#<alt (/ 1 (- (exp l) (/ 1 (exp l))))>
#<alt (/ 1 (- (exp l) (/ 1 (exp l))))>
#<alt (/ 1 (- (exp l) (/ 1 (exp l))))>
#<alt (/ 1 (- (exp l) (/ 1 (exp l))))>
#<alt (/ 1 (- (exp l) (/ 1 (exp l))))>
#<alt U>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))>
#<alt U>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))>
#<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)))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))>
#<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))))))))))>
#<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)))))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* 2 (* J (* l (cos (* 1/2 K)))))>
#<alt (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))>
#<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))))))))>
#<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))))))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (+ (* 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)))))))))>
#<alt (+ (* 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))))))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt U>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt U>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))>
#<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)))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))>
#<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))))))))))>
#<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)))))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt U>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (+ (exp l) (/ U J)) (exp (neg l))))>
#<alt (* J (- (+ (exp l) (/ U J)) (exp (neg l))))>
#<alt (* J (- (+ (exp l) (/ U J)) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))>
#<alt U>
#<alt (+ U (* 2 (* J l)))>
#<alt (+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))>
#<alt (+ U (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))>
#<alt (* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))>
#<alt (* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))>
#<alt (* 2 l)>
#<alt (* l (+ 2 (* 1/3 (pow l 2))))>
#<alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))>
#<alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))>
#<alt (- (exp l) (exp (neg l)))>
#<alt (- (exp l) (exp (neg l)))>
#<alt (- (exp l) (exp (neg l)))>
#<alt (- (exp l) (exp (neg l)))>
#<alt (- (exp l) (exp (* -1 l)))>
#<alt (- (exp l) (exp (* -1 l)))>
#<alt (- (exp l) (exp (* -1 l)))>
#<alt (- (exp l) (exp (* -1 l)))>
#<alt (* 2 l)>
#<alt (* 2 l)>
#<alt (* 2 l)>
#<alt (* 2 l)>
#<alt (* 2 l)>
#<alt (* 2 l)>
#<alt (* 2 l)>
#<alt (* 2 l)>
#<alt (* 2 l)>
#<alt (* 2 l)>
#<alt (* 2 l)>
#<alt (* 2 l)>
#<alt U>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt U>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))>
#<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)))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))>
#<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))))))))))>
#<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)))))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt U>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (+ (exp l) (/ U J)) (exp (neg l))))>
#<alt (* J (- (+ (exp l) (/ U J)) (exp (neg l))))>
#<alt (* J (- (+ (exp l) (/ U J)) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))>
#<alt U>
#<alt (+ U (* 2 (* J l)))>
#<alt (+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))>
#<alt (+ U (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))>
#<alt (* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))>
#<alt (* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))>
#<alt (* 2 l)>
#<alt (* l (+ 2 (* 1/3 (pow l 2))))>
#<alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))>
#<alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))>
#<alt (- (exp l) (exp (neg l)))>
#<alt (- (exp l) (exp (neg l)))>
#<alt (- (exp l) (exp (neg l)))>
#<alt (- (exp l) (exp (neg l)))>
#<alt (- (exp l) (exp (* -1 l)))>
#<alt (- (exp l) (exp (* -1 l)))>
#<alt (- (exp l) (exp (* -1 l)))>
#<alt (- (exp l) (exp (* -1 l)))>
#<alt (* 2 l)>
#<alt (* l (+ 2 (* 1/3 (pow l 2))))>
#<alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))>
#<alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))>
#<alt (* 1/60 (pow l 5))>
#<alt (* (pow l 5) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* (pow l 5) (+ 1/60 (+ (* 1/3 (/ 1 (pow l 2))) (/ 2 (pow l 4)))))>
#<alt (* (pow l 5) (+ 1/60 (+ (* 1/3 (/ 1 (pow l 2))) (/ 2 (pow l 4)))))>
#<alt (* 1/60 (pow l 5))>
#<alt (* (pow l 5) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* -1 (* (pow l 5) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow l 2)))) (pow l 2))) 1/60)))>
#<alt (* -1 (* (pow l 5) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow l 2)))) (pow l 2))) 1/60)))>
#<alt U>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt U>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))>
#<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)))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))>
#<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))))))))))>
#<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)))))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt U>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (+ (exp l) (/ U J)) (exp (neg l))))>
#<alt (* J (- (+ (exp l) (/ U J)) (exp (neg l))))>
#<alt (* J (- (+ (exp l) (/ U J)) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))>
#<alt U>
#<alt (+ U (* 2 (* J l)))>
#<alt (+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))>
#<alt (+ U (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))>
#<alt (* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))>
#<alt (* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))>
#<alt (* 2 l)>
#<alt (* l (+ 2 (* 1/3 (pow l 2))))>
#<alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))>
#<alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))>
#<alt (- (exp l) (exp (neg l)))>
#<alt (- (exp l) (exp (neg l)))>
#<alt (- (exp l) (exp (neg l)))>
#<alt (- (exp l) (exp (neg l)))>
#<alt (- (exp l) (exp (* -1 l)))>
#<alt (- (exp l) (exp (* -1 l)))>
#<alt (- (exp l) (exp (* -1 l)))>
#<alt (- (exp l) (exp (* -1 l)))>
#<alt 1>
#<alt (+ 1 l)>
#<alt (+ 1 (* l (+ 1 (* 1/2 l))))>
#<alt (+ 1 (* l (+ 1 (* l (+ 1/2 (* 1/6 l))))))>
#<alt (exp l)>
#<alt (exp l)>
#<alt (exp l)>
#<alt (exp l)>
#<alt (exp l)>
#<alt (exp l)>
#<alt (exp l)>
#<alt (exp l)>
#<alt U>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt U>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))>
#<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)))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))>
#<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))))))))))>
#<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)))))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt U>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (* 2 (* J (* l (cos (* 1/2 K)))))>
#<alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))>
#<alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))>
#<alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))>
#<alt (* 2 (* J (* l (cos (* 1/2 K)))))>
#<alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))>
#<alt (+ U (* 2 (* J l)))>
#<alt (+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))>
#<alt (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))>
#<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))))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt U>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (* 2 (* J (* l (cos (* 1/2 K)))))>
#<alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))>
#<alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))>
#<alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))>
#<alt (* 2 (* J (* l (cos (* 1/2 K)))))>
#<alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))>
#<alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))>
#<alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))>
#<alt (* 2 (* J (* l (cos (* 1/2 K)))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt U>
#<alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))>
#<alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))>
#<alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))>
#<alt U>
#<alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))>
#<alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))>
#<alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J l)>
#<alt (+ (* -1/8 (* J (* (pow K 2) l))) (* J l))>
#<alt (+ (* J l) (* (pow K 2) (+ (* -1/8 (* J l)) (* 1/384 (* J (* (pow K 2) l))))))>
#<alt (+ (* J l) (* (pow K 2) (+ (* -1/8 (* J l)) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) l))) (* 1/384 (* J l)))))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt J>
#<alt (+ J (* -1/8 (* J (pow K 2))))>
#<alt (+ J (* (pow K 2) (+ (* -1/8 J) (* 1/384 (* J (pow K 2))))))>
#<alt (+ J (* (pow K 2) (+ (* -1/8 J) (* (pow K 2) (+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))))))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt l>
#<alt (* l (+ 1 (* 1/6 (pow l 2))))>
#<alt (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))>
#<alt (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/3 l)>
#<alt (* l (+ 1/3 (* 1/60 (pow l 2))))>
#<alt (* l (+ 1/3 (* 1/60 (pow l 2))))>
#<alt (* l (+ 1/3 (* 1/60 (pow l 2))))>
#<alt (* 1/60 (pow l 3))>
#<alt (* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* 1/60 (pow l 3))>
#<alt (* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt 1/3>
#<alt (+ 1/3 (* 1/60 (pow l 2)))>
#<alt (+ 1/3 (* 1/60 (pow l 2)))>
#<alt (+ 1/3 (* 1/60 (pow l 2)))>
#<alt (* 1/60 (pow l 2))>
#<alt (* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* 1/60 (pow l 2))>
#<alt (* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
Calls

159 calls:

TimeVariablePointExpression
8.0ms
l
@0
(/ 1 (* 2 (sinh l)))
1.0ms
J
@0
(/ J (/ 1 (* 2 (sinh l))))
1.0ms
l
@inf
(/ 1 (* 2 (sinh l)))
1.0ms
J
@inf
(+ (* (/ J (/ 1 (* 2 (sinh l)))) (cos (/ K 2))) U)
1.0ms
l
@-inf
(/ 1 (* 2 (sinh l)))

simplify449.0ms (3.4%)

Memory
26.7MiB live, 825.4MiB allocated
Algorithm
egg-herbie
Rules
16 882×lower-fma.f64
16 882×lower-fma.f32
6 098×lower-*.f64
6 098×lower-*.f32
3 646×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03427609
111037603
231857261
365477247
085726768
Stop Event
iter limit
node limit
Counts
636 → 598
Calls
Call 1
Inputs
(* J (- (exp l) (/ 1 (exp l))))
(* J (- (exp l) (/ 1 (exp l))))
(* J (- (exp l) (/ 1 (exp l))))
(* J (- (exp l) (/ 1 (exp l))))
(* J (- (exp l) (/ 1 (exp l))))
(* J (- (exp l) (/ 1 (exp l))))
(* J (- (exp l) (/ 1 (exp l))))
(* J (- (exp l) (/ 1 (exp l))))
(* J (- (exp l) (/ 1 (exp l))))
(* J (- (exp l) (/ 1 (exp l))))
(* J (- (exp l) (/ 1 (exp l))))
(* J (- (exp l) (/ 1 (exp l))))
(* 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)))))))
(* J (- (exp l) (/ 1 (exp l))))
(* J (- (exp l) (/ 1 (exp l))))
(* J (- (exp l) (/ 1 (exp l))))
(* J (- (exp l) (/ 1 (exp l))))
(* J (- (exp l) (/ 1 (exp l))))
(* J (- (exp l) (/ 1 (exp l))))
(* J (- (exp l) (/ 1 (exp l))))
(* J (- (exp l) (/ 1 (exp l))))
(/ 1/2 l)
(/ (+ 1/2 (* -1/12 (pow l 2))) l)
(/ (+ 1/2 (* (pow l 2) (- (* 7/720 (pow l 2)) 1/12))) l)
(/ (+ 1/2 (* (pow l 2) (- (* (pow l 2) (+ 7/720 (* -31/30240 (pow l 2)))) 1/12))) l)
(/ 1 (- (exp l) (/ 1 (exp l))))
(/ 1 (- (exp l) (/ 1 (exp l))))
(/ 1 (- (exp l) (/ 1 (exp l))))
(/ 1 (- (exp l) (/ 1 (exp l))))
(/ 1 (- (exp l) (/ 1 (exp l))))
(/ 1 (- (exp l) (/ 1 (exp l))))
(/ 1 (- (exp l) (/ 1 (exp l))))
(/ 1 (- (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))))))
(* 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) (/ 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)))))
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 (* 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))))))
(+ 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))))))
(+ 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)))))))))))
(+ 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))))))
(+ 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))))))
(* 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))))))
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
(* -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 (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* 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))))))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (- (exp l) (/ 1 (exp l))))
(+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l)))))
(+ (* 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)))))))))
(+ (* 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))))))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* 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))))))
(* 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)))))
(* -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)))))
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 (* 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 (* -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 (- (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 (* 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))))))
(+ 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))))))
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
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(* J (- (exp l) (exp (neg l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
U
(+ U (* 2 (* J l)))
(+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
(+ U (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(* J (- (exp l) (exp (neg l))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
U
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
U
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(* 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))))))))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
(* 2 l)
(* 2 l)
(* 2 l)
(* 2 l)
(* 2 l)
(* 2 l)
(* 2 l)
(* 2 l)
(* 2 l)
(* 2 l)
(* 2 l)
(* 2 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)))) (/ 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)))))
(* -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)))))
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 (* 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 (* -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 (- (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 (* 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))))))
(+ 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))))))
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
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(* J (- (exp l) (exp (neg l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
U
(+ U (* 2 (* J l)))
(+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
(+ U (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(* J (- (exp l) (exp (neg l))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
U
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
U
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(* 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))))))))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
(* 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 (* 1/60 (pow l 2))))))
(* 1/60 (pow l 5))
(* (pow l 5) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* (pow l 5) (+ 1/60 (+ (* 1/3 (/ 1 (pow l 2))) (/ 2 (pow l 4)))))
(* (pow l 5) (+ 1/60 (+ (* 1/3 (/ 1 (pow l 2))) (/ 2 (pow l 4)))))
(* 1/60 (pow l 5))
(* (pow l 5) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* -1 (* (pow l 5) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow l 2)))) (pow l 2))) 1/60)))
(* -1 (* (pow l 5) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow l 2)))) (pow l 2))) 1/60)))
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)))) (/ 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)))))
(* -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)))))
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 (* 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 (* -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 (- (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 (* 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))))))
(+ 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))))))
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
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(* J (- (exp l) (exp (neg l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
U
(+ U (* 2 (* J l)))
(+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
(+ U (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(* J (- (exp l) (exp (neg l))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
U
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
U
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(* 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))))))))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
1
(+ 1 l)
(+ 1 (* l (+ 1 (* 1/2 l))))
(+ 1 (* l (+ 1 (* l (+ 1/2 (* 1/6 l))))))
(exp l)
(exp l)
(exp l)
(exp l)
(exp l)
(exp l)
(exp l)
(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))))))
(* 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)))))
(* -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)))))
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 (* 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 (* -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 (- (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 (* 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))))))
(+ 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))))))
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
(+ 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 (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 (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 (* 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 (* 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 (* 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 (* 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 (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 (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 (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 (* 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 (- (* -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)))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J l)
(+ (* -1/8 (* J (* (pow K 2) l))) (* J l))
(+ (* J l) (* (pow K 2) (+ (* -1/8 (* J l)) (* 1/384 (* J (* (pow K 2) l))))))
(+ (* J l) (* (pow K 2) (+ (* -1/8 (* J l)) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) l))) (* 1/384 (* J l)))))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
J
(+ J (* -1/8 (* J (pow K 2))))
(+ J (* (pow K 2) (+ (* -1/8 J) (* 1/384 (* J (pow K 2))))))
(+ J (* (pow K 2) (+ (* -1/8 J) (* (pow K 2) (+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))))))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
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))))))))
(* 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/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 l)
(* l (+ 1/3 (* 1/60 (pow l 2))))
(* l (+ 1/3 (* 1/60 (pow l 2))))
(* l (+ 1/3 (* 1/60 (pow l 2))))
(* 1/60 (pow l 3))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* 1/60 (pow l 3))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
1/3
(+ 1/3 (* 1/60 (pow l 2)))
(+ 1/3 (* 1/60 (pow l 2)))
(+ 1/3 (* 1/60 (pow l 2)))
(* 1/60 (pow l 2))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* 1/60 (pow l 2))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
Outputs
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* 2 (* J l))
(*.f64 l (*.f64 J #s(literal 2 binary64)))
(* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))
(*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))
(*.f64 l (fma.f64 (*.f64 l l) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) (*.f64 J #s(literal 2 binary64))))
(* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))
(*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64))) (*.f64 J #s(literal 1/3 binary64))) (*.f64 J #s(literal 2 binary64))))
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(/ 1/2 l)
(/.f64 #s(literal 1/2 binary64) l)
(/ (+ 1/2 (* -1/12 (pow l 2))) l)
(/.f64 (fma.f64 l (*.f64 l #s(literal -1/12 binary64)) #s(literal 1/2 binary64)) l)
(/ (+ 1/2 (* (pow l 2) (- (* 7/720 (pow l 2)) 1/12))) l)
(/.f64 (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 7/720 binary64) #s(literal -1/12 binary64))) #s(literal 1/2 binary64)) l)
(/ (+ 1/2 (* (pow l 2) (- (* (pow l 2) (+ 7/720 (* -31/30240 (pow l 2)))) 1/12))) l)
(/.f64 (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal -31/30240 binary64) #s(literal 7/720 binary64)) #s(literal -1/12 binary64)) #s(literal 1/2 binary64)) l)
(/ 1 (- (exp l) (/ 1 (exp l))))
(/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(/ 1 (- (exp l) (/ 1 (exp l))))
(/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(/ 1 (- (exp l) (/ 1 (exp l))))
(/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(/ 1 (- (exp l) (/ 1 (exp l))))
(/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(/ 1 (- (exp l) (/ 1 (exp l))))
(/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(/ 1 (- (exp l) (/ 1 (exp l))))
(/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(/ 1 (- (exp l) (/ 1 (exp l))))
(/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(/ 1 (- (exp l) (/ 1 (exp l))))
(/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 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)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 l (*.f64 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 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) 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 l (fma.f64 (*.f64 l l) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 (*.f64 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) 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 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 J (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))) 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 (*.f64 K K) (*.f64 (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J) U))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))
(*.f64 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K))))))))
(*.f64 l (fma.f64 (*.f64 l l) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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))))))))))
(*.f64 l (fma.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J))
(+ (* 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 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 J (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)))))
(+ (* 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 (*.f64 K K) (*.f64 (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 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)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 l (*.f64 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 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) 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 l (fma.f64 (*.f64 l l) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 (*.f64 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) 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 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 J (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))) 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 (*.f64 K K) (*.f64 (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J) U))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
U
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(+ U (* 2 (* J l)))
(fma.f64 l (*.f64 J #s(literal 2 binary64)) U)
(+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
(fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)
(+ U (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))))
(fma.f64 l (fma.f64 (*.f64 l l) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) (*.f64 J #s(literal 2 binary64))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* 2 l)
(*.f64 l #s(literal 2 binary64))
(* l (+ 2 (* 1/3 (pow l 2))))
(*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(- (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)))
(- (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)))
(* 2 l)
(*.f64 l #s(literal 2 binary64))
(* 2 l)
(*.f64 l #s(literal 2 binary64))
(* 2 l)
(*.f64 l #s(literal 2 binary64))
(* 2 l)
(*.f64 l #s(literal 2 binary64))
(* 2 l)
(*.f64 l #s(literal 2 binary64))
(* 2 l)
(*.f64 l #s(literal 2 binary64))
(* 2 l)
(*.f64 l #s(literal 2 binary64))
(* 2 l)
(*.f64 l #s(literal 2 binary64))
(* 2 l)
(*.f64 l #s(literal 2 binary64))
(* 2 l)
(*.f64 l #s(literal 2 binary64))
(* 2 l)
(*.f64 l #s(literal 2 binary64))
(* 2 l)
(*.f64 l #s(literal 2 binary64))
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 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)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 l (*.f64 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 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) 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 l (fma.f64 (*.f64 l l) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 (*.f64 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) 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 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 J (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))) 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 (*.f64 K K) (*.f64 (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J) U))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
U
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(+ U (* 2 (* J l)))
(fma.f64 l (*.f64 J #s(literal 2 binary64)) U)
(+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
(fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)
(+ U (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))))
(fma.f64 l (fma.f64 (*.f64 l l) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) (*.f64 J #s(literal 2 binary64))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* 2 l)
(*.f64 l #s(literal 2 binary64))
(* l (+ 2 (* 1/3 (pow l 2))))
(*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(- (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)))
(- (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)))
(* 2 l)
(*.f64 l #s(literal 2 binary64))
(* l (+ 2 (* 1/3 (pow l 2))))
(*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(* 1/60 (pow l 5))
(*.f64 #s(literal 1/60 binary64) (pow.f64 l #s(literal 5 binary64)))
(* (pow l 5) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(*.f64 (pow.f64 l #s(literal 5 binary64)) (+.f64 #s(literal 1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(* (pow l 5) (+ 1/60 (+ (* 1/3 (/ 1 (pow l 2))) (/ 2 (pow l 4)))))
(*.f64 (pow.f64 l #s(literal 5 binary64)) (+.f64 (+.f64 #s(literal 1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 l l))) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 l l)))))
(* (pow l 5) (+ 1/60 (+ (* 1/3 (/ 1 (pow l 2))) (/ 2 (pow l 4)))))
(*.f64 (pow.f64 l #s(literal 5 binary64)) (+.f64 (+.f64 #s(literal 1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 l l))) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 l l)))))
(* 1/60 (pow l 5))
(*.f64 #s(literal 1/60 binary64) (pow.f64 l #s(literal 5 binary64)))
(* (pow l 5) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(*.f64 (pow.f64 l #s(literal 5 binary64)) (+.f64 #s(literal 1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(* -1 (* (pow l 5) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow l 2)))) (pow l 2))) 1/60)))
(*.f64 (pow.f64 l #s(literal 5 binary64)) (+.f64 #s(literal 1/60 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l))) (*.f64 l l))))
(* -1 (* (pow l 5) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow l 2)))) (pow l 2))) 1/60)))
(*.f64 (pow.f64 l #s(literal 5 binary64)) (+.f64 #s(literal 1/60 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l))) (*.f64 l l))))
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 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)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 l (*.f64 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 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) 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 l (fma.f64 (*.f64 l l) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 (*.f64 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) 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 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 J (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))) 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 (*.f64 K K) (*.f64 (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J) U))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
U
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(+ U (* 2 (* J l)))
(fma.f64 l (*.f64 J #s(literal 2 binary64)) U)
(+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
(fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)
(+ U (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))))
(fma.f64 l (fma.f64 (*.f64 l l) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) (*.f64 J #s(literal 2 binary64))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* 2 l)
(*.f64 l #s(literal 2 binary64))
(* l (+ 2 (* 1/3 (pow l 2))))
(*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(- (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)))
(- (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
#s(literal 1 binary64)
(+ 1 l)
(+.f64 l #s(literal 1 binary64))
(+ 1 (* l (+ 1 (* 1/2 l))))
(fma.f64 l (fma.f64 l #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1 binary64))
(+ 1 (* l (+ 1 (* l (+ 1/2 (* 1/6 l))))))
(fma.f64 l (fma.f64 l (fma.f64 l #s(literal 1/6 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(exp l)
(exp.f64 l)
(exp l)
(exp.f64 l)
(exp l)
(exp.f64 l)
(exp l)
(exp.f64 l)
(exp l)
(exp.f64 l)
(exp l)
(exp.f64 l)
(exp l)
(exp.f64 l)
(exp l)
(exp.f64 l)
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 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)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 l (*.f64 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 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) 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 l (fma.f64 (*.f64 l l) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 (*.f64 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) 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 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 J (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))) 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 (*.f64 K K) (*.f64 (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J) U))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 l (*.f64 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 l (*.f64 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 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(fma.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(fma.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(fma.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 l (*.f64 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)))))
(fma.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(fma.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(fma.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J l)))
(fma.f64 l (*.f64 J #s(literal 2 binary64)) U)
(+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))
(fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #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 K K) (*.f64 (*.f64 J l) (fma.f64 #s(literal 1/192 binary64) (*.f64 K K) #s(literal -1/4 binary64))) (fma.f64 l (*.f64 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 (*.f64 K K) (*.f64 (*.f64 (*.f64 J l) (*.f64 K K)) (fma.f64 #s(literal -1/23040 binary64) (*.f64 K K) #s(literal 1/192 binary64))) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 l (*.f64 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 l (*.f64 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 l (*.f64 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 l (*.f64 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 l (*.f64 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 l (*.f64 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 l (*.f64 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 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 l (*.f64 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 l (*.f64 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 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(fma.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(fma.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(fma.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 l (*.f64 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)))))
(fma.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(fma.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(fma.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 l (*.f64 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 l (*.f64 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 l (*.f64 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 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
U
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U)
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U)
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U)
U
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U)
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U)
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U)
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J l)
(*.f64 J l)
(+ (* -1/8 (* J (* (pow K 2) l))) (* J l))
(*.f64 l (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J))
(+ (* J l) (* (pow K 2) (+ (* -1/8 (* J l)) (* 1/384 (* J (* (pow K 2) l))))))
(fma.f64 J l (*.f64 K (*.f64 K (*.f64 l (*.f64 J (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)))))))
(+ (* J l) (* (pow K 2) (+ (* -1/8 (* J l)) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) l))) (* 1/384 (* J l)))))))
(fma.f64 (*.f64 K K) (fma.f64 (*.f64 l (*.f64 K K)) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J (*.f64 #s(literal -1/8 binary64) l))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (* l (cos (* 1/2 K))))
(*.f64 (*.f64 J l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
J
(+ J (* -1/8 (* J (pow K 2))))
(fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)
(+ J (* (pow K 2) (+ (* -1/8 J) (* 1/384 (* J (pow K 2))))))
(fma.f64 K (*.f64 K (*.f64 J (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)))) J)
(+ J (* (pow K 2) (+ (* -1/8 J) (* (pow K 2) (+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))))))
(fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
l
(* l (+ 1 (* 1/6 (pow l 2))))
(fma.f64 l (*.f64 (*.f64 l l) #s(literal 1/6 binary64)) l)
(* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))
(fma.f64 (*.f64 l l) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) l) l)
(* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))
(fma.f64 (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/5040 binary64) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 l (*.f64 l l)) 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/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/2 (- (exp l) (/ 1 (exp l))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* l (+ 1/3 (* 1/60 (pow l 2))))
(*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* l (+ 1/3 (* 1/60 (pow l 2))))
(*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* l (+ 1/3 (* 1/60 (pow l 2))))
(*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* 1/60 (pow l 3))
(*.f64 l (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* 1/60 (pow l 3))
(*.f64 l (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
1/3
#s(literal 1/3 binary64)
(+ 1/3 (* 1/60 (pow l 2)))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(+ 1/3 (* 1/60 (pow l 2)))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(+ 1/3 (* 1/60 (pow l 2)))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(* 1/60 (pow l 2))
(*.f64 (*.f64 l l) #s(literal 1/60 binary64))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(* 1/60 (pow l 2))
(*.f64 (*.f64 l l) #s(literal 1/60 binary64))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(* (pow l 2) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))

rewrite370.0ms (2.8%)

Memory
-1.1MiB live, 513.7MiB allocated
Algorithm
batch-egg-rewrite
Rules
4 672×lower-fma.f32
4 660×lower-fma.f64
4 196×lower-/.f32
4 190×lower-/.f64
4 108×lower-*.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
050310
081282
1283282
21912282
08238277
Stop Event
iter limit
node limit
iter limit
Counts
23 → 552
Calls
Call 1
Inputs
(/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))
(+.f64 (*.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(*.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
(fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U)
#s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))
(*.f64 #s(literal 2 binary64) l)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
(fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U)
#s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))
(fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U)
(-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))
#s(approx (exp l) #s(literal 1 binary64))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U))
(fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U)
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l)
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(sinh.f64 l)
(*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
Outputs
(+.f64 (*.f64 J (exp.f64 l)) (*.f64 J (neg.f64 (exp.f64 (neg.f64 l)))))
(+.f64 (*.f64 (exp.f64 l) J) (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) J))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 J (sinh.f64 l)))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1/2 binary64) (sinh.f64 l))) (*.f64 (neg.f64 J) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(fma.f64 J (exp.f64 l) (*.f64 J (neg.f64 (exp.f64 (neg.f64 l)))))
(fma.f64 (exp.f64 l) J (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) J))
(neg.f64 (*.f64 (neg.f64 J) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(/.f64 J (/.f64 #s(literal 1/2 binary64) (sinh.f64 l)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 J (sinh.f64 l))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 J (sinh.f64 l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 J (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))) (*.f64 J (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 J (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (*.f64 J (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) J)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) J)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 J (sinh.f64 l)))))
(/.f64 (neg.f64 J) (/.f64 #s(literal -1/2 binary64) (sinh.f64 l)))
(/.f64 (*.f64 J (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 (*.f64 J (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 (*.f64 J (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 J (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (neg.f64 J)) (/.f64 #s(literal 1/2 binary64) (sinh.f64 l)))
(/.f64 (*.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) J) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) J) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 J (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))))) (neg.f64 (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 (neg.f64 (*.f64 J (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))))) (neg.f64 (*.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))))))
(/.f64 (neg.f64 (*.f64 J (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (*.f64 J (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 J))) (/.f64 #s(literal -1/2 binary64) (sinh.f64 l)))
(/.f64 (neg.f64 (*.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) J)) (neg.f64 (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) J)) (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (+.f64 (pow.f64 (*.f64 J (exp.f64 l)) #s(literal 3 binary64)) (pow.f64 (*.f64 J (neg.f64 (exp.f64 (neg.f64 l)))) #s(literal 3 binary64))) (fma.f64 (*.f64 J (exp.f64 l)) (*.f64 J (exp.f64 l)) (-.f64 (*.f64 (*.f64 J (neg.f64 (exp.f64 (neg.f64 l)))) (*.f64 J (neg.f64 (exp.f64 (neg.f64 l))))) (*.f64 (*.f64 J (exp.f64 l)) (*.f64 J (neg.f64 (exp.f64 (neg.f64 l))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (exp.f64 l) J) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) J) #s(literal 3 binary64))) (fma.f64 (*.f64 (exp.f64 l) J) (*.f64 (exp.f64 l) J) (-.f64 (*.f64 (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) J) (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) J)) (*.f64 (*.f64 (exp.f64 l) J) (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) J)))))
(pow.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 J (sinh.f64 l))) #s(literal -1 binary64))
(*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l)))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)))
(*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J))
(*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) #s(literal 1 binary64))
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)
(*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 J) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 J (sinh.f64 l))))))
(*.f64 (neg.f64 J) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1/2 binary64) (sinh.f64 l))))
(*.f64 (*.f64 J (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))))
(*.f64 (*.f64 J (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))))))
(*.f64 (*.f64 J (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(*.f64 (*.f64 J (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))
(*.f64 (neg.f64 (neg.f64 J)) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))
(*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64))
(*.f64 (*.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) J) (/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))))
(*.f64 (*.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) J) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))
(*.f64 (*.f64 J #s(literal -1 binary64)) (*.f64 (sinh.f64 l) #s(literal -2 binary64)))
(*.f64 (*.f64 J #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1/2 binary64) (sinh.f64 l))))
(*.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (sinh.f64 l))) #s(literal 2 binary64))
(*.f64 (/.f64 J (pow.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))))
(*.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(*.f64 (/.f64 J (/.f64 #s(literal -1/2 binary64) (*.f64 (sinh.f64 l) #s(literal -2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (/.f64 J #s(literal 2 binary64)) (/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (cosh.f64 l)))
(*.f64 (/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 2 binary64)) (/.f64 J (cosh.f64 l)))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal -1 binary64)))
(neg.f64 (/.f64 #s(literal -1/2 binary64) (sinh.f64 l)))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))
(/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (sinh.f64 l) #s(literal -2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sinh.f64 l))))
(/.f64 (/.f64 #s(literal 1/2 binary64) (sinh.f64 l)) #s(literal 1 binary64))
(/.f64 #s(literal 1/2 binary64) (sinh.f64 l))
(/.f64 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (sinh.f64 l))))
(/.f64 #s(literal -1 binary64) (*.f64 (sinh.f64 l) #s(literal -2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (*.f64 (sinh.f64 l) #s(literal -2 binary64)))))
(/.f64 (/.f64 #s(literal -1/2 binary64) (sinh.f64 l)) #s(literal -1 binary64))
(/.f64 (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))))
(/.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))
(/.f64 (neg.f64 (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))) (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (neg.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (sinh.f64 l)))
(/.f64 (/.f64 #s(literal 1 binary64) (sinh.f64 l)) #s(literal 2 binary64))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (sinh.f64 l))) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 1/2 binary64) (sinh.f64 l)) #s(literal 1 binary64))
(pow.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal -1 binary64))
(pow.f64 (neg.f64 (*.f64 (sinh.f64 l) #s(literal -2 binary64))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal -1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (sinh.f64 l)))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sinh.f64 l)) #s(literal 1 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sinh.f64 l)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1/2 binary64) (sinh.f64 l)))
(*.f64 (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))) (/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))))
(*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))
(*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (sinh.f64 l))))
(*.f64 (/.f64 #s(literal 1 binary64) (sinh.f64 l)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal -1/2 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 (sinh.f64 l) #s(literal -2 binary64))) #s(literal 2 binary64))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (cosh.f64 l) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) U)
(+.f64 U (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))))
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (-.f64 U (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))))
(fma.f64 J (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) U)
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) U)
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal 1 binary64)) U)
(fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) U)
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) U)
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J)) U)
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) U)
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) J U)
(fma.f64 (neg.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1/2 binary64) (sinh.f64 l))) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 J)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1/2 binary64) (sinh.f64 l))) U)
(fma.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) U)
(fma.f64 (*.f64 (neg.f64 J) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1/2 binary64) (sinh.f64 l))) U)
(fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) U)
(fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (sinh.f64 l) U)
(fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal -1 binary64)) (*.f64 (sinh.f64 l) #s(literal -2 binary64)) U)
(fma.f64 (*.f64 J #s(literal 2 binary64)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sinh.f64 l))) U)
(fma.f64 (*.f64 J #s(literal -1 binary64)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal -1/2 binary64) (sinh.f64 l))) U)
(fma.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (sinh.f64 l))) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) U)
(fma.f64 (/.f64 J (pow.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal -1/2 binary64))) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal -1/2 binary64))) U)
(fma.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))))) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))) U)
(fma.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) U)
(fma.f64 (/.f64 J (/.f64 #s(literal -1/2 binary64) (*.f64 (sinh.f64 l) #s(literal -2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal 2 binary64)) U)
(fma.f64 (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sinh.f64 l))) (*.f64 J #s(literal 2 binary64)) U)
(fma.f64 (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) (/.f64 J (/.f64 #s(literal 1 binary64) (sinh.f64 l))) U)
(fma.f64 (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal -1/2 binary64))) (/.f64 J (pow.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal -1/2 binary64))) U)
(fma.f64 (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal -1 binary64)) (*.f64 (neg.f64 J) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) U)
(fma.f64 (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))))) (/.f64 J (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))) U)
(fma.f64 (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (/.f64 J (*.f64 #s(literal 2 binary64) (cosh.f64 l))) U)
(fma.f64 (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal -1/2 binary64) (*.f64 (sinh.f64 l) #s(literal -2 binary64)))) (/.f64 J #s(literal 2 binary64)) U)
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 U (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U))))
(/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))))
(/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U)) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)))
(/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 U (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)))))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 U (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 U U) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) (/.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) (fma.f64 (/.f64 (*.f64 U U) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U))
(*.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))
(*.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U))))
(*.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))))))
(*.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 U U))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 U)))))
(*.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 U (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 J (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 J (sinh.f64 l))) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1/2 binary64) (sinh.f64 l)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 J))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 J (sinh.f64 l))) (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1/2 binary64) (sinh.f64 l)) (*.f64 (neg.f64 J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1/2 binary64) (sinh.f64 l)) (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 1 binary64))))
(/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) (*.f64 J (sinh.f64 l))))
(/.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (/.f64 #s(literal 1/2 binary64) (sinh.f64 l)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (/.f64 #s(literal -1/2 binary64) (sinh.f64 l)))
(/.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 J (sinh.f64 l))))
(/.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 J)) (/.f64 #s(literal -1/2 binary64) (sinh.f64 l)))
(/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 J (sinh.f64 l))))
(/.f64 (*.f64 (neg.f64 J) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (/.f64 #s(literal -1/2 binary64) (sinh.f64 l)))
(/.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (sinh.f64 l)))
(/.f64 (neg.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (neg.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 J (sinh.f64 l)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))) (/.f64 #s(literal 1/2 binary64) (sinh.f64 l)))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal 1 binary64))) (neg.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 J (sinh.f64 l)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 J))) (/.f64 #s(literal 1/2 binary64) (sinh.f64 l)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (neg.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 J (sinh.f64 l)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/2 binary64) (sinh.f64 l)))
(/.f64 (neg.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 1 binary64))) (/.f64 #s(literal -1/2 binary64) (sinh.f64 l)))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) #s(literal -1 binary64))
(*.f64 J (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)))
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J)))
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) J)
(*.f64 (neg.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1/2 binary64) (sinh.f64 l))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (neg.f64 J)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1/2 binary64) (sinh.f64 l))))
(*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J)))
(*.f64 (*.f64 (neg.f64 J) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1/2 binary64) (sinh.f64 l))))
(*.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))
(*.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (sinh.f64 l))
(*.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal -1 binary64)) (*.f64 (sinh.f64 l) #s(literal -2 binary64)))
(*.f64 (*.f64 J #s(literal 2 binary64)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sinh.f64 l))))
(*.f64 (*.f64 J #s(literal -1 binary64)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal -1/2 binary64) (sinh.f64 l))))
(*.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (sinh.f64 l))) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 J (pow.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal -1/2 binary64))) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))))) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))))
(*.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(*.f64 (/.f64 J (/.f64 #s(literal -1/2 binary64) (*.f64 (sinh.f64 l) #s(literal -2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(*.f64 (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sinh.f64 l))) (*.f64 J #s(literal 2 binary64)))
(*.f64 (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) (/.f64 J (/.f64 #s(literal 1 binary64) (sinh.f64 l))))
(*.f64 (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal -1/2 binary64))) (/.f64 J (pow.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal -1 binary64)) (*.f64 (neg.f64 J) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(*.f64 (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))))) (/.f64 J (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))))
(*.f64 (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (/.f64 J (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(*.f64 (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal -1/2 binary64) (*.f64 (sinh.f64 l) #s(literal -2 binary64)))) (/.f64 J #s(literal 2 binary64)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
(+.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))
(+.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) U)
(-.f64 (/.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))))
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (/.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))
(fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U)
(fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) J U)
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U U (-.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J U)))) (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 U (*.f64 U U)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))) (-.f64 (*.f64 U U) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))))
(/.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 U (*.f64 U U))) (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))))))
(/.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 U (*.f64 U U))) (fma.f64 U U (-.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J U)))))
(/.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))
(/.f64 (neg.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 U (*.f64 U U)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 U (*.f64 U U)))) (neg.f64 (fma.f64 U U (-.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J U))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))) (neg.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))))) (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))))
(/.f64 (-.f64 (*.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 U (*.f64 U U))))) (neg.f64 (neg.f64 (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))))) (neg.f64 (neg.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))) (neg.f64 (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 U U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (/.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (fma.f64 (/.f64 (*.f64 U U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (*.f64 (/.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
(*.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 U (*.f64 U U))) (/.f64 #s(literal 1 binary64) (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))))
(*.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 U (*.f64 U U))) (/.f64 #s(literal 1 binary64) (fma.f64 U U (-.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J U))))))
(*.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))))
(*.f64 (neg.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 U (*.f64 U U)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))))))))
(*.f64 (neg.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
(*.f64 (-.f64 (*.f64 U U) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))))) (/.f64 #s(literal 1 binary64) (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))
#s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))
(*.f64 #s(literal 2 binary64) l)
(*.f64 l #s(literal 2 binary64))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
(+.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))
(+.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) U)
(-.f64 (/.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))))
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))))
(fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U)
(fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U)
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U U (-.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J U)))) (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 U (*.f64 U U)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (-.f64 (*.f64 U U) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))))
(/.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 U (*.f64 U U))) (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))))
(/.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 U (*.f64 U U))) (fma.f64 U U (-.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J U)))))
(/.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U)))
(/.f64 (neg.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 U (*.f64 U U)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 U (*.f64 U U)))) (neg.f64 (fma.f64 U U (-.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J U))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U)))) (neg.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))) (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U)) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 U (*.f64 U U))))) (neg.f64 (neg.f64 (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))))) (neg.f64 (neg.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U)))))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))))) (neg.f64 (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 U U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))) (/.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))) (fma.f64 (/.f64 (*.f64 U U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))) (*.f64 (/.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U)))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
(*.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 U (*.f64 U U))) (/.f64 #s(literal 1 binary64) (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))))))
(*.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 U (*.f64 U U))) (/.f64 #s(literal 1 binary64) (fma.f64 U U (-.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J U))))))
(*.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))))
(*.f64 (neg.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 U (*.f64 U U)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))))))
(*.f64 (neg.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U)))))
(*.f64 (-.f64 (*.f64 U U) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))))
#s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))
(+.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))))
(+.f64 (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 #s(literal 2 binary64) l))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) (-.f64 (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 #s(literal 2 binary64) l))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (-.f64 (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 #s(literal 2 binary64) l))))
(fma.f64 #s(literal 2 binary64) l (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))))
(fma.f64 l #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))))
(fma.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 #s(literal 2 binary64) l))
(fma.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal 2 binary64) l))
(fma.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l l) (*.f64 #s(literal 2 binary64) l))
(fma.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) l (*.f64 #s(literal 2 binary64) l))
(fma.f64 (*.f64 l (*.f64 l l)) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 #s(literal 2 binary64) l))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 #s(literal 2 binary64) l)))) (fma.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))))) (*.f64 l (*.f64 l l)) (*.f64 #s(literal 8 binary64) (*.f64 l (*.f64 l l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 #s(literal 2 binary64) l)) (-.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 l (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) #s(literal 4 binary64)) (*.f64 l (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 l (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) #s(literal 8 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64)) (*.f64 l (fma.f64 (*.f64 l l) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 l (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) #s(literal 4 binary64)) (*.f64 l (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) #s(literal 8 binary64)) l)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64)) (*.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64)) l)))
(/.f64 (fma.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))))) (*.f64 l (*.f64 l l)) (*.f64 #s(literal 8 binary64) (*.f64 l (*.f64 l l)))) (fma.f64 (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 #s(literal 2 binary64) l)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l))) (-.f64 (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 #s(literal 2 binary64) l)))
(/.f64 (*.f64 l (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) #s(literal 8 binary64))) (-.f64 (fma.f64 l (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) #s(literal 4 binary64)) (*.f64 l (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))
(/.f64 (*.f64 l (fma.f64 (*.f64 l l) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64))) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64)))
(/.f64 (*.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) #s(literal 8 binary64)) l) (-.f64 (fma.f64 l (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) #s(literal 4 binary64)) (*.f64 l (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))
(/.f64 (*.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64)) l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64)))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))))) (*.f64 l (*.f64 l l)) (*.f64 #s(literal 8 binary64) (*.f64 l (*.f64 l l))))) (neg.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 #s(literal 2 binary64) l))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)))) (neg.f64 (-.f64 (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 #s(literal 2 binary64) l))))
(/.f64 (neg.f64 (*.f64 l (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) #s(literal 8 binary64)))) (neg.f64 (-.f64 (fma.f64 l (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) #s(literal 4 binary64)) (*.f64 l (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 l (fma.f64 (*.f64 l l) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64)))) (neg.f64 (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) #s(literal 8 binary64)) l)) (neg.f64 (-.f64 (fma.f64 l (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) #s(literal 4 binary64)) (*.f64 l (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64)) l)) (neg.f64 (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64))))
(/.f64 (fma.f64 #s(literal 8 binary64) (*.f64 l (*.f64 l l)) (*.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))))) (*.f64 l (*.f64 l l)))) (fma.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l) (-.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(*.f64 (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)) l)
(*.f64 (fma.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))))) (*.f64 l (*.f64 l l)) (*.f64 #s(literal 8 binary64) (*.f64 l (*.f64 l l)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 #s(literal 2 binary64) l))))))
(*.f64 (-.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 #s(literal 2 binary64) l))))
(*.f64 (*.f64 l (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) #s(literal 8 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 l (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) #s(literal 4 binary64)) (*.f64 l (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))
(*.f64 (*.f64 l (fma.f64 (*.f64 l l) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64))))
(*.f64 (*.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) #s(literal 8 binary64)) l) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 l (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) #s(literal 4 binary64)) (*.f64 l (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64)) l) (/.f64 #s(literal 1 binary64) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))
(+.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))))
(+.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U)
(-.f64 (/.f64 (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64)) (-.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U)))
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))))) (/.f64 (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64)) (-.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))))))
(fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U)
(fma.f64 (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) J U)
(fma.f64 (*.f64 J (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (fma.f64 (exp.f64 (neg.f64 l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))))) U)
(fma.f64 (*.f64 J (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))) (exp.f64 (-.f64 (neg.f64 l) l)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U)
(fma.f64 (*.f64 (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) J) (/.f64 #s(literal 1 binary64) (fma.f64 (exp.f64 (neg.f64 l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))))) U)
(fma.f64 (*.f64 (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))) (exp.f64 (-.f64 (neg.f64 l) l))) J) (/.f64 #s(literal 1 binary64) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U)
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U U (-.f64 (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64)) (*.f64 J (*.f64 (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U)))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))) (-.f64 (*.f64 U U) (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))))
(/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))) (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64))))
(/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64)) (*.f64 J (*.f64 (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U)))))
(/.f64 (-.f64 (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U))
(/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))) (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U U (-.f64 (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64)) (*.f64 J (*.f64 (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (-.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U)))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64))) (-.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64)) (-.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U)) (*.f64 (-.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U) (*.f64 U U))) (*.f64 (-.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U) (-.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U)))
(/.f64 (neg.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 U (-.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))) (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64)) (*.f64 U U)))) (neg.f64 (neg.f64 (-.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U))))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64)) (-.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 U U) (-.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U)) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64)) (-.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U)) (/.f64 (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64)) (-.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U)) (fma.f64 (/.f64 (*.f64 U U) (-.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U)) (*.f64 (/.f64 (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64)) (-.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))
(*.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 U (-.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))) (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64)))))
(*.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 U U (-.f64 (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64)) (*.f64 J (*.f64 (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))))))
(*.f64 (-.f64 (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64)) (*.f64 U U)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U)))
(*.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 U (-.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))) (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64))))))
(*.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64)) (*.f64 U U))) (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) U))))
(*.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))))))
(+.f64 #s(approx (exp l) #s(literal 1 binary64)) (neg.f64 (exp.f64 (neg.f64 l))))
(+.f64 (neg.f64 (exp.f64 (neg.f64 l))) #s(approx (exp l) #s(literal 1 binary64)))
(-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))
(-.f64 (/.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))) (fma.f64 (exp.f64 (neg.f64 l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))))) (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (fma.f64 (exp.f64 (neg.f64 l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))))))
(-.f64 (/.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))))
(-.f64 (/.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))) (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (neg.f64 (exp.f64 (neg.f64 l))))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (neg.f64 (exp.f64 (neg.f64 l))))))
(fma.f64 #s(literal 1 binary64) (neg.f64 (exp.f64 (neg.f64 l))) #s(approx (exp l) #s(literal 1 binary64)))
(fma.f64 #s(literal -1 binary64) (exp.f64 (neg.f64 l)) #s(approx (exp l) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)) (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (neg.f64 (exp.f64 (neg.f64 l)))))) (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (neg.f64 (exp.f64 (neg.f64 l)))) (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))))
(/.f64 (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (fma.f64 (exp.f64 (neg.f64 l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))))
(/.f64 (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (fma.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)) (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (neg.f64 (exp.f64 (neg.f64 l)))))))
(/.f64 (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))) (exp.f64 (-.f64 (neg.f64 l) l))) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))
(/.f64 (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))) (exp.f64 (-.f64 (neg.f64 l) l))) (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (neg.f64 (exp.f64 (neg.f64 l)))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (exp.f64 (neg.f64 l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (neg.f64 (fma.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)) (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (neg.f64 (exp.f64 (neg.f64 l))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))) (exp.f64 (-.f64 (neg.f64 l) l)))) (neg.f64 (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))) (exp.f64 (-.f64 (neg.f64 l) l)))) (neg.f64 (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (neg.f64 (exp.f64 (neg.f64 l))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))) (fma.f64 (exp.f64 (neg.f64 l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))))) (*.f64 (fma.f64 (exp.f64 (neg.f64 l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (*.f64 (fma.f64 (exp.f64 (neg.f64 l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))) (fma.f64 (exp.f64 (neg.f64 l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) (*.f64 (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))))) (neg.f64 (neg.f64 (fma.f64 (exp.f64 (neg.f64 l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))) (exp.f64 (-.f64 (neg.f64 l) l))))) (neg.f64 (neg.f64 (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))))
(/.f64 (+.f64 (neg.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))))) (+.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))) (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) #s(approx (exp l) #s(literal 1 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))) (fma.f64 (exp.f64 (neg.f64 l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (fma.f64 (exp.f64 (neg.f64 l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))) (fma.f64 (exp.f64 (neg.f64 l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))))) (/.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))) (fma.f64 (exp.f64 (neg.f64 l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))))) (fma.f64 (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (fma.f64 (exp.f64 (neg.f64 l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))))) (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (fma.f64 (exp.f64 (neg.f64 l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))))) (*.f64 (/.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))) (fma.f64 (exp.f64 (neg.f64 l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))))) (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (fma.f64 (exp.f64 (neg.f64 l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) (/.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) (fma.f64 (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) (*.f64 (/.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))
(*.f64 (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (exp.f64 (neg.f64 l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))))))
(*.f64 (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)) (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (neg.f64 (exp.f64 (neg.f64 l))))))))
(*.f64 (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))) (exp.f64 (-.f64 (neg.f64 l) l))) (/.f64 #s(literal 1 binary64) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l)))))
(*.f64 (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))) (exp.f64 (-.f64 (neg.f64 l) l))) (/.f64 #s(literal 1 binary64) (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (neg.f64 (exp.f64 (neg.f64 l))))))
(*.f64 (neg.f64 (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (exp.f64 (neg.f64 l)) (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64)))))))
(*.f64 (neg.f64 (-.f64 (*.f64 #s(approx (exp l) #s(literal 1 binary64)) #s(approx (exp l) #s(literal 1 binary64))) (exp.f64 (-.f64 (neg.f64 l) l)))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))))
#s(approx (exp l) #s(literal 1 binary64))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) U))
(+.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))))
(+.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))))
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))))) (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64)) (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))))))
(fma.f64 J (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) l)) U)
(fma.f64 J (*.f64 (*.f64 l (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) U)
(fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l)) U)
(fma.f64 l (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) U)
(fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) U)
(fma.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) U)
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) l) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l)) #s(literal 2 binary64) U)
(fma.f64 (*.f64 #s(literal 2 binary64) J) (*.f64 l (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) U)
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) l U)
(fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) l U)
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) U)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) U)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U U (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64)) (*.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)))))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)))) (-.f64 (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) U))))
(/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)))) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64))))
(/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64)) (*.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64)) (*.f64 U U)) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))
(/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)))) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U U (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64)) (*.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64))) (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (*.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)))) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64)) (*.f64 U U)))) (neg.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64)))) (neg.f64 (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) (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 J (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (fma.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (*.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) U)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) U))
(*.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)))) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64)))))
(*.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64)) (*.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64)) (*.f64 U U)) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))))
(*.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)))) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64))))))
(*.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64)) (*.f64 U U))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
(*.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l))))))
(*.f64 J (*.f64 l (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))
(*.f64 l (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l)
(*.f64 (*.f64 l (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J)
(*.f64 (*.f64 l J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J)
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal -2 binary64)))
(-.f64 (*.f64 (exp.f64 l) #s(literal 1/2 binary64)) (*.f64 (exp.f64 (neg.f64 l)) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))) #s(literal 2 binary64)) (/.f64 (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))) #s(literal 2 binary64)))
(-.f64 (/.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) #s(literal 2 binary64)) (/.f64 (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) #s(literal 2 binary64)))
(-.f64 (/.f64 (*.f64 (exp.f64 l) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (exp.f64 (neg.f64 l)) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))))) (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))))))
(-.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))
(-.f64 (/.f64 (*.f64 (exp.f64 l) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 (exp.f64 (neg.f64 l)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(sinh.f64 l)
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sinh.f64 l)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sinh.f64 l)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 (sinh.f64 l) #s(literal 1 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (sinh.f64 l))))
(/.f64 (*.f64 (sinh.f64 l) #s(literal -2 binary64)) #s(literal -2 binary64))
(/.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))
(/.f64 (neg.f64 (sinh.f64 l)) #s(literal -1 binary64))
(/.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 (-.f64 (pow.f64 (*.f64 (exp.f64 l) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (exp.f64 (neg.f64 l)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (exp.f64 l) #s(literal 1/2 binary64)) (*.f64 (exp.f64 l) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (exp.f64 (neg.f64 l)) #s(literal 1/2 binary64)) (*.f64 (exp.f64 (neg.f64 l)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (exp.f64 l) #s(literal 1/2 binary64)) (*.f64 (exp.f64 (neg.f64 l)) #s(literal 1/2 binary64))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (sinh.f64 l)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (sinh.f64 l))
(*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) #s(literal 1/2 binary64)))
(*.f64 (sinh.f64 l) #s(literal 1 binary64))
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 1/2 binary64))
(*.f64 (*.f64 (sinh.f64 l) #s(literal -2 binary64)) #s(literal -1/2 binary64))
(*.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))))))
(*.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))
(*.f64 (cosh.f64 l) (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(*.f64 (/.f64 (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))) #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))))
(+.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))))
(+.f64 (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 l #s(literal 1/3 binary64)))
(-.f64 (/.f64 (*.f64 (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64))))) (-.f64 (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 l #s(literal 1/3 binary64)))) (/.f64 (*.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 l #s(literal 1/3 binary64))) (-.f64 (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 l #s(literal 1/3 binary64)))))
(fma.f64 l #s(literal 1/3 binary64) (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))))
(fma.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64))) (*.f64 l #s(literal 1/3 binary64)))
(fma.f64 (*.f64 l l) (*.f64 l #s(literal 1/60 binary64)) (*.f64 l #s(literal 1/3 binary64)))
(fma.f64 #s(literal 1/60 binary64) (*.f64 l (*.f64 l l)) (*.f64 l #s(literal 1/3 binary64)))
(fma.f64 #s(literal 1/3 binary64) l (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))))
(fma.f64 (*.f64 l (*.f64 l #s(literal 1/60 binary64))) l (*.f64 l #s(literal 1/3 binary64)))
(fma.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l) (*.f64 l #s(literal 1/3 binary64)))
(fma.f64 (*.f64 l (*.f64 l l)) #s(literal 1/60 binary64) (*.f64 l #s(literal 1/3 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (-.f64 (*.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 l #s(literal 1/3 binary64))) (*.f64 (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 l #s(literal 1/3 binary64))))) (fma.f64 (*.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 l (*.f64 l l))) #s(literal 1/216000 binary64)) (*.f64 l (*.f64 l l)) (*.f64 #s(literal 1/27 binary64) (*.f64 l (*.f64 l l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 l #s(literal 1/3 binary64))) (-.f64 (*.f64 (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64))))) (*.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 l #s(literal 1/3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal 1/9 binary64)) (*.f64 (*.f64 l l) #s(literal 1/180 binary64))) (*.f64 l (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)) (*.f64 l (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal -1/9 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal 1/9 binary64)) (*.f64 (*.f64 l l) #s(literal 1/180 binary64))) (*.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)) l)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal -1/9 binary64)) l)))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 l (*.f64 l l))) #s(literal 1/216000 binary64)) (*.f64 l (*.f64 l l)) (*.f64 #s(literal 1/27 binary64) (*.f64 l (*.f64 l l)))) (fma.f64 (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (-.f64 (*.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 l #s(literal 1/3 binary64))) (*.f64 (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 l #s(literal 1/3 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64))))) (*.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 l #s(literal 1/3 binary64)))) (-.f64 (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 l #s(literal 1/3 binary64))))
(/.f64 (*.f64 l (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64))) (-.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal 1/9 binary64)) (*.f64 (*.f64 l l) #s(literal 1/180 binary64))))
(/.f64 (*.f64 l (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal -1/9 binary64))) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)))
(/.f64 (*.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)) l) (-.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal 1/9 binary64)) (*.f64 (*.f64 l l) #s(literal 1/180 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal -1/9 binary64)) l) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 l (*.f64 l l))) #s(literal 1/216000 binary64)) (*.f64 l (*.f64 l l)) (*.f64 #s(literal 1/27 binary64) (*.f64 l (*.f64 l l))))) (neg.f64 (fma.f64 (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (-.f64 (*.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 l #s(literal 1/3 binary64))) (*.f64 (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 l #s(literal 1/3 binary64)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64))))) (*.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 l #s(literal 1/3 binary64))))) (neg.f64 (-.f64 (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 l #s(literal 1/3 binary64)))))
(/.f64 (neg.f64 (*.f64 l (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)))) (neg.f64 (-.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal 1/9 binary64)) (*.f64 (*.f64 l l) #s(literal 1/180 binary64)))))
(/.f64 (neg.f64 (*.f64 l (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal -1/9 binary64)))) (neg.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)) l)) (neg.f64 (-.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal 1/9 binary64)) (*.f64 (*.f64 l l) #s(literal 1/180 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal -1/9 binary64)) l)) (neg.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))))
(/.f64 (fma.f64 #s(literal 1/27 binary64) (*.f64 l (*.f64 l l)) (*.f64 (*.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 l (*.f64 l l))) #s(literal 1/216000 binary64)) (*.f64 l (*.f64 l l)))) (fma.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 l #s(literal 1/3 binary64)) (-.f64 (*.f64 (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64))))) (*.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64))))))))
(*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))
(*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 l (*.f64 l l))) #s(literal 1/216000 binary64)) (*.f64 l (*.f64 l l)) (*.f64 #s(literal 1/27 binary64) (*.f64 l (*.f64 l l)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (-.f64 (*.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 l #s(literal 1/3 binary64))) (*.f64 (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 l #s(literal 1/3 binary64)))))))
(*.f64 (-.f64 (*.f64 (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64))))) (*.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 l #s(literal 1/3 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (*.f64 l #s(literal 1/3 binary64)))))
(*.f64 (*.f64 l (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal 1/9 binary64)) (*.f64 (*.f64 l l) #s(literal 1/180 binary64)))))
(*.f64 (*.f64 l (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal -1/9 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))))
(*.f64 (*.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)) l) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal 1/9 binary64)) (*.f64 (*.f64 l l) #s(literal 1/180 binary64)))))
(*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal -1/9 binary64)) l) (/.f64 #s(literal 1 binary64) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))))
(+.f64 #s(literal 1/3 binary64) (*.f64 l (*.f64 l #s(literal 1/60 binary64))))
(+.f64 (*.f64 l (*.f64 l #s(literal 1/60 binary64))) #s(literal 1/3 binary64))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64)) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))) (/.f64 #s(literal 1/9 binary64) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))))
(-.f64 (/.f64 #s(literal 1/9 binary64) (-.f64 #s(literal 1/3 binary64) (*.f64 l (*.f64 l #s(literal 1/60 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64)) (-.f64 #s(literal 1/3 binary64) (*.f64 l (*.f64 l #s(literal 1/60 binary64))))))
(fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))
(fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))
(fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64))
(fma.f64 (*.f64 l #s(literal 1/60 binary64)) l #s(literal 1/3 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/9 binary64) (-.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64)) (*.f64 (*.f64 l l) #s(literal 1/180 binary64)))) (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/3 binary64) (*.f64 l (*.f64 l #s(literal 1/60 binary64)))) (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))))
(/.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)) (-.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal 1/9 binary64)) (*.f64 (*.f64 l l) #s(literal 1/180 binary64))))
(/.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)) (+.f64 #s(literal 1/9 binary64) (-.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64)) (*.f64 (*.f64 l l) #s(literal 1/180 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal -1/9 binary64)) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)))
(/.f64 (neg.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64))) (neg.f64 (-.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal 1/9 binary64)) (*.f64 (*.f64 l l) #s(literal 1/180 binary64)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64))) (neg.f64 (+.f64 #s(literal 1/9 binary64) (-.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64)) (*.f64 (*.f64 l l) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal -1/9 binary64))) (neg.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))))
(/.f64 (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64))) (-.f64 #s(literal 1/3 binary64) (*.f64 l (*.f64 l #s(literal 1/60 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64)) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)) #s(literal 1/9 binary64))) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)))) (neg.f64 (neg.f64 (-.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal 1/9 binary64)) (*.f64 (*.f64 l l) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal -1/9 binary64)))) (neg.f64 (neg.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64)))) (neg.f64 (-.f64 #s(literal 1/3 binary64) (*.f64 l (*.f64 l #s(literal 1/60 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64)) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1/9 binary64) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64)) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64)) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))) (fma.f64 (/.f64 #s(literal 1/9 binary64) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))) (/.f64 #s(literal 1/9 binary64) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64)) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))) (/.f64 #s(literal 1/9 binary64) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))
(*.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal 1/9 binary64)) (*.f64 (*.f64 l l) #s(literal 1/180 binary64)))))
(*.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/9 binary64) (-.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64)) (*.f64 (*.f64 l l) #s(literal 1/180 binary64))))))
(*.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal -1/9 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))))
(*.f64 (neg.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64))) (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal 1/9 binary64)) (*.f64 (*.f64 l l) #s(literal 1/180 binary64))))))
(*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64) #s(literal -1/9 binary64))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)))))
(*.f64 (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal 1/3600 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/3 binary64) (*.f64 l (*.f64 l #s(literal 1/60 binary64))))))

eval149.0ms (1.1%)

Memory
14.9MiB live, 279.9MiB allocated
Compiler

Compiled 26 666 to 2 242 computations (91.6% saved)

prune130.0ms (1%)

Memory
4.8MiB live, 260.0MiB allocated
Pruning

31 alts after pruning (28 fresh and 3 done)

PrunedKeptTotal
New1 132181 150
Fresh51015
Picked235
Done000
Total1 139311 170
Accuracy
100.0%
Counts
1 170 → 31
Alt Table
Click to see full alt table
StatusAccuracyProgram
68.9%
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U)
96.9%
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
94.4%
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
65.3%
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
99.9%
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J)) U)
87.8%
(fma.f64 #s(approx (* (* 2 (sinh l)) (cos (* K 1/2))) (*.f64 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) J U)
65.3%
(+.f64 (*.f64 (/.f64 J #s(approx (/ 1 (* 2 (sinh l))) (/.f64 #s(literal 1/2 binary64) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
65.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U))
43.5%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
49.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
83.6%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))
79.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U))
43.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (cos (* 1/2 K)) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)) #s(literal 1 binary64))) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
62.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) (+.f64 l #s(literal 1 binary64))) (exp.f64 (neg.f64 l))) U))
57.8%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))
79.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (fma.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l l) (*.f64 #s(literal 2 binary64) l))) U))
49.7%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64)) (*.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64)) l)))) U))
81.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
81.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
79.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) U))
73.9%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
54.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
21.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 U (*.f64 U U))) (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))))
22.9%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (-.f64 (*.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
39.9%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (-.f64 (*.f64 U U) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))))) (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))
40.5%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))))
54.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))))
40.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
48.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
29.0%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (*.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
72.8%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)))
Compiler

Compiled 1 468 to 773 computations (47.3% saved)

simplify249.0ms (1.9%)

Memory
20.2MiB live, 438.3MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(sinh.f64 l)
cost-diff0
(*.f64 J (sinh.f64 l))
cost-diff0
(fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U)
cost-diff0
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))
cost-diff0
(*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l)
cost-diff0
(fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U)
cost-diff0
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
cost-diff320
(fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64)))
cost-diff0
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
cost-diff0
#s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))
cost-diff0
(fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U)
cost-diff0
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U))
cost-diff0
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
cost-diff0
(fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)
cost-diff0
#s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U))
cost-diff0
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)))
cost-diff0
(sinh.f64 l)
cost-diff0
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
cost-diff0
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J)) U)
cost-diff1088
(/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J))
Rules
8 024×lower-fma.f32
8 002×lower-fma.f64
4 840×lower-*.f32
4 816×lower-*.f64
2 774×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
059506
097509
1198505
2455499
31150476
42531476
54776476
08161466
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J)) U)
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
#s(literal 2 binary64)
(sinh.f64 l)
l
(/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 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 1 binary64) J)
#s(literal 1 binary64)
J
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)))
#s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U))
(fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)
l
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
J
(fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))
(*.f64 l #s(literal 1/3 binary64))
#s(literal 1/3 binary64)
#s(literal 2 binary64)
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U))
(fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U)
#s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
l
(fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))
(*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))
(fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))
(*.f64 l #s(literal 1/60 binary64))
#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) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
(fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U)
(*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l)
#s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))
(fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)
(*.f64 K K)
K
(fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64)))
(*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)))
J
(fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))
#s(literal -1/46080 binary64)
#s(literal 1/384 binary64)
(*.f64 J #s(literal -1/8 binary64))
#s(literal -1/8 binary64)
l
#s(literal 2 binary64)
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))
(fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U)
(*.f64 J (sinh.f64 l))
J
(sinh.f64 l)
l
#s(literal 2 binary64)
U
Outputs
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J)) U)
(fma.f64 (sinh.f64 l) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) J)) U)
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
#s(literal 2 binary64)
(sinh.f64 l)
l
(/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J)
(cos.f64 (*.f64 K #s(literal 1/2 binary64)))
(*.f64 K #s(literal 1/2 binary64))
K
#s(literal 1/2 binary64)
(/.f64 #s(literal 1 binary64) J)
#s(literal 1 binary64)
J
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) (*.f64 l J) U)))
#s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U))
#s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) (*.f64 l J) U))
(fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)
(fma.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) (*.f64 l J) U)
l
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
J
(fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))
(fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))
(*.f64 l #s(literal 1/3 binary64))
#s(literal 1/3 binary64)
#s(literal 2 binary64)
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 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) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)))) U))
(fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U)
(fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)))) U)
#s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))
#s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(*.f64 l (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)))
l
(fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))
(fma.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64))
(*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))
(fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))
(*.f64 l #s(literal 1/60 binary64))
#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) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l) U))
(fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U)
(fma.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l) U)
(*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l)
(*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) #s(literal -1/8 binary64))) J)))
#s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))
#s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) #s(literal -1/8 binary64))) J))
(fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)
(fma.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) #s(literal -1/8 binary64))) J)
(*.f64 K K)
K
(fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64)))
(*.f64 J (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)))
(*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)))
(*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))
J
(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))
#s(literal -1/46080 binary64)
#s(literal 1/384 binary64)
(*.f64 J #s(literal -1/8 binary64))
#s(literal -1/8 binary64)
l
#s(literal 2 binary64)
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) U))
(fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U)
(fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J) U)
(*.f64 J (sinh.f64 l))
(*.f64 (sinh.f64 l) J)
J
(sinh.f64 l)
l
#s(literal 2 binary64)
U

localize367.0ms (2.8%)

Memory
-2.9MiB live, 550.1MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy100.0%
(fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U)
accuracy100.0%
(*.f64 J (sinh.f64 l))
accuracy100.0%
(sinh.f64 l)
accuracy83.6%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))
accuracy99.8%
(*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l)
accuracy93.5%
(*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)))
accuracy65.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
accuracy54.1%
#s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))
accuracy99.9%
(*.f64 l #s(literal 1/60 binary64))
accuracy99.6%
(*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))
accuracy93.3%
#s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))
accuracy83.6%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U))
accuracy99.4%
(*.f64 l #s(literal 1/3 binary64))
accuracy95.6%
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
accuracy86.0%
#s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U))
accuracy83.6%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)))
accuracy100.0%
(cos.f64 (*.f64 K #s(literal 1/2 binary64)))
accuracy100.0%
(sinh.f64 l)
accuracy99.9%
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J)) U)
accuracy99.6%
(/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J))
Samples
98.0ms89×1valid
75.0ms133×0valid
64.0ms34×2valid
Compiler

Compiled 338 to 63 computations (81.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 180.0ms
ival-mult: 71.0ms (39.5% of total)
ival-exp: 28.0ms (15.6% of total)
ival-add: 21.0ms (11.7% of total)
adjust: 18.0ms (10% of total)
const: 16.0ms (8.9% of total)
ival-cos: 14.0ms (7.8% of total)
ival-div: 7.0ms (3.9% of total)
ival-sub: 2.0ms (1.1% of total)
ival-sinh: 2.0ms (1.1% of total)
exact: 1.0ms (0.6% of total)
ival-neg: 1.0ms (0.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series24.0ms (0.2%)

Memory
15.9MiB live, 52.1MiB allocated
Counts
25 → 708
Calls
Call 1
Inputs
#<alt (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J))>
#<alt (fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J)) U)>
#<alt (*.f64 #s(literal 2 binary64) (sinh.f64 l))>
#<alt (sinh.f64 l)>
#<alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)))>
#<alt #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U))>
#<alt (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)>
#<alt (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))>
#<alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U))>
#<alt (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U)>
#<alt #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))>
#<alt (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))>
#<alt (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64)))>
#<alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))>
#<alt (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U)>
#<alt (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l)>
#<alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))>
#<alt (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U)>
#<alt (*.f64 J (sinh.f64 l))>
#<alt (cos.f64 (*.f64 K #s(literal 1/2 binary64)))>
#<alt (*.f64 l #s(literal 1/3 binary64))>
#<alt (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))>
#<alt (*.f64 l #s(literal 1/60 binary64))>
#<alt #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))>
#<alt (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)))>
Outputs
#<alt J>
#<alt (+ J (* -1/8 (* J (pow K 2))))>
#<alt (+ J (* (pow K 2) (+ (* -1/8 J) (* 1/384 (* J (pow K 2))))))>
#<alt (+ J (* (pow K 2) (+ (* -1/8 J) (* (pow K 2) (+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))))))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt U>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))>
#<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)))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))>
#<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))))))))))>
#<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)))))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt U>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))>
#<alt (* 2 l)>
#<alt (* l (+ 2 (* 1/3 (pow l 2))))>
#<alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))>
#<alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))>
#<alt (- (exp l) (/ 1 (exp l)))>
#<alt (- (exp l) (/ 1 (exp l)))>
#<alt (- (exp l) (/ 1 (exp l)))>
#<alt (- (exp l) (/ 1 (exp l)))>
#<alt (- (exp l) (/ 1 (exp l)))>
#<alt (- (exp l) (/ 1 (exp l)))>
#<alt (- (exp l) (/ 1 (exp l)))>
#<alt (- (exp l) (/ 1 (exp l)))>
#<alt l>
#<alt (* l (+ 1 (* 1/6 (pow l 2))))>
#<alt (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))>
#<alt (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt (* 1/2 (- (exp l) (/ 1 (exp l))))>
#<alt U>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt U>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))>
#<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)))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))>
#<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))))))))))>
#<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)))))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt U>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (+ (exp l) (/ U J)) (exp (neg l))))>
#<alt (* J (- (+ (exp l) (/ U J)) (exp (neg l))))>
#<alt (* J (- (+ (exp l) (/ U J)) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))>
#<alt U>
#<alt (+ U (* 2 (* J l)))>
#<alt (+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))>
#<alt (+ U (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))>
#<alt (* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))>
#<alt (* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))>
#<alt U>
#<alt (+ U (* 2 (* J l)))>
#<alt (+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))>
#<alt (+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))>
#<alt (* 1/3 (* J (pow l 3)))>
#<alt (* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))>
#<alt (* (pow l 3) (+ (* 1/3 J) (+ (* 2 (/ J (pow l 2))) (/ U (pow l 3)))))>
#<alt (* (pow l 3) (+ (* 1/3 J) (+ (* 2 (/ J (pow l 2))) (/ U (pow l 3)))))>
#<alt (* 1/3 (* J (pow l 3)))>
#<alt (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))>
#<alt (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 J)))))>
#<alt (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 J)))))>
#<alt U>
#<alt (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))>
#<alt (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))>
#<alt (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))>
#<alt (* J (* l (+ 2 (* 1/3 (pow l 2)))))>
#<alt (* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (/ U J)))>
#<alt (* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (/ U J)))>
#<alt (* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (/ U J)))>
#<alt (* J (* l (+ 2 (* 1/3 (pow l 2)))))>
#<alt (* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (* -1 (/ U J)))))>
#<alt (* J (* l (+ 2 (* 1/3 (pow l 2)))))>
#<alt (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))>
#<alt (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))>
#<alt (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)))>
#<alt (* U (+ 1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)))>
#<alt (* U (+ 1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)) 1)))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* J (+ 2 (* 1/3 (pow l 2))))>
#<alt (* 2 J)>
#<alt (+ (* 1/3 (* J (pow l 2))) (* 2 J))>
#<alt (+ (* 1/3 (* J (pow l 2))) (* 2 J))>
#<alt (+ (* 1/3 (* J (pow l 2))) (* 2 J))>
#<alt (* 1/3 (* J (pow l 2)))>
#<alt (* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))>
#<alt (* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))>
#<alt (* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))>
#<alt (* 1/3 (* J (pow l 2)))>
#<alt (* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))>
#<alt (* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))>
#<alt (* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))>
#<alt U>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt U>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))>
#<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)))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))>
#<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))))))))))>
#<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)))))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt U>
#<alt (+ U (* 2 (* J l)))>
#<alt (+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))>
#<alt (+ U (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt (+ U (* J (- (exp l) (exp (* -1 l)))))>
#<alt U>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* J (- (+ (exp l) (/ U J)) (exp (neg l))))>
#<alt (* J (- (+ (exp l) (/ U J)) (exp (neg l))))>
#<alt (* J (- (+ (exp l) (/ U J)) (exp (neg l))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))>
#<alt (* J (- (exp l) (exp (neg l))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))>
#<alt (* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))>
#<alt (* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))>
#<alt (* 2 l)>
#<alt (* l (+ 2 (* 1/3 (pow l 2))))>
#<alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))>
#<alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))>
#<alt (- (exp l) (exp (neg l)))>
#<alt (- (exp l) (exp (neg l)))>
#<alt (- (exp l) (exp (neg l)))>
#<alt (- (exp l) (exp (neg l)))>
#<alt (- (exp l) (exp (* -1 l)))>
#<alt (- (exp l) (exp (* -1 l)))>
#<alt (- (exp l) (exp (* -1 l)))>
#<alt (- (exp l) (exp (* -1 l)))>
#<alt (* 2 l)>
#<alt (* l (+ 2 (* 1/3 (pow l 2))))>
#<alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))>
#<alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))>
#<alt (* 1/60 (pow l 5))>
#<alt (* (pow l 5) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* (pow l 5) (+ 1/60 (+ (* 1/3 (/ 1 (pow l 2))) (/ 2 (pow l 4)))))>
#<alt (* (pow l 5) (+ 1/60 (+ (* 1/3 (/ 1 (pow l 2))) (/ 2 (pow l 4)))))>
#<alt (* 1/60 (pow l 5))>
#<alt (* (pow l 5) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* -1 (* (pow l 5) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow l 2)))) (pow l 2))) 1/60)))>
#<alt (* -1 (* (pow l 5) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow l 2)))) (pow l 2))) 1/60)))>
#<alt (* -1/8 J)>
#<alt (+ (* -1/8 J) (* 1/384 (* J (pow K 2))))>
#<alt (+ (* -1/8 J) (* (pow K 2) (+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))))>
#<alt (+ (* -1/8 J) (* (pow K 2) (+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))))>
#<alt (* -1/46080 (* J (pow K 4)))>
#<alt (* (pow K 4) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))>
#<alt (* (pow K 4) (+ (* -1/8 (/ J (pow K 4))) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2))))))>
#<alt (* (pow K 4) (+ (* -1/8 (/ J (pow K 4))) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2))))))>
#<alt (* -1/46080 (* J (pow K 4)))>
#<alt (* (pow K 4) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))>
#<alt (* (pow K 4) (+ (* -1/8 (/ J (pow K 4))) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2))))))>
#<alt (* (pow K 4) (+ (* -1/8 (/ J (pow K 4))) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2))))))>
#<alt (* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))>
#<alt (* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))>
#<alt (* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))>
#<alt (* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))>
#<alt (* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))>
#<alt (* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))>
#<alt (* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))>
#<alt (* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))>
#<alt (* -1 (* J (+ 1/8 (* -1 (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2))))))))>
#<alt (* -1 (* J (+ 1/8 (* -1 (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2))))))))>
#<alt (* -1 (* J (+ 1/8 (* -1 (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2))))))))>
#<alt (* -1 (* J (+ 1/8 (* -1 (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2))))))))>
#<alt U>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt U>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))>
#<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)))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))>
#<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))))))))))>
#<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)))))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt U>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (* 2 (* J (* l (cos (* 1/2 K)))))>
#<alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))>
#<alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))>
#<alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))>
#<alt (* 2 (* J (* l (cos (* 1/2 K)))))>
#<alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))>
#<alt (+ U (* 2 (* J l)))>
#<alt (+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))>
#<alt (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))>
#<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))))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt U>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (* 2 (* J (* l (cos (* 1/2 K)))))>
#<alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))>
#<alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))>
#<alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))>
#<alt (* 2 (* J (* l (cos (* 1/2 K)))))>
#<alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))>
#<alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))>
#<alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))>
#<alt (* 2 (* J (* l (cos (* 1/2 K)))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt U>
#<alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))>
#<alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))>
#<alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))>
#<alt U>
#<alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))>
#<alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))>
#<alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J l)>
#<alt (+ (* -1/8 (* J (* (pow K 2) l))) (* J l))>
#<alt (+ (* J l) (* (pow K 2) (+ (* -1/8 (* J l)) (* 1/384 (* J (* (pow K 2) l))))))>
#<alt (+ (* J l) (* (pow K 2) (+ (* -1/8 (* J l)) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) l))) (* 1/384 (* J l)))))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt (* J (* l (cos (* 1/2 K))))>
#<alt U>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))>
#<alt U>
#<alt (+ U (* 2 (* J (* l (cos (* 1/2 K))))))>
#<alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))>
#<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)))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))>
#<alt (+ U (* J (- (exp l) (exp (neg l)))))>
#<alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))>
#<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))))))))))>
#<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)))))))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))>
#<alt U>
#<alt (+ U (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (+ U (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (+ U (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (* J (- (+ (exp l) (/ U J)) (/ 1 (exp l))))>
#<alt (* J (- (+ (exp l) (/ U J)) (/ 1 (exp l))))>
#<alt (* J (- (+ (exp l) (/ U J)) (/ 1 (exp l))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (* -1 (* J (+ (* -1 (- (exp l) (/ 1 (exp l)))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (- (exp l) (/ 1 (exp l)))) (* -1 (/ U J)))))>
#<alt (* -1 (* J (+ (* -1 (- (exp l) (/ 1 (exp l)))) (* -1 (/ U J)))))>
#<alt U>
#<alt (+ U (* 2 (* J l)))>
#<alt (+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))>
#<alt (+ U (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))))>
#<alt (+ U (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (+ U (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (+ U (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (+ U (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (+ U (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (+ U (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (+ U (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (+ U (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (* J (- (exp l) (/ 1 (exp l))))>
#<alt (+ U (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (+ U (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (+ U (* J (- (exp l) (/ 1 (exp l)))))>
#<alt U>
#<alt (* U (+ 1 (/ (* J (- (exp l) (/ 1 (exp l)))) U)))>
#<alt (* U (+ 1 (/ (* J (- (exp l) (/ 1 (exp l)))) U)))>
#<alt (* U (+ 1 (/ (* J (- (exp l) (/ 1 (exp l)))) U)))>
#<alt U>
#<alt (* -1 (* U (- (* -1 (/ (* J (- (exp l) (/ 1 (exp l)))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (- (exp l) (/ 1 (exp l)))) U)) 1)))>
#<alt (* -1 (* U (- (* -1 (/ (* J (- (exp l) (/ 1 (exp l)))) U)) 1)))>
#<alt (* 1/2 (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (* 1/2 (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (* 1/2 (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (* 1/2 (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (* 1/2 (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (* 1/2 (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (* 1/2 (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (* 1/2 (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (* 1/2 (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (* 1/2 (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (* 1/2 (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (* 1/2 (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (* J l)>
#<alt (* l (+ J (* 1/6 (* J (pow l 2)))))>
#<alt (* l (+ J (* (pow l 2) (+ (* 1/120 (* J (pow l 2))) (* 1/6 J)))))>
#<alt (* l (+ J (* (pow l 2) (+ (* 1/6 J) (* (pow l 2) (+ (* 1/5040 (* J (pow l 2))) (* 1/120 J)))))))>
#<alt (* 1/2 (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (* 1/2 (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (* 1/2 (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (* 1/2 (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (* 1/2 (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (* 1/2 (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (* 1/2 (* J (- (exp l) (/ 1 (exp l)))))>
#<alt (* 1/2 (* J (- (exp l) (/ 1 (exp l)))))>
#<alt 1>
#<alt (+ 1 (* -1/8 (pow K 2)))>
#<alt (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))>
#<alt (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))>
#<alt (cos (* 1/2 K))>
#<alt (cos (* 1/2 K))>
#<alt (cos (* 1/2 K))>
#<alt (cos (* 1/2 K))>
#<alt (cos (* 1/2 K))>
#<alt (cos (* 1/2 K))>
#<alt (cos (* 1/2 K))>
#<alt (cos (* 1/2 K))>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* 1/3 l)>
#<alt (* l (+ 1/3 (* 1/60 (pow l 2))))>
#<alt (* l (+ 1/3 (* 1/60 (pow l 2))))>
#<alt (* l (+ 1/3 (* 1/60 (pow l 2))))>
#<alt (* 1/60 (pow l 3))>
#<alt (* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* 1/60 (pow l 3))>
#<alt (* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))>
#<alt (* 1/60 l)>
#<alt (* 1/60 l)>
#<alt (* 1/60 l)>
#<alt (* 1/60 l)>
#<alt (* 1/60 l)>
#<alt (* 1/60 l)>
#<alt (* 1/60 l)>
#<alt (* 1/60 l)>
#<alt (* 1/60 l)>
#<alt (* 1/60 l)>
#<alt (* 1/60 l)>
#<alt (* 1/60 l)>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt J>
#<alt (+ J (* -1/8 (* J (pow K 2))))>
#<alt (+ J (* (pow K 2) (+ (* -1/8 J) (* 1/384 (* J (pow K 2))))))>
#<alt (+ J (* (pow K 2) (+ (* -1/8 J) (* (pow K 2) (+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))))))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (cos (* 1/2 K)))>
#<alt (* J (+ 1/384 (* -1/46080 (pow K 2))))>
#<alt (* J (+ 1/384 (* -1/46080 (pow K 2))))>
#<alt (* J (+ 1/384 (* -1/46080 (pow K 2))))>
#<alt (* J (+ 1/384 (* -1/46080 (pow K 2))))>
#<alt (* J (+ 1/384 (* -1/46080 (pow K 2))))>
#<alt (* J (+ 1/384 (* -1/46080 (pow K 2))))>
#<alt (* J (+ 1/384 (* -1/46080 (pow K 2))))>
#<alt (* J (+ 1/384 (* -1/46080 (pow K 2))))>
#<alt (* J (+ 1/384 (* -1/46080 (pow K 2))))>
#<alt (* J (+ 1/384 (* -1/46080 (pow K 2))))>
#<alt (* J (+ 1/384 (* -1/46080 (pow K 2))))>
#<alt (* J (+ 1/384 (* -1/46080 (pow K 2))))>
#<alt (* 1/384 J)>
#<alt (+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))>
#<alt (+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))>
#<alt (+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))>
#<alt (* -1/46080 (* J (pow K 2)))>
#<alt (* (pow K 2) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))>
#<alt (* (pow K 2) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))>
#<alt (* (pow K 2) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))>
#<alt (* -1/46080 (* J (pow K 2)))>
#<alt (* (pow K 2) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))>
#<alt (* (pow K 2) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))>
#<alt (* (pow K 2) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))>
Calls

177 calls:

TimeVariablePointExpression
4.0ms
J
@0
(+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8))
1.0ms
J
@inf
(+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8))
1.0ms
K
@inf
(+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8))
0.0ms
U
@0
(+ (* l (* J (+ (* l (* l 1/3)) 2))) U)
0.0ms
K
@0
(+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8))

simplify749.0ms (5.7%)

Memory
-189.2MiB live, 721.5MiB allocated
Algorithm
egg-herbie
Rules
16 772×lower-fma.f64
16 772×lower-fma.f32
6 916×lower-*.f64
6 916×lower-*.f32
4 654×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03958762
113108700
238938323
082757783
Stop Event
iter limit
node limit
Counts
708 → 665
Calls
Call 1
Inputs
J
(+ J (* -1/8 (* J (pow K 2))))
(+ J (* (pow K 2) (+ (* -1/8 J) (* 1/384 (* J (pow K 2))))))
(+ J (* (pow K 2) (+ (* -1/8 J) (* (pow K 2) (+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))))))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (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 (* 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))))))
(+ 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))))))
(+ 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)))))))))))
(+ 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))))))
(+ 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))))))
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 (* (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) (/ 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) (/ 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
(* 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
(* -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)))
(* 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))))))))
(- (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)))
(- (exp l) (/ 1 (exp l)))
(- (exp l) (/ 1 (exp l)))
(- (exp l) (/ 1 (exp l)))
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))))))))
(* 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/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
(+ 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)))) (/ 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)))))
(* -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)))))
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 (* 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 (* -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 (- (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 (* 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))))))
(+ 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))))))
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
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(* J (- (exp l) (exp (neg l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
U
(+ U (* 2 (* J l)))
(+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
(+ U (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(* J (- (exp l) (exp (neg l))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
U
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
U
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
U
(+ U (* 2 (* J l)))
(+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
(+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
(* 1/3 (* J (pow l 3)))
(* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(* (pow l 3) (+ (* 1/3 J) (+ (* 2 (/ J (pow l 2))) (/ U (pow l 3)))))
(* (pow l 3) (+ (* 1/3 J) (+ (* 2 (/ J (pow l 2))) (/ U (pow l 3)))))
(* 1/3 (* J (pow l 3)))
(* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))
(* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 J)))))
(* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 J)))))
U
(+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))
(+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))
(+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (/ U J)))
(* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (/ U J)))
(* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (/ U J)))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (* -1 (/ U J)))))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))
(+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))
(+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))
U
(* U (+ 1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)))
(* U (+ 1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)))
(* U (+ 1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)))
U
(* -1 (* U (- (* -1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)) 1)))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* J (+ 2 (* 1/3 (pow l 2))))
(* 2 J)
(+ (* 1/3 (* J (pow l 2))) (* 2 J))
(+ (* 1/3 (* J (pow l 2))) (* 2 J))
(+ (* 1/3 (* J (pow l 2))) (* 2 J))
(* 1/3 (* J (pow l 2)))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(* 1/3 (* J (pow l 2)))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
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)))) (/ 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)))))
(* -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)))))
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 (* 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 (* -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 (- (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 (* 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))))))
(+ 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))))))
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
(+ U (* 2 (* J l)))
(+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
(+ U (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
(+ U (* J (- (exp l) (exp (* -1 l)))))
U
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(* J (- (exp l) (exp (neg l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(* J (- (exp l) (exp (neg l))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (* J (- (exp l) (exp (neg l)))))
U
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
U
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(* 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))))))))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
(* 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 (* 1/60 (pow l 2))))))
(* 1/60 (pow l 5))
(* (pow l 5) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* (pow l 5) (+ 1/60 (+ (* 1/3 (/ 1 (pow l 2))) (/ 2 (pow l 4)))))
(* (pow l 5) (+ 1/60 (+ (* 1/3 (/ 1 (pow l 2))) (/ 2 (pow l 4)))))
(* 1/60 (pow l 5))
(* (pow l 5) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* -1 (* (pow l 5) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow l 2)))) (pow l 2))) 1/60)))
(* -1 (* (pow l 5) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow l 2)))) (pow l 2))) 1/60)))
(* -1/8 J)
(+ (* -1/8 J) (* 1/384 (* J (pow K 2))))
(+ (* -1/8 J) (* (pow K 2) (+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))))
(+ (* -1/8 J) (* (pow K 2) (+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))))
(* -1/46080 (* J (pow K 4)))
(* (pow K 4) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))
(* (pow K 4) (+ (* -1/8 (/ J (pow K 4))) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2))))))
(* (pow K 4) (+ (* -1/8 (/ J (pow K 4))) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2))))))
(* -1/46080 (* J (pow K 4)))
(* (pow K 4) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))
(* (pow K 4) (+ (* -1/8 (/ J (pow K 4))) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2))))))
(* (pow K 4) (+ (* -1/8 (/ J (pow K 4))) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2))))))
(* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))
(* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))
(* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))
(* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))
(* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))
(* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))
(* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))
(* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))
(* -1 (* J (+ 1/8 (* -1 (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2))))))))
(* -1 (* J (+ 1/8 (* -1 (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2))))))))
(* -1 (* J (+ 1/8 (* -1 (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2))))))))
(* -1 (* J (+ 1/8 (* -1 (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2))))))))
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)))) (/ 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)))))
(* -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)))))
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 (* 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 (* -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 (- (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 (* 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))))))
(+ 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))))))
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
(+ 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 (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 (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 (* 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 (* 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 (* 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 (* 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 (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 (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 (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 (* 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 (- (* -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)))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J l)
(+ (* -1/8 (* J (* (pow K 2) l))) (* J l))
(+ (* J l) (* (pow K 2) (+ (* -1/8 (* J l)) (* 1/384 (* J (* (pow K 2) l))))))
(+ (* J l) (* (pow K 2) (+ (* -1/8 (* J l)) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) l))) (* 1/384 (* J l)))))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
(* J (* l (cos (* 1/2 K))))
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)))) (/ 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)))))
(* -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)))))
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 (* 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 (* -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 (- (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 (* 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))))))
(+ 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))))))
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
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(* J (- (exp l) (/ 1 (exp l))))
(* J (- (+ (exp l) (/ U J)) (/ 1 (exp l))))
(* J (- (+ (exp l) (/ U J)) (/ 1 (exp l))))
(* J (- (+ (exp l) (/ U J)) (/ 1 (exp l))))
(* J (- (exp l) (/ 1 (exp l))))
(* -1 (* J (+ (* -1 (- (exp l) (/ 1 (exp l)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (- (exp l) (/ 1 (exp l)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (- (exp l) (/ 1 (exp l)))) (* -1 (/ U J)))))
U
(+ U (* 2 (* J l)))
(+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
(+ U (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(* J (- (exp l) (/ 1 (exp l))))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
U
(* U (+ 1 (/ (* J (- (exp l) (/ 1 (exp l)))) U)))
(* U (+ 1 (/ (* J (- (exp l) (/ 1 (exp l)))) U)))
(* U (+ 1 (/ (* J (- (exp l) (/ 1 (exp l)))) U)))
U
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (/ 1 (exp l)))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (/ 1 (exp l)))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (/ 1 (exp l)))) U)) 1)))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(* J l)
(* l (+ J (* 1/6 (* J (pow l 2)))))
(* l (+ J (* (pow l 2) (+ (* 1/120 (* J (pow l 2))) (* 1/6 J)))))
(* l (+ J (* (pow l 2) (+ (* 1/6 J) (* (pow l 2) (+ (* 1/5040 (* J (pow l 2))) (* 1/120 J)))))))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(* 1/2 (* J (- (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)))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(* 1/3 l)
(* 1/3 l)
(* 1/3 l)
(* 1/3 l)
(* 1/3 l)
(* 1/3 l)
(* 1/3 l)
(* 1/3 l)
(* 1/3 l)
(* 1/3 l)
(* 1/3 l)
(* 1/3 l)
(* 1/3 l)
(* l (+ 1/3 (* 1/60 (pow l 2))))
(* l (+ 1/3 (* 1/60 (pow l 2))))
(* l (+ 1/3 (* 1/60 (pow l 2))))
(* 1/60 (pow l 3))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* 1/60 (pow l 3))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(* 1/60 l)
(* 1/60 l)
(* 1/60 l)
(* 1/60 l)
(* 1/60 l)
(* 1/60 l)
(* 1/60 l)
(* 1/60 l)
(* 1/60 l)
(* 1/60 l)
(* 1/60 l)
(* 1/60 l)
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
J
(+ J (* -1/8 (* J (pow K 2))))
(+ J (* (pow K 2) (+ (* -1/8 J) (* 1/384 (* J (pow K 2))))))
(+ J (* (pow K 2) (+ (* -1/8 J) (* (pow K 2) (+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))))))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (cos (* 1/2 K)))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(* 1/384 J)
(+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))
(+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))
(+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))
(* -1/46080 (* J (pow K 2)))
(* (pow K 2) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))
(* (pow K 2) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))
(* (pow K 2) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))
(* -1/46080 (* J (pow K 2)))
(* (pow K 2) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))
(* (pow K 2) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))
(* (pow K 2) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))
Outputs
J
(+ J (* -1/8 (* J (pow K 2))))
(fma.f64 J (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) J)
(+ J (* (pow K 2) (+ (* -1/8 J) (* 1/384 (* J (pow K 2))))))
(fma.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64))) J)
(+ J (* (pow K 2) (+ (* -1/8 J) (* (pow K 2) (+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))))))
(fma.f64 (*.f64 K K) (*.f64 J (fma.f64 K (*.f64 K (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))) #s(literal -1/8 binary64))) J)
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (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 l (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))) 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 l (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 l l)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J #s(literal 2 binary64)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 J (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) 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 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)))) 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 (*.f64 K K) (*.f64 (*.f64 K K) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 J (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) J) U))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #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)))))
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.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 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 J (cos.f64 (*.f64 K #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 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 U (/.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 U (/.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 U (/.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/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 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l))) (/.f64 J 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 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l))) (/.f64 J 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 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l))) (/.f64 J U) #s(literal -1 binary64)) (neg.f64 U))
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* l (+ 2 (* 1/3 (pow l 2))))
(*.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 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)))
(- (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)))
l
(* l (+ 1 (* 1/6 (pow l 2))))
(fma.f64 (*.f64 l l) (*.f64 #s(literal 1/6 binary64) l) l)
(* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))
(fma.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/120 binary64) #s(literal 1/6 binary64)) l) l)
(* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))
(fma.f64 l (*.f64 (*.f64 (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l #s(literal 1/5040 binary64)) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) l) l) 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/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/2 (- (exp l) (/ 1 (exp l))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.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 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.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 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.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 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (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 l (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))) 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 l (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 l l)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J #s(literal 2 binary64)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 J (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) 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 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)))) 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 (*.f64 K K) (*.f64 (*.f64 K K) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 J (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) J) U))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (/.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (/.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (/.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) U)
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l))) (/.f64 J 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 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l))) (/.f64 J 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 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l))) (/.f64 J U) #s(literal -1 binary64)) (neg.f64 U))
U
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
U
(+ U (* 2 (* J l)))
(fma.f64 J (*.f64 #s(literal 2 binary64) l) U)
(+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
(fma.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))) U)
(+ U (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))))
(fma.f64 l (fma.f64 J #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(fma.f64 U (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U)) U)
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(fma.f64 U (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U)) U)
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(fma.f64 U (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U)) U)
U
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(neg.f64 (*.f64 U (fma.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J U) #s(literal -1 binary64))))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(neg.f64 (*.f64 U (fma.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J U) #s(literal -1 binary64))))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(neg.f64 (*.f64 U (fma.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J U) #s(literal -1 binary64))))
U
(+ U (* 2 (* J l)))
(fma.f64 J (*.f64 #s(literal 2 binary64) l) U)
(+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
(fma.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))) U)
(+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
(fma.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))) U)
(* 1/3 (* J (pow l 3)))
(*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l))))
(* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(*.f64 (*.f64 l (*.f64 l l)) (*.f64 J (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l)))))
(* (pow l 3) (+ (* 1/3 J) (+ (* 2 (/ J (pow l 2))) (/ U (pow l 3)))))
(*.f64 (*.f64 l (*.f64 l l)) (fma.f64 J (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l))) (/.f64 U (*.f64 l (*.f64 l l)))))
(* (pow l 3) (+ (* 1/3 J) (+ (* 2 (/ J (pow l 2))) (/ U (pow l 3)))))
(*.f64 (*.f64 l (*.f64 l l)) (fma.f64 J (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l))) (/.f64 U (*.f64 l (*.f64 l l)))))
(* 1/3 (* J (pow l 3)))
(*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l))))
(* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))
(*.f64 (*.f64 l (*.f64 l l)) (*.f64 J (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l)))))
(* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 J)))))
(*.f64 (-.f64 (fma.f64 (/.f64 J (*.f64 l l)) #s(literal -2 binary64) (*.f64 J #s(literal -1/3 binary64))) (/.f64 U (*.f64 l (*.f64 l l)))) (neg.f64 (*.f64 l (*.f64 l l))))
(* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 J)))))
(*.f64 (-.f64 (fma.f64 (/.f64 J (*.f64 l l)) #s(literal -2 binary64) (*.f64 J #s(literal -1/3 binary64))) (/.f64 U (*.f64 l (*.f64 l l)))) (neg.f64 (*.f64 l (*.f64 l l))))
U
(+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))
(fma.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))) U)
(+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))
(fma.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))) U)
(+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))
(fma.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))) U)
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(*.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))))
(* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (/ U J)))
(*.f64 J (fma.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) (/.f64 U J)))
(* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (/ U J)))
(*.f64 J (fma.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) (/.f64 U J)))
(* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (/ U J)))
(*.f64 J (fma.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) (/.f64 U J)))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(*.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))))
(* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (* -1 (/ U J)))))
(*.f64 J (fma.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) (/.f64 U J)))
(* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (* -1 (/ U J)))))
(*.f64 J (fma.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) (/.f64 U J)))
(* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (* -1 (/ U J)))))
(*.f64 J (fma.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) (/.f64 U J)))
(* J (* l (+ 2 (* 1/3 (pow l 2)))))
(*.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))))
(+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))
(fma.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))) U)
(+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))
(fma.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))) U)
(+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))
(fma.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))) U)
U
(* U (+ 1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)))
(*.f64 U (fma.f64 (*.f64 J l) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) U) #s(literal 1 binary64)))
(* U (+ 1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)))
(*.f64 U (fma.f64 (*.f64 J l) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) U) #s(literal 1 binary64)))
(* U (+ 1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)))
(*.f64 U (fma.f64 (*.f64 J l) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) U) #s(literal 1 binary64)))
U
(* -1 (* U (- (* -1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)) 1)))
(*.f64 (fma.f64 (*.f64 J (neg.f64 l)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) U) #s(literal -1 binary64)) (neg.f64 U))
(* -1 (* U (- (* -1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)) 1)))
(*.f64 (fma.f64 (*.f64 J (neg.f64 l)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) U) #s(literal -1 binary64)) (neg.f64 U))
(* -1 (* U (- (* -1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)) 1)))
(*.f64 (fma.f64 (*.f64 J (neg.f64 l)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) U) #s(literal -1 binary64)) (neg.f64 U))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(* J (+ 2 (* 1/3 (pow l 2))))
(*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(* 2 J)
(*.f64 J #s(literal 2 binary64))
(+ (* 1/3 (* J (pow l 2))) (* 2 J))
(*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(+ (* 1/3 (* J (pow l 2))) (* 2 J))
(*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(+ (* 1/3 (* J (pow l 2))) (* 2 J))
(*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(* 1/3 (* J (pow l 2)))
(*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(*.f64 (*.f64 l l) (*.f64 J (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l)))))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(*.f64 (*.f64 l l) (*.f64 J (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l)))))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(*.f64 (*.f64 l l) (*.f64 J (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l)))))
(* 1/3 (* J (pow l 2)))
(*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(*.f64 (*.f64 l l) (*.f64 J (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l)))))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(*.f64 (*.f64 l l) (*.f64 J (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l)))))
(* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))
(*.f64 (*.f64 l l) (*.f64 J (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l)))))
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.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 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.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 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.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 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (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 l (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))) 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 l (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 l l)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J #s(literal 2 binary64)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 J (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) 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 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)))) 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 (*.f64 K K) (*.f64 (*.f64 K K) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 J (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) J) U))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (/.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (/.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (/.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) U)
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l))) (/.f64 J 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 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l))) (/.f64 J 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 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l))) (/.f64 J U) #s(literal -1 binary64)) (neg.f64 U))
U
(+ U (* 2 (* J l)))
(fma.f64 J (*.f64 #s(literal 2 binary64) l) U)
(+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
(fma.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))) U)
(+ U (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))))
(fma.f64 l (fma.f64 J #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (* -1 l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
(* J (- (+ (exp l) (/ U J)) (exp (neg l))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
(* -1 (* J (+ (* -1 (- (exp l) (exp (neg l)))) (* -1 (/ U J)))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
(* J (- (exp l) (exp (neg l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(fma.f64 U (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U)) U)
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(fma.f64 U (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U)) U)
(* U (+ 1 (/ (* J (- (exp l) (exp (neg l)))) U)))
(fma.f64 U (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U)) U)
U
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(neg.f64 (*.f64 U (fma.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J U) #s(literal -1 binary64))))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(neg.f64 (*.f64 U (fma.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J U) #s(literal -1 binary64))))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (exp (neg l)))) U)) 1)))
(neg.f64 (*.f64 U (fma.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J U) #s(literal -1 binary64))))
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* l (+ 2 (* 1/3 (pow l 2))))
(*.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(- (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)))
(- (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)))
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* l (+ 2 (* 1/3 (pow l 2))))
(*.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(* 1/60 (pow l 5))
(*.f64 #s(literal 1/60 binary64) (pow.f64 l #s(literal 5 binary64)))
(* (pow l 5) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(*.f64 (pow.f64 l #s(literal 5 binary64)) (+.f64 #s(literal 1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(* (pow l 5) (+ 1/60 (+ (* 1/3 (/ 1 (pow l 2))) (/ 2 (pow l 4)))))
(*.f64 (pow.f64 l #s(literal 5 binary64)) (+.f64 #s(literal 1/60 binary64) (+.f64 (/.f64 #s(literal 1/3 binary64) (*.f64 l l)) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 l l))))))
(* (pow l 5) (+ 1/60 (+ (* 1/3 (/ 1 (pow l 2))) (/ 2 (pow l 4)))))
(*.f64 (pow.f64 l #s(literal 5 binary64)) (+.f64 #s(literal 1/60 binary64) (+.f64 (/.f64 #s(literal 1/3 binary64) (*.f64 l l)) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 l l))))))
(* 1/60 (pow l 5))
(*.f64 #s(literal 1/60 binary64) (pow.f64 l #s(literal 5 binary64)))
(* (pow l 5) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(*.f64 (pow.f64 l #s(literal 5 binary64)) (+.f64 #s(literal 1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(* -1 (* (pow l 5) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow l 2)))) (pow l 2))) 1/60)))
(*.f64 (+.f64 (/.f64 (+.f64 #s(literal -1/3 binary64) (/.f64 #s(literal -2 binary64) (*.f64 l l))) (*.f64 l l)) #s(literal -1/60 binary64)) (neg.f64 (pow.f64 l #s(literal 5 binary64))))
(* -1 (* (pow l 5) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow l 2)))) (pow l 2))) 1/60)))
(*.f64 (+.f64 (/.f64 (+.f64 #s(literal -1/3 binary64) (/.f64 #s(literal -2 binary64) (*.f64 l l))) (*.f64 l l)) #s(literal -1/60 binary64)) (neg.f64 (pow.f64 l #s(literal 5 binary64))))
(* -1/8 J)
(*.f64 J #s(literal -1/8 binary64))
(+ (* -1/8 J) (* 1/384 (* J (pow K 2))))
(*.f64 J (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)))
(+ (* -1/8 J) (* (pow K 2) (+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))))
(*.f64 J (fma.f64 K (*.f64 K (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))) #s(literal -1/8 binary64)))
(+ (* -1/8 J) (* (pow K 2) (+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))))
(*.f64 J (fma.f64 K (*.f64 K (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))) #s(literal -1/8 binary64)))
(* -1/46080 (* J (pow K 4)))
(*.f64 K (*.f64 K (*.f64 (*.f64 J (*.f64 K K)) #s(literal -1/46080 binary64))))
(* (pow K 4) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))
(*.f64 (*.f64 (*.f64 K K) (*.f64 K K)) (*.f64 J (+.f64 #s(literal -1/46080 binary64) (/.f64 #s(literal 1/384 binary64) (*.f64 K K)))))
(* (pow K 4) (+ (* -1/8 (/ J (pow K 4))) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2))))))
(*.f64 (*.f64 (*.f64 K K) (*.f64 K K)) (fma.f64 J (/.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) (*.f64 K K))) (*.f64 J (+.f64 #s(literal -1/46080 binary64) (/.f64 #s(literal 1/384 binary64) (*.f64 K K))))))
(* (pow K 4) (+ (* -1/8 (/ J (pow K 4))) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2))))))
(*.f64 (*.f64 (*.f64 K K) (*.f64 K K)) (fma.f64 J (/.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) (*.f64 K K))) (*.f64 J (+.f64 #s(literal -1/46080 binary64) (/.f64 #s(literal 1/384 binary64) (*.f64 K K))))))
(* -1/46080 (* J (pow K 4)))
(*.f64 K (*.f64 K (*.f64 (*.f64 J (*.f64 K K)) #s(literal -1/46080 binary64))))
(* (pow K 4) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))
(*.f64 (*.f64 (*.f64 K K) (*.f64 K K)) (*.f64 J (+.f64 #s(literal -1/46080 binary64) (/.f64 #s(literal 1/384 binary64) (*.f64 K K)))))
(* (pow K 4) (+ (* -1/8 (/ J (pow K 4))) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2))))))
(*.f64 (*.f64 (*.f64 K K) (*.f64 K K)) (fma.f64 J (/.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) (*.f64 K K))) (*.f64 J (+.f64 #s(literal -1/46080 binary64) (/.f64 #s(literal 1/384 binary64) (*.f64 K K))))))
(* (pow K 4) (+ (* -1/8 (/ J (pow K 4))) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2))))))
(*.f64 (*.f64 (*.f64 K K) (*.f64 K K)) (fma.f64 J (/.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) (*.f64 K K))) (*.f64 J (+.f64 #s(literal -1/46080 binary64) (/.f64 #s(literal 1/384 binary64) (*.f64 K K))))))
(* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))
(*.f64 J (fma.f64 K (*.f64 K (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))) #s(literal -1/8 binary64)))
(* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))
(*.f64 J (fma.f64 K (*.f64 K (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))) #s(literal -1/8 binary64)))
(* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))
(*.f64 J (fma.f64 K (*.f64 K (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))) #s(literal -1/8 binary64)))
(* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))
(*.f64 J (fma.f64 K (*.f64 K (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))) #s(literal -1/8 binary64)))
(* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))
(*.f64 J (fma.f64 K (*.f64 K (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))) #s(literal -1/8 binary64)))
(* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))
(*.f64 J (fma.f64 K (*.f64 K (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))) #s(literal -1/8 binary64)))
(* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))
(*.f64 J (fma.f64 K (*.f64 K (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))) #s(literal -1/8 binary64)))
(* J (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))
(*.f64 J (fma.f64 K (*.f64 K (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))) #s(literal -1/8 binary64)))
(* -1 (* J (+ 1/8 (* -1 (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2))))))))
(*.f64 J (fma.f64 K (*.f64 K (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))) #s(literal -1/8 binary64)))
(* -1 (* J (+ 1/8 (* -1 (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2))))))))
(*.f64 J (fma.f64 K (*.f64 K (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))) #s(literal -1/8 binary64)))
(* -1 (* J (+ 1/8 (* -1 (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2))))))))
(*.f64 J (fma.f64 K (*.f64 K (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))) #s(literal -1/8 binary64)))
(* -1 (* J (+ 1/8 (* -1 (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2))))))))
(*.f64 J (fma.f64 K (*.f64 K (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))) #s(literal -1/8 binary64)))
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.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 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.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 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.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 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (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 l (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))) 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 l (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 l l)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J #s(literal 2 binary64)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 J (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) 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 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)))) 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 (*.f64 K K) (*.f64 (*.f64 K K) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 J (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) J) U))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (/.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (/.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (/.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) U)
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l))) (/.f64 J 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 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l))) (/.f64 J 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 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l))) (/.f64 J U) #s(literal -1 binary64)) (neg.f64 U))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) l) (/.f64 U J)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) l) (/.f64 U J)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) l) (/.f64 U J)))
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) l) (/.f64 U J)))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) l) (/.f64 U J)))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) l) (/.f64 U J)))
(+ U (* 2 (* J l)))
(fma.f64 J (*.f64 #s(literal 2 binary64) l) U)
(+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))
(fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #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 J (*.f64 #s(literal 2 binary64) l) (fma.f64 (*.f64 J (*.f64 (*.f64 K K) l)) (fma.f64 #s(literal 1/192 binary64) (*.f64 K K) #s(literal -1/4 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 (*.f64 K K) (*.f64 (*.f64 J (*.f64 (*.f64 K K) l)) (fma.f64 #s(literal -1/23040 binary64) (*.f64 K K) #s(literal 1/192 binary64))) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 l (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J #s(literal 2 binary64)) (/.f64 U l)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 l (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J #s(literal 2 binary64)) (/.f64 U l)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 l (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J #s(literal 2 binary64)) (/.f64 U l)))
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 l (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J #s(literal 2 binary64)) (/.f64 U l)))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 l (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J #s(literal 2 binary64)) (/.f64 U l)))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 l (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J #s(literal 2 binary64)) (/.f64 U l)))
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
U
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(fma.f64 U (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l)) (/.f64 #s(literal 2 binary64) U)) U)
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(fma.f64 U (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l)) (/.f64 #s(literal 2 binary64) U)) U)
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(fma.f64 U (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l)) (/.f64 #s(literal 2 binary64) U)) U)
U
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (fma.f64 (*.f64 J #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 l U)) #s(literal -1 binary64)) (neg.f64 U))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (fma.f64 (*.f64 J #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 l U)) #s(literal -1 binary64)) (neg.f64 U))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (fma.f64 (*.f64 J #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 l U)) #s(literal -1 binary64)) (neg.f64 U))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J l)
(*.f64 J l)
(+ (* -1/8 (* J (* (pow K 2) l))) (* J l))
(*.f64 l (fma.f64 J (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) J))
(+ (* J l) (* (pow K 2) (+ (* -1/8 (* J l)) (* 1/384 (* J (* (pow K 2) l))))))
(fma.f64 (*.f64 K K) (*.f64 l (*.f64 J (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)))) (*.f64 J l))
(+ (* J l) (* (pow K 2) (+ (* -1/8 (* J l)) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) l))) (* 1/384 (* J l)))))))
(fma.f64 (*.f64 K K) (fma.f64 J (*.f64 #s(literal -1/8 binary64) l) (*.f64 (*.f64 K K) (*.f64 l (*.f64 J (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
(* J (* l (cos (* 1/2 K))))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J l))
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.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 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.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 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.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 J (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 J (*.f64 #s(literal 2 binary64) l)) (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 l (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))) 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 l (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 l l)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J #s(literal 2 binary64)))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 J (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) 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 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 K K) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)))) 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 (*.f64 K K) (*.f64 (*.f64 K K) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 J (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) J) U))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (/.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (/.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 U (/.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) U)
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l))) (/.f64 J 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 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l))) (/.f64 J 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 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l))) (/.f64 J U) #s(literal -1 binary64)) (neg.f64 U))
U
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (+ (exp l) (/ U J)) (/ 1 (exp l))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
(* J (- (+ (exp l) (/ U J)) (/ 1 (exp l))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
(* J (- (+ (exp l) (/ U J)) (/ 1 (exp l))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* -1 (* J (+ (* -1 (- (exp l) (/ 1 (exp l)))) (* -1 (/ U J)))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
(* -1 (* J (+ (* -1 (- (exp l) (/ 1 (exp l)))) (* -1 (/ U J)))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
(* -1 (* J (+ (* -1 (- (exp l) (/ 1 (exp l)))) (* -1 (/ U J)))))
(*.f64 J (+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l)))))
U
(+ U (* 2 (* J l)))
(fma.f64 J (*.f64 #s(literal 2 binary64) l) U)
(+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
(fma.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))) U)
(+ U (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))))
(fma.f64 l (fma.f64 J #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))))) U)
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (- (exp l) (/ 1 (exp l))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(* U (+ 1 (/ (* J (- (exp l) (/ 1 (exp l)))) U)))
(fma.f64 U (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U)) U)
(* U (+ 1 (/ (* J (- (exp l) (/ 1 (exp l)))) U)))
(fma.f64 U (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U)) U)
(* U (+ 1 (/ (* J (- (exp l) (/ 1 (exp l)))) U)))
(fma.f64 U (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 J U)) U)
U
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (/ 1 (exp l)))) U)) 1)))
(neg.f64 (*.f64 U (fma.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J U) #s(literal -1 binary64))))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (/ 1 (exp l)))) U)) 1)))
(neg.f64 (*.f64 U (fma.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J U) #s(literal -1 binary64))))
(* -1 (* U (- (* -1 (/ (* J (- (exp l) (/ 1 (exp l)))) U)) 1)))
(neg.f64 (*.f64 U (fma.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)) (/.f64 J U) #s(literal -1 binary64))))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J #s(literal 1/2 binary64)))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J #s(literal 1/2 binary64)))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J #s(literal 1/2 binary64)))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J #s(literal 1/2 binary64)))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J #s(literal 1/2 binary64)))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J #s(literal 1/2 binary64)))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J #s(literal 1/2 binary64)))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J #s(literal 1/2 binary64)))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J #s(literal 1/2 binary64)))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J #s(literal 1/2 binary64)))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J #s(literal 1/2 binary64)))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J #s(literal 1/2 binary64)))
(* J l)
(*.f64 J l)
(* l (+ J (* 1/6 (* J (pow l 2)))))
(*.f64 l (fma.f64 (*.f64 l l) (*.f64 J #s(literal 1/6 binary64)) J))
(* l (+ J (* (pow l 2) (+ (* 1/120 (* J (pow l 2))) (* 1/6 J)))))
(*.f64 l (fma.f64 (*.f64 l l) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/120 binary64) #s(literal 1/6 binary64))) J))
(* l (+ J (* (pow l 2) (+ (* 1/6 J) (* (pow l 2) (+ (* 1/5040 (* J (pow l 2))) (* 1/120 J)))))))
(*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 J (*.f64 l l)) (fma.f64 l (*.f64 l #s(literal 1/5040 binary64)) #s(literal 1/120 binary64)) (*.f64 J #s(literal 1/6 binary64))) J))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J #s(literal 1/2 binary64)))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J #s(literal 1/2 binary64)))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J #s(literal 1/2 binary64)))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J #s(literal 1/2 binary64)))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J #s(literal 1/2 binary64)))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J #s(literal 1/2 binary64)))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J #s(literal 1/2 binary64)))
(* 1/2 (* J (- (exp l) (/ 1 (exp l)))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 J #s(literal 1/2 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (pow K 2)))
(fma.f64 #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 (*.f64 K K) (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))
(fma.f64 (*.f64 K K) (fma.f64 K (*.f64 K (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))) #s(literal -1/8 binary64)) #s(literal 1 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)))
(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/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* 1/3 l)
(*.f64 l #s(literal 1/3 binary64))
(* l (+ 1/3 (* 1/60 (pow l 2))))
(*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* l (+ 1/3 (* 1/60 (pow l 2))))
(*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* l (+ 1/3 (* 1/60 (pow l 2))))
(*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))
(* 1/60 (pow l 3))
(*.f64 l (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(*.f64 (*.f64 l l) (*.f64 l (+.f64 #s(literal 1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 l l)))))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(*.f64 (*.f64 l l) (*.f64 l (+.f64 #s(literal 1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 l l)))))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(*.f64 (*.f64 l l) (*.f64 l (+.f64 #s(literal 1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 l l)))))
(* 1/60 (pow l 3))
(*.f64 l (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(*.f64 (*.f64 l l) (*.f64 l (+.f64 #s(literal 1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 l l)))))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(*.f64 (*.f64 l l) (*.f64 l (+.f64 #s(literal 1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 l l)))))
(* (pow l 3) (+ 1/60 (* 1/3 (/ 1 (pow l 2)))))
(*.f64 (*.f64 l l) (*.f64 l (+.f64 #s(literal 1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 l l)))))
(* 1/60 l)
(*.f64 l #s(literal 1/60 binary64))
(* 1/60 l)
(*.f64 l #s(literal 1/60 binary64))
(* 1/60 l)
(*.f64 l #s(literal 1/60 binary64))
(* 1/60 l)
(*.f64 l #s(literal 1/60 binary64))
(* 1/60 l)
(*.f64 l #s(literal 1/60 binary64))
(* 1/60 l)
(*.f64 l #s(literal 1/60 binary64))
(* 1/60 l)
(*.f64 l #s(literal 1/60 binary64))
(* 1/60 l)
(*.f64 l #s(literal 1/60 binary64))
(* 1/60 l)
(*.f64 l #s(literal 1/60 binary64))
(* 1/60 l)
(*.f64 l #s(literal 1/60 binary64))
(* 1/60 l)
(*.f64 l #s(literal 1/60 binary64))
(* 1/60 l)
(*.f64 l #s(literal 1/60 binary64))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
J
(+ J (* -1/8 (* J (pow K 2))))
(fma.f64 J (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) J)
(+ J (* (pow K 2) (+ (* -1/8 J) (* 1/384 (* J (pow K 2))))))
(fma.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64))) J)
(+ J (* (pow K 2) (+ (* -1/8 J) (* (pow K 2) (+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))))))
(fma.f64 (*.f64 K K) (*.f64 J (fma.f64 K (*.f64 K (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64))) #s(literal -1/8 binary64))) J)
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (cos (* 1/2 K)))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(*.f64 J (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(*.f64 J (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(*.f64 J (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(*.f64 J (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(*.f64 J (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(*.f64 J (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(*.f64 J (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(*.f64 J (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(*.f64 J (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(*.f64 J (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(*.f64 J (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))
(* J (+ 1/384 (* -1/46080 (pow K 2))))
(*.f64 J (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))
(* 1/384 J)
(*.f64 J #s(literal 1/384 binary64))
(+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))
(*.f64 J (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))
(+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))
(*.f64 J (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))
(+ (* -1/46080 (* J (pow K 2))) (* 1/384 J))
(*.f64 J (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)))
(* -1/46080 (* J (pow K 2)))
(*.f64 (*.f64 J (*.f64 K K)) #s(literal -1/46080 binary64))
(* (pow K 2) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))
(*.f64 (*.f64 K K) (*.f64 J (+.f64 #s(literal -1/46080 binary64) (/.f64 #s(literal 1/384 binary64) (*.f64 K K)))))
(* (pow K 2) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))
(*.f64 (*.f64 K K) (*.f64 J (+.f64 #s(literal -1/46080 binary64) (/.f64 #s(literal 1/384 binary64) (*.f64 K K)))))
(* (pow K 2) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))
(*.f64 (*.f64 K K) (*.f64 J (+.f64 #s(literal -1/46080 binary64) (/.f64 #s(literal 1/384 binary64) (*.f64 K K)))))
(* -1/46080 (* J (pow K 2)))
(*.f64 (*.f64 J (*.f64 K K)) #s(literal -1/46080 binary64))
(* (pow K 2) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))
(*.f64 (*.f64 K K) (*.f64 J (+.f64 #s(literal -1/46080 binary64) (/.f64 #s(literal 1/384 binary64) (*.f64 K K)))))
(* (pow K 2) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))
(*.f64 (*.f64 K K) (*.f64 J (+.f64 #s(literal -1/46080 binary64) (/.f64 #s(literal 1/384 binary64) (*.f64 K K)))))
(* (pow K 2) (+ (* -1/46080 J) (* 1/384 (/ J (pow K 2)))))
(*.f64 (*.f64 K K) (*.f64 J (+.f64 #s(literal -1/46080 binary64) (/.f64 #s(literal 1/384 binary64) (*.f64 K K)))))

rewrite429.0ms (3.2%)

Memory
-11.3MiB live, 710.2MiB allocated
Algorithm
batch-egg-rewrite
Rules
6 600×lower-fma.f32
6 578×lower-fma.f64
5 260×lower-*.f32
5 236×lower-*.f64
3 748×lower-/.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
059413
097393
1389385
22788385
09465385
Stop Event
iter limit
node limit
iter limit
Counts
25 → 427
Calls
Call 1
Inputs
(/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J))
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J)) U)
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(sinh.f64 l)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)))
#s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U))
(fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U))
(fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U)
#s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
(fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U)
(*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))
(fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U)
(*.f64 J (sinh.f64 l))
(cos.f64 (*.f64 K #s(literal 1/2 binary64)))
(*.f64 l #s(literal 1/3 binary64))
(*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))
(*.f64 l #s(literal 1/60 binary64))
#s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))
(*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)))
Outputs
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) J)) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J)))
(neg.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J)))
(/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J)))))
(/.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (/.f64 #s(literal -1 binary64) J))
(/.f64 (neg.f64 (neg.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) J))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J)) #s(literal -1 binary64))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))) (/.f64 #s(literal -1 binary64) J))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J)
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J))
(*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J)))
(*.f64 (neg.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) J)))
(*.f64 (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal -1 binary64)) (neg.f64 J))
(*.f64 (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) J)))
(*.f64 (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (pow.f64 J #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 J #s(literal -1/2 binary64))))
(+.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))))
(+.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) (neg.f64 U))))
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))))) (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) #s(literal 2 binary64)) (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))))))
(fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) U)
(fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 #s(literal 1 binary64) J)) U)
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) U)
(fma.f64 J (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) U)
(fma.f64 J (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J) (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 1 binary64)) U)
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J) (sinh.f64 l)) U)
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) 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 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J) U)
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(fma.f64 (*.f64 J (sinh.f64 l)) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) U)
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sinh.f64 l) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (/.f64 #s(literal -1 binary64) J)) 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 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) J U)
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 1 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))) #s(literal 2 binary64)) (*.f64 J (sinh.f64 l)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 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 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal 1 binary64)) J U)
(fma.f64 (/.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal -1 binary64)) (neg.f64 J) U)
(fma.f64 (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal -1 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 #s(literal -1 binary64) J)) U)
(fma.f64 (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (pow.f64 J #s(literal -1/2 binary64))) (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (pow.f64 J #s(literal -1/2 binary64))) U)
(fma.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) J)) (/.f64 (sinh.f64 l) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) U)
(fma.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) J)) (/.f64 (*.f64 (sinh.f64 l) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 1 binary64)) U)
(fma.f64 (/.f64 (sinh.f64 l) #s(literal 1 binary64)) (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J))) U)
(fma.f64 (/.f64 (sinh.f64 l) #s(literal 1 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) J)) U)
(fma.f64 (/.f64 (sinh.f64 l) (/.f64 #s(literal 1 binary64) J)) (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) U)
(fma.f64 (/.f64 (sinh.f64 l) (/.f64 #s(literal 1 binary64) J)) (/.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 1 binary64)) U)
(fma.f64 (/.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J))) U)
(fma.f64 (/.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) J)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) U)
(fma.f64 (/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J))) U)
(fma.f64 (/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (/.f64 #s(literal 1 binary64) J)) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) U)
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 #s(literal 1 binary64) J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (pow.f64 J #s(literal -1/2 binary64))) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (pow.f64 J #s(literal -1/2 binary64))) U)
(fma.f64 (/.f64 #s(literal 2 binary64) (pow.f64 J #s(literal -1/2 binary64))) (/.f64 (*.f64 (sinh.f64 l) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (pow.f64 J #s(literal -1/2 binary64))) U)
(fma.f64 (/.f64 (sinh.f64 l) #s(literal -1 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (/.f64 #s(literal -1 binary64) J)) U)
(fma.f64 (/.f64 (sinh.f64 l) (pow.f64 J #s(literal -1/2 binary64))) (/.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (pow.f64 J #s(literal -1/2 binary64))) U)
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J)) U)
(fma.f64 (/.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J) #s(literal 2 binary64)) (/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (cosh.f64 l)) U)
(fma.f64 (/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 2 binary64)) (/.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J) (cosh.f64 l)) U)
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) (neg.f64 U)) (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 U U)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))))) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) #s(literal 2 binary64))) (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J) (sinh.f64 l)) #s(literal 3 binary64)) (*.f64 U (*.f64 U U)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) (neg.f64 U)) (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 U U))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))))) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) #s(literal 2 binary64))) (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J) (sinh.f64 l)) #s(literal 3 binary64)) (*.f64 U (*.f64 U U))))))
(/.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J) (sinh.f64 l)) #s(literal 3 binary64)) (*.f64 U (*.f64 U U))) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))))) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J) (sinh.f64 l)) #s(literal 3 binary64)) (*.f64 U (*.f64 U U))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 J (sinh.f64 l)) U))))))
(/.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 U U))) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) (neg.f64 U)))
(/.f64 (neg.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 U U)))) (neg.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) (neg.f64 U))))
(/.f64 (neg.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J) (sinh.f64 l)) #s(literal 3 binary64)) (*.f64 U (*.f64 U U)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))))) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J) (sinh.f64 l)) #s(literal 3 binary64)) (*.f64 U (*.f64 U U)))) (neg.f64 (fma.f64 U U (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 J (sinh.f64 l)) U)))))))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) #s(literal 2 binary64))) (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) (neg.f64 U))) (*.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) (neg.f64 U)) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) (neg.f64 U))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 U U))))) (neg.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) (neg.f64 U)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J) (sinh.f64 l)) #s(literal 3 binary64)) (*.f64 U (*.f64 U U))))) (neg.f64 (neg.f64 (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))))) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))))))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) (neg.f64 U)) (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 U U)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))))) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) #s(literal 2 binary64))) (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J) (sinh.f64 l)) #s(literal 3 binary64)) (*.f64 U (*.f64 U U)))) #s(literal -1 binary64))
(*.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J) (sinh.f64 l)) #s(literal 3 binary64)) (*.f64 U (*.f64 U U))) (/.f64 #s(literal 1 binary64) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))))) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) #s(literal 2 binary64)))))
(*.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 U U))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) (neg.f64 U))))
(+.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))
(+.f64 (neg.f64 (exp.f64 (neg.f64 l))) (exp.f64 l))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(-.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))) (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))))
(-.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(-.f64 (/.f64 (exp.f64 (+.f64 l l)) (-.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (-.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))))
(fma.f64 #s(literal -1 binary64) (exp.f64 (neg.f64 l)) (exp.f64 l))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (+.f64 (exp.f64 (+.f64 l l)) (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l)))))))
(/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (-.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l)))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (neg.f64 (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (neg.f64 (+.f64 (exp.f64 (+.f64 l l)) (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (neg.f64 (-.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))) (*.f64 (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (*.f64 (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 (-.f64 (*.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))))) (neg.f64 (neg.f64 (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))) (neg.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 2 binary64))) #s(literal -2 binary64))
(/.f64 (+.f64 (neg.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (exp.f64 (*.f64 l #s(literal 3 binary64)))) (+.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (-.f64 (exp.f64 (+.f64 l l)) (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) (exp.f64 l)))))
(pow.f64 (/.f64 (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) #s(literal -1 binary64))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(*.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))))
(*.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(*.f64 (cosh.f64 l) (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cosh.f64 l)))
(-.f64 (/.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 (exp.f64 (neg.f64 l)) #s(literal 2 binary64)))
(-.f64 (/.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))) #s(literal 2 binary64)) (/.f64 (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))) #s(literal 2 binary64)))
(-.f64 (/.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) #s(literal 2 binary64)) (/.f64 (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) #s(literal 2 binary64)))
(-.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))))) (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))))))
(-.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))
(sinh.f64 l)
(/.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))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))))
(/.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))))
(/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))
(/.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 (neg.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #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))
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 1/2 binary64))
(*.f64 (cosh.f64 l) (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(*.f64 (/.f64 (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l)))) #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (+.f64 (exp.f64 (+.f64 l l)) (+.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (neg.f64 l) l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U)))
#s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U))
(+.f64 U (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)))
(+.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) U)
(-.f64 (/.f64 (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) (neg.f64 U))))
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)))) (/.f64 (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))) (-.f64 U (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)))))
(fma.f64 J (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) l) U)
(fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)
(fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U)
(fma.f64 (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) l U)
(fma.f64 (*.f64 J l) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) U)
(fma.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) J U)
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U (-.f64 U (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))) (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)))) (fma.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))) (*.f64 U (*.f64 U U)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) (neg.f64 U)) (*.f64 (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) (neg.f64 U)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))) (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)))) (fma.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))) (*.f64 U (*.f64 U U))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) (neg.f64 U)) (*.f64 (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) (neg.f64 U))))))
(/.f64 (fma.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))) (*.f64 U (*.f64 U U))) (fma.f64 U (-.f64 U (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))) (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)))))
(/.f64 (fma.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))) (*.f64 U (*.f64 U U))) (fma.f64 U U (-.f64 (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))) (*.f64 U (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))))))
(/.f64 (*.f64 (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) (neg.f64 U))) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) (neg.f64 U)))
(/.f64 (neg.f64 (fma.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))) (*.f64 U (*.f64 U U)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))) (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))) (*.f64 U (*.f64 U U)))) (neg.f64 (fma.f64 U U (-.f64 (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))) (*.f64 U (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) (neg.f64 U)))) (neg.f64 (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)))) (-.f64 U (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) (neg.f64 U))) (*.f64 (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) (neg.f64 U)) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) (neg.f64 U))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))) (*.f64 U (*.f64 U U))))) (neg.f64 (neg.f64 (fma.f64 U (-.f64 U (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))) (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) (neg.f64 U))))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) (neg.f64 U)))))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))))) (neg.f64 (-.f64 U (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)))))
(pow.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))) (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)))) (fma.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))) (*.f64 U (*.f64 U U)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) (neg.f64 U)) (*.f64 (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) (neg.f64 U)))) #s(literal -1 binary64))
(*.f64 (fma.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))) (*.f64 U (*.f64 U U))) (/.f64 #s(literal 1 binary64) (fma.f64 U (-.f64 U (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))) (*.f64 (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l)) (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l))))))
(*.f64 (*.f64 (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) (neg.f64 U))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) (neg.f64 U))))
(+.f64 (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64)))
(+.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64)))))
(-.f64 (/.f64 (*.f64 (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64)))) (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64))))) (-.f64 (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 J #s(literal 2 binary64))) (-.f64 (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64)))))
(fma.f64 J #s(literal 2 binary64) (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64)))))
(fma.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64))) (*.f64 J #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) J (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64)))))
(fma.f64 l (*.f64 (*.f64 l #s(literal 1/3 binary64)) J) (*.f64 J #s(literal 2 binary64)))
(fma.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 J l) (*.f64 J #s(literal 2 binary64)))
(fma.f64 (*.f64 l (*.f64 l #s(literal 1/3 binary64))) J (*.f64 J #s(literal 2 binary64)))
(fma.f64 (*.f64 l l) (*.f64 #s(literal 1/3 binary64) J) (*.f64 J #s(literal 2 binary64)))
(fma.f64 (*.f64 J l) (*.f64 l #s(literal 1/3 binary64)) (*.f64 J #s(literal 2 binary64)))
(fma.f64 (*.f64 J (*.f64 l #s(literal 1/3 binary64))) l (*.f64 J #s(literal 2 binary64)))
(fma.f64 (*.f64 J (*.f64 l l)) #s(literal 1/3 binary64) (*.f64 J #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l (*.f64 l l)) (*.f64 l (*.f64 l l)))) (*.f64 J (*.f64 J J)) (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J)))) (fma.f64 (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64)))) (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64)))) (-.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 J #s(literal 2 binary64))) (*.f64 (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64)))) (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64))))) (*.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 J #s(literal 2 binary64)))) (-.f64 (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64))))
(/.f64 (*.f64 J (fma.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l (*.f64 l l)) (*.f64 l (*.f64 l l))) #s(literal 8 binary64))) (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (*.f64 J (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64)))
(/.f64 (*.f64 (fma.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l (*.f64 l l)) (*.f64 l (*.f64 l l))) #s(literal 8 binary64)) J) (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (*.f64 (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64)) J) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64)))
(/.f64 (neg.f64 (fma.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l (*.f64 l l)) (*.f64 l (*.f64 l l)))) (*.f64 J (*.f64 J J)) (*.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J))))) (neg.f64 (fma.f64 (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64)))) (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64)))) (-.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 J #s(literal 2 binary64))) (*.f64 (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64)))) (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64))))) (*.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 J #s(literal 2 binary64))))) (neg.f64 (-.f64 (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 J (fma.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l (*.f64 l l)) (*.f64 l (*.f64 l l))) #s(literal 8 binary64)))) (neg.f64 (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))))
(/.f64 (neg.f64 (*.f64 J (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64)))) (neg.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l (*.f64 l l)) (*.f64 l (*.f64 l l))) #s(literal 8 binary64)) J)) (neg.f64 (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -4 binary64)) J)) (neg.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal -2 binary64))))
(/.f64 (fma.f64 #s(literal 8 binary64) (*.f64 J (*.f64 J J)) (*.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (*.f64 l (*.f64 l l)) (*.f64 l (*.f64 l l)))) (*.f64 J (*.f64 J J)))) (fma.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 J #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64)))) (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64))))) (*.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 J (*.f64 l (*.f64 l #s(literal 1/3 binary64))))))))
(*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) J)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
(+.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))
(+.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) U)
(-.f64 (/.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))))
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))) (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))))
(fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U)
(fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U)
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))))) (fma.f64 U (*.f64 U U) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U)) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))))) (fma.f64 U (*.f64 U U) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U)) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))))))
(/.f64 (fma.f64 U (*.f64 U U) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))))) (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))))))
(/.f64 (fma.f64 U (*.f64 U U) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))))) (fma.f64 U U (-.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J U)))))
(/.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U)))
(/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))))))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))))))
(/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))))))) (neg.f64 (fma.f64 U U (-.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J U))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U)))) (neg.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))))) (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U)) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 U (*.f64 U U) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))))))) (neg.f64 (neg.f64 (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))))) (neg.f64 (neg.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U)))))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))))) (neg.f64 (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))))
(pow.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))))) (fma.f64 U (*.f64 U U) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U)) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U)))) #s(literal -1 binary64))
(*.f64 (fma.f64 U (*.f64 U U) (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))))) (/.f64 #s(literal 1 binary64) (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))))))))
(*.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (neg.f64 U))))
#s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64))))
(+.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))))
(+.f64 (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) (*.f64 #s(literal 2 binary64) l))
(-.f64 (/.f64 (*.f64 (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))))) (-.f64 (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) (*.f64 #s(literal 2 binary64) l))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (-.f64 (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) (*.f64 #s(literal 2 binary64) l))))
(fma.f64 #s(literal 2 binary64) l (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))))
(fma.f64 l #s(literal 2 binary64) (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))))
(fma.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 #s(literal 2 binary64) l))
(fma.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l l) (*.f64 #s(literal 2 binary64) l))
(fma.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) l (*.f64 #s(literal 2 binary64) l))
(fma.f64 (*.f64 l l) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal 2 binary64) l))
(fma.f64 (*.f64 l (*.f64 l l)) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) (*.f64 #s(literal 2 binary64) l))
(/.f64 (fma.f64 (*.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))))) (*.f64 l (*.f64 l l)) (*.f64 #s(literal 8 binary64) (*.f64 l (*.f64 l l)))) (fma.f64 (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) (*.f64 #s(literal 2 binary64) l)))))
(/.f64 (-.f64 (*.f64 (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))))) (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l))) (-.f64 (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) (*.f64 #s(literal 2 binary64) l)))
(/.f64 (*.f64 l (fma.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) #s(literal 8 binary64))) (-.f64 (fma.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))))))
(/.f64 (*.f64 l (fma.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64))) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64)))
(/.f64 (*.f64 (fma.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) #s(literal 8 binary64)) l) (-.f64 (fma.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))))))
(/.f64 (*.f64 (fma.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64)) l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64)))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))))) (*.f64 l (*.f64 l l)) (*.f64 #s(literal 8 binary64) (*.f64 l (*.f64 l l))))) (neg.f64 (fma.f64 (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) (*.f64 #s(literal 2 binary64) l))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))))) (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)))) (neg.f64 (-.f64 (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) (*.f64 #s(literal 2 binary64) l))))
(/.f64 (neg.f64 (*.f64 l (fma.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) #s(literal 8 binary64)))) (neg.f64 (-.f64 (fma.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))))))
(/.f64 (neg.f64 (*.f64 l (fma.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64)))) (neg.f64 (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) #s(literal 8 binary64)) l)) (neg.f64 (-.f64 (fma.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64)) l)) (neg.f64 (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64))))
(/.f64 (fma.f64 #s(literal 8 binary64) (*.f64 l (*.f64 l l)) (*.f64 (*.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))))) (*.f64 l (*.f64 l l)))) (fma.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l) (-.f64 (*.f64 (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))))) (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))))) (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 l (*.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))))))))
(*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))
(*.f64 (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)) l)
(+.f64 (*.f64 J #s(literal -1/8 binary64)) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))))
(+.f64 (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))) (*.f64 J #s(literal -1/8 binary64)))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))))) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 #s(literal 1/8 binary64) J))) (/.f64 (*.f64 (*.f64 J J) #s(literal 1/64 binary64)) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 #s(literal 1/8 binary64) J))))
(-.f64 (/.f64 (*.f64 (*.f64 J J) #s(literal 1/64 binary64)) (-.f64 (*.f64 J #s(literal -1/8 binary64)) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))))) (/.f64 (*.f64 (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))))) (-.f64 (*.f64 J #s(literal -1/8 binary64)) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))))))
(fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64)))
(fma.f64 J #s(literal -1/8 binary64) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))))
(fma.f64 J (*.f64 (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) (*.f64 K K)) (*.f64 J #s(literal -1/8 binary64)))
(fma.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64)))
(fma.f64 (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) (*.f64 J (*.f64 K K)) (*.f64 J #s(literal -1/8 binary64)))
(fma.f64 (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 K K) (*.f64 J #s(literal -1/8 binary64)))
(fma.f64 #s(literal -1/8 binary64) J (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))))
(fma.f64 (*.f64 J (*.f64 K K)) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) (*.f64 J #s(literal -1/8 binary64)))
(fma.f64 (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) K (*.f64 J #s(literal -1/8 binary64)))
(fma.f64 (*.f64 (*.f64 K K) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) J (*.f64 J #s(literal -1/8 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 K (*.f64 (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))))) (*.f64 (*.f64 J #s(literal -1/8 binary64)) (-.f64 (*.f64 J #s(literal -1/8 binary64)) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))))))) (fma.f64 (*.f64 (*.f64 J (*.f64 J J)) (*.f64 (*.f64 K K) (*.f64 (*.f64 K K) (*.f64 K K)))) (*.f64 (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) (*.f64 (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))) (*.f64 (*.f64 J (*.f64 J J)) #s(literal -1/512 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 #s(literal 1/8 binary64) J)) (*.f64 (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 #s(literal 1/8 binary64) J)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 K (*.f64 (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))))) (*.f64 (*.f64 J #s(literal -1/8 binary64)) (-.f64 (*.f64 J #s(literal -1/8 binary64)) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))))))) (fma.f64 (*.f64 (*.f64 J (*.f64 J J)) (*.f64 (*.f64 K K) (*.f64 (*.f64 K K) (*.f64 K K)))) (*.f64 (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) (*.f64 (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))) (*.f64 (*.f64 J (*.f64 J J)) #s(literal -1/512 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 #s(literal 1/8 binary64) J)) (*.f64 (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 #s(literal 1/8 binary64) J))))))
(/.f64 (fma.f64 (*.f64 (*.f64 J (*.f64 J J)) (*.f64 (*.f64 K K) (*.f64 (*.f64 K K) (*.f64 K K)))) (*.f64 (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) (*.f64 (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))) (*.f64 (*.f64 J (*.f64 J J)) #s(literal -1/512 binary64))) (fma.f64 K (*.f64 (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))))) (*.f64 (*.f64 J #s(literal -1/8 binary64)) (-.f64 (*.f64 J #s(literal -1/8 binary64)) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))))))))
(/.f64 (fma.f64 (*.f64 (*.f64 J (*.f64 J J)) (*.f64 (*.f64 K K) (*.f64 (*.f64 K K) (*.f64 K K)))) (*.f64 (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) (*.f64 (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))) (*.f64 (*.f64 J (*.f64 J J)) #s(literal -1/512 binary64))) (fma.f64 (*.f64 J J) #s(literal 1/64 binary64) (-.f64 (*.f64 (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))))) (*.f64 K (*.f64 (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64)))))))
(/.f64 (*.f64 (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 #s(literal 1/8 binary64) J))) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 #s(literal 1/8 binary64) J)))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (*.f64 J J)) (*.f64 (*.f64 K K) (*.f64 (*.f64 K K) (*.f64 K K)))) (*.f64 (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) (*.f64 (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))) (*.f64 (*.f64 J (*.f64 J J)) #s(literal -1/512 binary64)))) (neg.f64 (fma.f64 K (*.f64 (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))))) (*.f64 (*.f64 J #s(literal -1/8 binary64)) (-.f64 (*.f64 J #s(literal -1/8 binary64)) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (*.f64 J J)) (*.f64 (*.f64 K K) (*.f64 (*.f64 K K) (*.f64 K K)))) (*.f64 (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) (*.f64 (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))) (*.f64 (*.f64 J (*.f64 J J)) #s(literal -1/512 binary64)))) (neg.f64 (fma.f64 (*.f64 J J) #s(literal 1/64 binary64) (-.f64 (*.f64 (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))))) (*.f64 K (*.f64 (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 #s(literal 1/8 binary64) J)))) (neg.f64 (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 #s(literal 1/8 binary64) J))))
(/.f64 (-.f64 (*.f64 (*.f64 J J) #s(literal 1/64 binary64)) (*.f64 (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))))) (-.f64 (*.f64 J #s(literal -1/8 binary64)) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))))) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 #s(literal 1/8 binary64) J))) (*.f64 (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 #s(literal 1/8 binary64) J)) (*.f64 (*.f64 J J) #s(literal 1/64 binary64)))) (*.f64 (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 #s(literal 1/8 binary64) J)) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 #s(literal 1/8 binary64) J))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (*.f64 J J)) (*.f64 (*.f64 K K) (*.f64 (*.f64 K K) (*.f64 K K)))) (*.f64 (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) (*.f64 (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))) (*.f64 (*.f64 J (*.f64 J J)) #s(literal -1/512 binary64))))) (neg.f64 (neg.f64 (fma.f64 K (*.f64 (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))))) (*.f64 (*.f64 J #s(literal -1/8 binary64)) (-.f64 (*.f64 J #s(literal -1/8 binary64)) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 #s(literal 1/8 binary64) J))))) (neg.f64 (neg.f64 (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 #s(literal 1/8 binary64) J)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 J J) #s(literal 1/64 binary64)) (*.f64 (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))))))) (neg.f64 (-.f64 (*.f64 J #s(literal -1/8 binary64)) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))))))
(pow.f64 (/.f64 (fma.f64 K (*.f64 (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))))) (*.f64 (*.f64 J #s(literal -1/8 binary64)) (-.f64 (*.f64 J #s(literal -1/8 binary64)) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))))))) (fma.f64 (*.f64 (*.f64 J (*.f64 J J)) (*.f64 (*.f64 K K) (*.f64 (*.f64 K K) (*.f64 K K)))) (*.f64 (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) (*.f64 (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))) (*.f64 (*.f64 J (*.f64 J J)) #s(literal -1/512 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 #s(literal 1/8 binary64) J)) (*.f64 (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 #s(literal 1/8 binary64) J)))) #s(literal -1 binary64))
(*.f64 (fma.f64 (*.f64 (*.f64 J (*.f64 J J)) (*.f64 (*.f64 K K) (*.f64 (*.f64 K K) (*.f64 K K)))) (*.f64 (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) (*.f64 (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))) (*.f64 (*.f64 J (*.f64 J J)) #s(literal -1/512 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 K (*.f64 (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))))) (*.f64 (*.f64 J #s(literal -1/8 binary64)) (-.f64 (*.f64 J #s(literal -1/8 binary64)) (*.f64 (*.f64 K K) (*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))))))))
(*.f64 (*.f64 (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 #s(literal 1/8 binary64) J))) (/.f64 #s(literal 1 binary64) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 #s(literal 1/8 binary64) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l) U))
(+.f64 U (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l)))
(+.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l)) U)
(-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))))) (fma.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l) (neg.f64 U))))
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))))) (-.f64 U (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l)))))
(fma.f64 #s(literal 2 binary64) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) U)
(fma.f64 l (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) #s(literal 2 binary64)) U)
(fma.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l) U)
(fma.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) #s(literal 2 binary64) U)
(fma.f64 (*.f64 #s(literal 2 binary64) l) #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) U)
(fma.f64 (*.f64 #s(literal 2 binary64) #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) l U)
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U (-.f64 U (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)))))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l) (neg.f64 U)) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))))) (*.f64 U U))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)))))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l) (neg.f64 U)) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))))) (*.f64 U U)))))
(/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l)) #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)))))))
(/.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l)) #s(literal 3 binary64))) (fma.f64 U U (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))))) (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 (*.f64 #s(literal 2 binary64) l) U)))))
(/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))))) (*.f64 U U)) (fma.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l) (neg.f64 U)))
(/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))))))))
(/.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U U (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))))) (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 (*.f64 #s(literal 2 binary64) l) U))))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))))) (*.f64 U U))) (neg.f64 (fma.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)))))) (-.f64 U (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))))) (fma.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l) (neg.f64 U))) (*.f64 (fma.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l) (neg.f64 U)) (fma.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l) (neg.f64 U))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 U (-.f64 U (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))))) (*.f64 U U)))) (neg.f64 (neg.f64 (fma.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l) (neg.f64 U)))))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))))))) (neg.f64 (-.f64 U (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l)))))
(pow.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)))))) (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l) (neg.f64 U)) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))))) (*.f64 U U))) #s(literal -1 binary64))
(*.f64 (fma.f64 U (*.f64 U U) (pow.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 U (-.f64 U (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))))))))
(*.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))) (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))))) (*.f64 U U)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) (*.f64 #s(literal 2 binary64) l) (neg.f64 U))))
(*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)))
(*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (sinh.f64 l) (*.f64 J #s(literal 2 binary64)) U))
(+.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))))
(+.f64 (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) U)
(-.f64 (/.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)) (neg.f64 U))))
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))))) (/.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) #s(literal 2 binary64)) (-.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))))))
(fma.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l)) U)
(fma.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)) U)
(fma.f64 (sinh.f64 l) (*.f64 J #s(literal 2 binary64)) U)
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J U)
(fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U)
(fma.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l) U)
(fma.f64 (/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) #s(literal 2 binary64)) (/.f64 J (cosh.f64 l)) U)
(fma.f64 (/.f64 J #s(literal 2 binary64)) (/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (cosh.f64 l)) U)
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U (-.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) #s(literal 2 binary64))) (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 3 binary64)) (*.f64 U (*.f64 U U)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)) (neg.f64 U)) (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (neg.f64 (*.f64 U U)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) #s(literal 2 binary64))) (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 3 binary64)) (*.f64 U (*.f64 U U))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)) (neg.f64 U)) (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (neg.f64 (*.f64 U U))))))
(/.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 3 binary64)) (*.f64 U (*.f64 U U))) (fma.f64 U (-.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 3 binary64)) (*.f64 U (*.f64 U U))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 J (sinh.f64 l)) U)))))
(/.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (neg.f64 (*.f64 U U))) (fma.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)) (neg.f64 U)))
(/.f64 (neg.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 3 binary64)) (*.f64 U (*.f64 U U)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 3 binary64)) (*.f64 U (*.f64 U U)))) (neg.f64 (fma.f64 U U (-.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 J (sinh.f64 l)) U))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (neg.f64 (*.f64 U U)))) (neg.f64 (fma.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) #s(literal 2 binary64))) (-.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)) (neg.f64 U))) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)) (neg.f64 U)) (fma.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)) (neg.f64 U))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 3 binary64)) (*.f64 U (*.f64 U U))))) (neg.f64 (neg.f64 (fma.f64 U (-.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (neg.f64 (*.f64 U U))))) (neg.f64 (neg.f64 (fma.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)) (neg.f64 U)))))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) #s(literal 2 binary64)))) (neg.f64 (-.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))))))
(pow.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) #s(literal 2 binary64))) (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 3 binary64)) (*.f64 U (*.f64 U U)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)) (neg.f64 U)) (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (neg.f64 (*.f64 U U)))) #s(literal -1 binary64))
(*.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 3 binary64)) (*.f64 U (*.f64 U U))) (/.f64 #s(literal 1 binary64) (fma.f64 U (-.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) #s(literal 2 binary64)))))
(*.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (neg.f64 (*.f64 U U))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)) (neg.f64 U))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 J (sinh.f64 l)))) #s(literal -2 binary64))
(*.f64 J (sinh.f64 l))
(*.f64 (sinh.f64 l) J)
(cos.f64 (*.f64 K #s(literal 1/2 binary64)))
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal -1 binary64)))
(/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (neg.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(literal 1 binary64))
(*.f64 l #s(literal 1/3 binary64))
(*.f64 #s(literal 1/3 binary64) l)
(+.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l)))
(+.f64 (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l)) (*.f64 l #s(literal 1/3 binary64)))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l)) (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l))) (-.f64 (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l)) (*.f64 l #s(literal 1/3 binary64)))) (/.f64 (*.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 l #s(literal 1/3 binary64))) (-.f64 (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l)) (*.f64 l #s(literal 1/3 binary64)))))
(fma.f64 l #s(literal 1/3 binary64) (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l)))
(fma.f64 l (*.f64 l (*.f64 l #s(literal 1/60 binary64))) (*.f64 l #s(literal 1/3 binary64)))
(fma.f64 #s(literal 1/3 binary64) l (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l)))
(fma.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l) (*.f64 l #s(literal 1/3 binary64)))
(fma.f64 (*.f64 l (*.f64 l #s(literal 1/60 binary64))) l (*.f64 l #s(literal 1/3 binary64)))
(fma.f64 (*.f64 l l) (*.f64 l #s(literal 1/60 binary64)) (*.f64 l #s(literal 1/3 binary64)))
(fma.f64 (*.f64 l (*.f64 l l)) #s(literal 1/60 binary64) (*.f64 l #s(literal 1/3 binary64)))
(/.f64 (fma.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64))) (*.f64 l (*.f64 l l)) (*.f64 #s(literal 1/27 binary64) (*.f64 l (*.f64 l l)))) (fma.f64 (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l)) (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l)) (-.f64 (*.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 l #s(literal 1/3 binary64))) (*.f64 (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l)) (*.f64 l #s(literal 1/3 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l)) (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l))) (*.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 l #s(literal 1/3 binary64)))) (-.f64 (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l)) (*.f64 l #s(literal 1/3 binary64))))
(/.f64 (*.f64 l (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64))) (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) #s(literal 1/180 binary64)))))
(/.f64 (*.f64 l (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -1/9 binary64))) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)))
(/.f64 (*.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)) l) (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) #s(literal 1/180 binary64)))))
(/.f64 (*.f64 (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -1/9 binary64)) l) (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64)))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64))) (*.f64 l (*.f64 l l)) (*.f64 #s(literal 1/27 binary64) (*.f64 l (*.f64 l l))))) (neg.f64 (fma.f64 (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l)) (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l)) (-.f64 (*.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 l #s(literal 1/3 binary64))) (*.f64 (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l)) (*.f64 l #s(literal 1/3 binary64)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l)) (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l))) (*.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 l #s(literal 1/3 binary64))))) (neg.f64 (-.f64 (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l)) (*.f64 l #s(literal 1/3 binary64)))))
(/.f64 (neg.f64 (*.f64 l (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)))) (neg.f64 (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (*.f64 l (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -1/9 binary64)))) (neg.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64)) #s(literal 1/27 binary64)) l)) (neg.f64 (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 l l) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) (*.f64 l l)) #s(literal -1/9 binary64)) l)) (neg.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal -1/3 binary64))))
(/.f64 (fma.f64 #s(literal 1/27 binary64) (*.f64 l (*.f64 l l)) (*.f64 (*.f64 (*.f64 l (*.f64 l l)) (*.f64 (*.f64 l (*.f64 l l)) #s(literal 1/216000 binary64))) (*.f64 l (*.f64 l l)))) (fma.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 l #s(literal 1/3 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l)) (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l))) (*.f64 (*.f64 l #s(literal 1/3 binary64)) (*.f64 (*.f64 l #s(literal 1/60 binary64)) (*.f64 l l))))))
(*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))
(*.f64 (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)) l)
(*.f64 l #s(literal 1/60 binary64))
(*.f64 #s(literal 1/60 binary64) l)
#s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 (*.f64 K J) (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J))
(+.f64 (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64)))) (*.f64 J #s(literal 1/384 binary64)))
(+.f64 (*.f64 J #s(literal 1/384 binary64)) (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64)))))
(-.f64 (/.f64 (*.f64 (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64)))) (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64))))) (-.f64 (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64)))) (*.f64 J #s(literal 1/384 binary64)))) (/.f64 (*.f64 (*.f64 J #s(literal 1/384 binary64)) (*.f64 J #s(literal 1/384 binary64))) (-.f64 (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64)))) (*.f64 J #s(literal 1/384 binary64)))))
(fma.f64 J #s(literal 1/384 binary64) (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64)))))
(fma.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64))) (*.f64 J #s(literal 1/384 binary64)))
(fma.f64 (*.f64 K K) (*.f64 #s(literal -1/46080 binary64) J) (*.f64 J #s(literal 1/384 binary64)))
(fma.f64 #s(literal -1/46080 binary64) (*.f64 J (*.f64 K K)) (*.f64 J #s(literal 1/384 binary64)))
(fma.f64 #s(literal 1/384 binary64) J (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64)))))
(fma.f64 (*.f64 K (*.f64 K #s(literal -1/46080 binary64))) J (*.f64 J #s(literal 1/384 binary64)))
(fma.f64 (*.f64 J (*.f64 K K)) #s(literal -1/46080 binary64) (*.f64 J #s(literal 1/384 binary64)))
(fma.f64 (*.f64 K #s(literal -1/46080 binary64)) (*.f64 K J) (*.f64 J #s(literal 1/384 binary64)))
(fma.f64 (*.f64 J #s(literal -1/46080 binary64)) (*.f64 K K) (*.f64 J #s(literal 1/384 binary64)))
(fma.f64 (*.f64 J (*.f64 K #s(literal -1/46080 binary64))) K (*.f64 J #s(literal 1/384 binary64)))
(/.f64 (fma.f64 (*.f64 (*.f64 K (*.f64 K K)) (*.f64 (*.f64 K (*.f64 K K)) #s(literal -1/97844723712000 binary64))) (*.f64 J (*.f64 J J)) (*.f64 #s(literal 1/56623104 binary64) (*.f64 J (*.f64 J J)))) (fma.f64 (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64)))) (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64)))) (-.f64 (*.f64 (*.f64 J #s(literal 1/384 binary64)) (*.f64 J #s(literal 1/384 binary64))) (*.f64 (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64)))) (*.f64 J #s(literal 1/384 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64)))) (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64))))) (*.f64 (*.f64 J #s(literal 1/384 binary64)) (*.f64 J #s(literal 1/384 binary64)))) (-.f64 (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64)))) (*.f64 J #s(literal 1/384 binary64))))
(/.f64 (*.f64 J (fma.f64 (*.f64 K (*.f64 K K)) (*.f64 (*.f64 K (*.f64 K K)) #s(literal -1/97844723712000 binary64)) #s(literal 1/56623104 binary64))) (-.f64 (fma.f64 (*.f64 (*.f64 K K) (*.f64 K K)) #s(literal 1/2123366400 binary64) #s(literal 1/147456 binary64)) (*.f64 (*.f64 K K) #s(literal -1/17694720 binary64))))
(/.f64 (*.f64 J (fma.f64 (*.f64 (*.f64 K K) (*.f64 K K)) #s(literal 1/2123366400 binary64) #s(literal -1/147456 binary64))) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal -1/384 binary64)))
(/.f64 (*.f64 (fma.f64 (*.f64 K (*.f64 K K)) (*.f64 (*.f64 K (*.f64 K K)) #s(literal -1/97844723712000 binary64)) #s(literal 1/56623104 binary64)) J) (-.f64 (fma.f64 (*.f64 (*.f64 K K) (*.f64 K K)) #s(literal 1/2123366400 binary64) #s(literal 1/147456 binary64)) (*.f64 (*.f64 K K) #s(literal -1/17694720 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 K K) (*.f64 K K)) #s(literal 1/2123366400 binary64) #s(literal -1/147456 binary64)) J) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal -1/384 binary64)))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 K (*.f64 K K)) (*.f64 (*.f64 K (*.f64 K K)) #s(literal -1/97844723712000 binary64))) (*.f64 J (*.f64 J J)) (*.f64 #s(literal 1/56623104 binary64) (*.f64 J (*.f64 J J))))) (neg.f64 (fma.f64 (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64)))) (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64)))) (-.f64 (*.f64 (*.f64 J #s(literal 1/384 binary64)) (*.f64 J #s(literal 1/384 binary64))) (*.f64 (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64)))) (*.f64 J #s(literal 1/384 binary64)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64)))) (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64))))) (*.f64 (*.f64 J #s(literal 1/384 binary64)) (*.f64 J #s(literal 1/384 binary64))))) (neg.f64 (-.f64 (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64)))) (*.f64 J #s(literal 1/384 binary64)))))
(/.f64 (neg.f64 (*.f64 J (fma.f64 (*.f64 K (*.f64 K K)) (*.f64 (*.f64 K (*.f64 K K)) #s(literal -1/97844723712000 binary64)) #s(literal 1/56623104 binary64)))) (neg.f64 (-.f64 (fma.f64 (*.f64 (*.f64 K K) (*.f64 K K)) #s(literal 1/2123366400 binary64) #s(literal 1/147456 binary64)) (*.f64 (*.f64 K K) #s(literal -1/17694720 binary64)))))
(/.f64 (neg.f64 (*.f64 J (fma.f64 (*.f64 (*.f64 K K) (*.f64 K K)) #s(literal 1/2123366400 binary64) #s(literal -1/147456 binary64)))) (neg.f64 (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal -1/384 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 K (*.f64 K K)) (*.f64 (*.f64 K (*.f64 K K)) #s(literal -1/97844723712000 binary64)) #s(literal 1/56623104 binary64)) J)) (neg.f64 (-.f64 (fma.f64 (*.f64 (*.f64 K K) (*.f64 K K)) #s(literal 1/2123366400 binary64) #s(literal 1/147456 binary64)) (*.f64 (*.f64 K K) #s(literal -1/17694720 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 K K) (*.f64 K K)) #s(literal 1/2123366400 binary64) #s(literal -1/147456 binary64)) J)) (neg.f64 (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal -1/384 binary64))))
(/.f64 (fma.f64 #s(literal 1/56623104 binary64) (*.f64 J (*.f64 J J)) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) (*.f64 (*.f64 K (*.f64 K K)) #s(literal -1/97844723712000 binary64))) (*.f64 J (*.f64 J J)))) (fma.f64 (*.f64 J #s(literal 1/384 binary64)) (*.f64 J #s(literal 1/384 binary64)) (-.f64 (*.f64 (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64)))) (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64))))) (*.f64 (*.f64 J #s(literal 1/384 binary64)) (*.f64 J (*.f64 K (*.f64 K #s(literal -1/46080 binary64))))))))
(*.f64 J (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)))
(*.f64 (fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64)) J)

eval254.0ms (1.9%)

Memory
15.8MiB live, 276.4MiB allocated
Compiler

Compiled 28 284 to 1 836 computations (93.5% saved)

prune232.0ms (1.8%)

Memory
-2.7MiB live, 277.1MiB allocated
Pruning

34 alts after pruning (29 fresh and 5 done)

PrunedKeptTotal
New1 111141 125
Fresh81523
Picked325
Done033
Total1 122341 156
Accuracy
100.0%
Counts
1 156 → 34
Alt Table
Click to see full alt table
StatusAccuracyProgram
68.9%
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U)
96.9%
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
94.4%
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
65.3%
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
87.8%
(fma.f64 #s(approx (* (* 2 (sinh l)) (cos (* K 1/2))) (*.f64 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) J U)
65.3%
(fma.f64 #s(approx (* 2 (sinh l)) (*.f64 #s(literal 2 binary64) l)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J)) U)
65.3%
(+.f64 (*.f64 (/.f64 J #s(approx (/ 1 (* 2 (sinh l))) (/.f64 #s(literal 1/2 binary64) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
65.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U))
43.5%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 K (*.f64 K (*.f64 (*.f64 J (*.f64 K K)) #s(literal -1/46080 binary64))))) J)) l) #s(literal 2 binary64) U))
48.0%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
49.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
83.6%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))
79.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J #s(approx (sinh l) (fma.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/120 binary64) #s(literal 1/6 binary64)) l) l))) #s(literal 2 binary64) U))
81.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J #s(approx (sinh l) (fma.f64 l (*.f64 (*.f64 (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l #s(literal 1/5040 binary64)) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) l) l) l))) #s(literal 2 binary64) U))
81.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U))
79.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U))
79.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) J U))
73.9%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U))
43.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (cos (* 1/2 K)) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)) #s(literal 1 binary64))) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
62.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) (+.f64 l #s(literal 1 binary64))) (exp.f64 (neg.f64 l))) U))
57.8%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))
81.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
54.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
21.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 U (*.f64 U U))) (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))))
40.5%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))))
40.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
48.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
29.0%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (*.f64 (*.f64 l (*.f64 J #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
72.8%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U)))
66.8%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l #s(approx (* J (+ (* l (* l 1/3)) 2)) (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))) U)))
34.5%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 (*.f64 l (*.f64 l l)) (*.f64 J (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l))))))))
37.5%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))))))
31.6%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))))))
74.8%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 U (fma.f64 (*.f64 J l) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) U) #s(literal 1 binary64))))))
Compiler

Compiled 2 025 to 698 computations (65.5% saved)

regimes280.0ms (2.1%)

Memory
-44.1MiB live, 227.3MiB allocated
Counts
65 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l #s(approx (* J (+ (* l (* l 1/3)) 2)) (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 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 (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 U (fma.f64 (*.f64 J l) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) U) #s(literal 1 binary64))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (fma.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l l) (*.f64 #s(literal 2 binary64) l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J #s(approx (sinh l) (fma.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/120 binary64) #s(literal 1/6 binary64)) l) l))) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 (*.f64 l (*.f64 l l)) (*.f64 J (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 K (*.f64 K (*.f64 (*.f64 J (*.f64 K K)) #s(literal -1/46080 binary64))))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (cos (* 1/2 K)) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)) #s(literal 1 binary64))) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J #s(approx (sinh l) (fma.f64 l (*.f64 (*.f64 (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l #s(literal 1/5040 binary64)) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) l) l) l))) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (-.f64 (*.f64 U U) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))))) (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 #s(literal 2 binary64) (*.f64 J l) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 J (*.f64 l (*.f64 K K))) (fma.f64 #s(literal -1/23040 binary64) (*.f64 K K) #s(literal 1/192 binary64)) (*.f64 J (*.f64 l #s(literal -1/4 binary64)))) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64)) (*.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64)) l)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 U (*.f64 U U))) (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (-.f64 (*.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) (+.f64 l #s(literal 1 binary64))) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (*.f64 (*.f64 l (*.f64 J #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) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U))
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))))) U)
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 l (*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U))
(fma.f64 #s(approx (* (* 2 (sinh l)) (cos (* K 1/2))) (*.f64 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) J U)
(fma.f64 #s(approx (* 2 (sinh l)) (*.f64 #s(literal 2 binary64) l)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J)) U)
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (/.f64 J #s(approx (/ 1 (* 2 (sinh l))) (/.f64 #s(literal 1/2 binary64) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 J (*.f64 l l)) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 J #s(literal 1/3 binary64))) (*.f64 J #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J)) U)
(+.f64 (*.f64 (/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 l J))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (*.f64 #s(literal 2 binary64) (*.f64 l J))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 K #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 U U))))))
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (*.f64 J (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
Outputs
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
Calls

10 calls:

61.0ms
(/.f64 K #s(literal 2 binary64))
43.0ms
J
37.0ms
l
33.0ms
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
20.0ms
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
Results
AccuracySegmentsBranch
99.9%1J
99.9%1l
99.9%1K
99.9%1U
99.9%1(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
99.9%1(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
99.9%1(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
99.9%1(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
99.9%1(cos.f64 (/.f64 K #s(literal 2 binary64)))
99.9%1(/.f64 K #s(literal 2 binary64))
Compiler

Compiled 93 to 73 computations (21.5% saved)

regimes222.0ms (1.7%)

Memory
4.9MiB live, 278.9MiB allocated
Counts
59 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l #s(approx (* J (+ (* l (* l 1/3)) 2)) (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 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 (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 U (fma.f64 (*.f64 J l) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) U) #s(literal 1 binary64))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (fma.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l l) (*.f64 #s(literal 2 binary64) l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J #s(approx (sinh l) (fma.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/120 binary64) #s(literal 1/6 binary64)) l) l))) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 (*.f64 l (*.f64 l l)) (*.f64 J (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 K (*.f64 K (*.f64 (*.f64 J (*.f64 K K)) #s(literal -1/46080 binary64))))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (cos (* 1/2 K)) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)) #s(literal 1 binary64))) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J #s(approx (sinh l) (fma.f64 l (*.f64 (*.f64 (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l #s(literal 1/5040 binary64)) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) l) l) l))) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (-.f64 (*.f64 U U) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))))) (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 #s(literal 2 binary64) (*.f64 J l) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 J (*.f64 l (*.f64 K K))) (fma.f64 #s(literal -1/23040 binary64) (*.f64 K K) #s(literal 1/192 binary64)) (*.f64 J (*.f64 l #s(literal -1/4 binary64)))) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64)) (*.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64)) l)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 U (*.f64 U U))) (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (-.f64 (*.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) (+.f64 l #s(literal 1 binary64))) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (*.f64 (*.f64 l (*.f64 J #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) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U))
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))))) U)
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 l (*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U))
(fma.f64 #s(approx (* (* 2 (sinh l)) (cos (* K 1/2))) (*.f64 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) J U)
(fma.f64 #s(approx (* 2 (sinh l)) (*.f64 #s(literal 2 binary64) l)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J)) U)
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (/.f64 J #s(approx (/ 1 (* 2 (sinh l))) (/.f64 #s(literal 1/2 binary64) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 J (*.f64 l l)) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 J #s(literal 1/3 binary64))) (*.f64 J #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))
Outputs
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
Calls

10 calls:

37.0ms
l
35.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
25.0ms
K
22.0ms
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
20.0ms
J
Results
AccuracySegmentsBranch
96.9%1J
96.9%1l
98.8%2K
96.9%1U
96.9%1(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
96.9%1(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
96.9%1(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
96.9%1(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
98.8%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
98.8%2(/.f64 K #s(literal 2 binary64))
Compiler

Compiled 93 to 73 computations (21.5% saved)

regimes53.0ms (0.4%)

Memory
16.7MiB live, 130.5MiB allocated
Counts
56 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l #s(approx (* J (+ (* l (* l 1/3)) 2)) (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 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 (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 U (fma.f64 (*.f64 J l) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) U) #s(literal 1 binary64))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (fma.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l l) (*.f64 #s(literal 2 binary64) l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J #s(approx (sinh l) (fma.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/120 binary64) #s(literal 1/6 binary64)) l) l))) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 (*.f64 l (*.f64 l l)) (*.f64 J (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 K (*.f64 K (*.f64 (*.f64 J (*.f64 K K)) #s(literal -1/46080 binary64))))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (cos (* 1/2 K)) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)) #s(literal 1 binary64))) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J #s(approx (sinh l) (fma.f64 l (*.f64 (*.f64 (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l #s(literal 1/5040 binary64)) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) l) l) l))) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (-.f64 (*.f64 U U) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))))) (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 #s(literal 2 binary64) (*.f64 J l) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 J (*.f64 l (*.f64 K K))) (fma.f64 #s(literal -1/23040 binary64) (*.f64 K K) #s(literal 1/192 binary64)) (*.f64 J (*.f64 l #s(literal -1/4 binary64)))) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64)) (*.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64)) l)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 U (*.f64 U U))) (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (-.f64 (*.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) (+.f64 l #s(literal 1 binary64))) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (*.f64 (*.f64 l (*.f64 J #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) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U))
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))))) U)
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 l (*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U))
(fma.f64 #s(approx (* (* 2 (sinh l)) (cos (* K 1/2))) (*.f64 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) J U)
(fma.f64 #s(approx (* 2 (sinh l)) (*.f64 #s(literal 2 binary64) l)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J)) U)
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (/.f64 J #s(approx (/ 1 (* 2 (sinh l))) (/.f64 #s(literal 1/2 binary64) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 l (*.f64 l (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)))) (*.f64 J #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
Outputs
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U)
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
Calls

3 calls:

17.0ms
(/.f64 K #s(literal 2 binary64))
17.0ms
K
16.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
98.8%2K
98.8%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
98.8%2(/.f64 K #s(literal 2 binary64))
Compiler

Compiled 20 to 17 computations (15% saved)

regimes154.0ms (1.2%)

Memory
18.1MiB live, 302.4MiB allocated
Counts
54 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l #s(approx (* J (+ (* l (* l 1/3)) 2)) (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 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 (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 U (fma.f64 (*.f64 J l) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) U) #s(literal 1 binary64))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (fma.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l l) (*.f64 #s(literal 2 binary64) l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J #s(approx (sinh l) (fma.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/120 binary64) #s(literal 1/6 binary64)) l) l))) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 (*.f64 l (*.f64 l l)) (*.f64 J (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 K (*.f64 K (*.f64 (*.f64 J (*.f64 K K)) #s(literal -1/46080 binary64))))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (cos (* 1/2 K)) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)) #s(literal 1 binary64))) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J #s(approx (sinh l) (fma.f64 l (*.f64 (*.f64 (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l #s(literal 1/5040 binary64)) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) l) l) l))) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (-.f64 (*.f64 U U) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))))) (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 #s(literal 2 binary64) (*.f64 J l) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 J (*.f64 l (*.f64 K K))) (fma.f64 #s(literal -1/23040 binary64) (*.f64 K K) #s(literal 1/192 binary64)) (*.f64 J (*.f64 l #s(literal -1/4 binary64)))) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64)) (*.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64)) l)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 U (*.f64 U U))) (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (-.f64 (*.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) (+.f64 l #s(literal 1 binary64))) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (*.f64 (*.f64 l (*.f64 J #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) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U))
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))))) U)
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 l (*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U))
(fma.f64 #s(approx (* (* 2 (sinh l)) (cos (* K 1/2))) (*.f64 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) J U)
(fma.f64 #s(approx (* 2 (sinh l)) (*.f64 #s(literal 2 binary64) l)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J)) U)
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (/.f64 J #s(approx (/ 1 (* 2 (sinh l))) (/.f64 #s(literal 1/2 binary64) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
Outputs
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
Calls

10 calls:

19.0ms
(/.f64 K #s(literal 2 binary64))
17.0ms
J
16.0ms
K
16.0ms
U
15.0ms
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
Results
AccuracySegmentsBranch
94.4%1l
94.4%1U
94.4%1(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
94.4%1(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
94.4%1J
94.4%1(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
94.4%1(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
98.4%2K
98.4%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
98.4%2(/.f64 K #s(literal 2 binary64))
Compiler

Compiled 93 to 73 computations (21.5% saved)

regimes55.0ms (0.4%)

Memory
-3.8MiB live, 76.5MiB allocated
Counts
53 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l #s(approx (* J (+ (* l (* l 1/3)) 2)) (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 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 (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 U (fma.f64 (*.f64 J l) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) U) #s(literal 1 binary64))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (fma.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l l) (*.f64 #s(literal 2 binary64) l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J #s(approx (sinh l) (fma.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/120 binary64) #s(literal 1/6 binary64)) l) l))) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 (*.f64 l (*.f64 l l)) (*.f64 J (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 K (*.f64 K (*.f64 (*.f64 J (*.f64 K K)) #s(literal -1/46080 binary64))))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (cos (* 1/2 K)) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)) #s(literal 1 binary64))) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J #s(approx (sinh l) (fma.f64 l (*.f64 (*.f64 (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l #s(literal 1/5040 binary64)) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) l) l) l))) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (-.f64 (*.f64 U U) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))))) (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 #s(literal 2 binary64) (*.f64 J l) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 J (*.f64 l (*.f64 K K))) (fma.f64 #s(literal -1/23040 binary64) (*.f64 K K) #s(literal 1/192 binary64)) (*.f64 J (*.f64 l #s(literal -1/4 binary64)))) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64)) (*.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64)) l)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 U (*.f64 U U))) (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (-.f64 (*.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) (+.f64 l #s(literal 1 binary64))) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (*.f64 (*.f64 l (*.f64 J #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) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U))
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))))) U)
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 l (*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U))
(fma.f64 #s(approx (* (* 2 (sinh l)) (cos (* K 1/2))) (*.f64 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) J U)
(fma.f64 #s(approx (* 2 (sinh l)) (*.f64 #s(literal 2 binary64) l)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J)) U)
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (/.f64 J #s(approx (/ 1 (* 2 (sinh l))) (/.f64 #s(literal 1/2 binary64) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
Outputs
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U)
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
Calls

3 calls:

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

Compiled 20 to 17 computations (15% saved)

regimes49.0ms (0.4%)

Memory
1.6MiB live, 116.4MiB allocated
Counts
52 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l #s(approx (* J (+ (* l (* l 1/3)) 2)) (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 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 (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 U (fma.f64 (*.f64 J l) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) U) #s(literal 1 binary64))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (fma.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l l) (*.f64 #s(literal 2 binary64) l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J #s(approx (sinh l) (fma.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/120 binary64) #s(literal 1/6 binary64)) l) l))) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 (*.f64 l (*.f64 l l)) (*.f64 J (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 K (*.f64 K (*.f64 (*.f64 J (*.f64 K K)) #s(literal -1/46080 binary64))))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (cos (* 1/2 K)) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)) #s(literal 1 binary64))) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J #s(approx (sinh l) (fma.f64 l (*.f64 (*.f64 (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l #s(literal 1/5040 binary64)) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) l) l) l))) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (-.f64 (*.f64 U U) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))))) (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 #s(literal 2 binary64) (*.f64 J l) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 J (*.f64 l (*.f64 K K))) (fma.f64 #s(literal -1/23040 binary64) (*.f64 K K) #s(literal 1/192 binary64)) (*.f64 J (*.f64 l #s(literal -1/4 binary64)))) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64)) (*.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64)) l)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 U (*.f64 U U))) (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (-.f64 (*.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) (+.f64 l #s(literal 1 binary64))) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (*.f64 (*.f64 l (*.f64 J #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) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U))
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))))) U)
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 l (*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U))
(fma.f64 #s(approx (* (* 2 (sinh l)) (cos (* K 1/2))) (*.f64 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) J U)
(fma.f64 #s(approx (* 2 (sinh l)) (*.f64 #s(literal 2 binary64) l)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J)) U)
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (/.f64 J #s(approx (/ 1 (* 2 (sinh l))) (/.f64 #s(literal 1/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 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))
Calls

3 calls:

16.0ms
(/.f64 K #s(literal 2 binary64))
16.0ms
K
15.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
95.7%2K
96.0%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
95.7%2(/.f64 K #s(literal 2 binary64))
Compiler

Compiled 20 to 17 computations (15% saved)

regimes18.0ms (0.1%)

Memory
-3.7MiB live, 39.2MiB allocated
Counts
50 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l #s(approx (* J (+ (* l (* l 1/3)) 2)) (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 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 (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 U (fma.f64 (*.f64 J l) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) U) #s(literal 1 binary64))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (fma.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l l) (*.f64 #s(literal 2 binary64) l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J #s(approx (sinh l) (fma.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/120 binary64) #s(literal 1/6 binary64)) l) l))) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 (*.f64 l (*.f64 l l)) (*.f64 J (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 K (*.f64 K (*.f64 (*.f64 J (*.f64 K K)) #s(literal -1/46080 binary64))))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (cos (* 1/2 K)) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)) #s(literal 1 binary64))) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J #s(approx (sinh l) (fma.f64 l (*.f64 (*.f64 (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l #s(literal 1/5040 binary64)) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) l) l) l))) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (-.f64 (*.f64 U U) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))))) (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 #s(literal 2 binary64) (*.f64 J l) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 J (*.f64 l (*.f64 K K))) (fma.f64 #s(literal -1/23040 binary64) (*.f64 K K) #s(literal 1/192 binary64)) (*.f64 J (*.f64 l #s(literal -1/4 binary64)))) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64)) (*.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64)) l)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 U (*.f64 U U))) (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (-.f64 (*.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) (+.f64 l #s(literal 1 binary64))) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (*.f64 (*.f64 l (*.f64 J #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) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U))
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))))) U)
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 l (*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U))
(fma.f64 #s(approx (* (* 2 (sinh l)) (cos (* K 1/2))) (*.f64 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) J U)
(fma.f64 #s(approx (* 2 (sinh l)) (*.f64 #s(literal 2 binary64) l)) (/.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) J)) U)
(+.f64 (*.f64 #s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
Outputs
(fma.f64 #s(approx (* (* 2 (sinh l)) (cos (* K 1/2))) (*.f64 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))
Calls

1 calls:

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

Compiled 8 to 7 computations (12.5% saved)

regimes140.0ms (1.1%)

Memory
-12.7MiB live, 308.8MiB allocated
Counts
47 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l #s(approx (* J (+ (* l (* l 1/3)) 2)) (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 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 (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 U (fma.f64 (*.f64 J l) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) U) #s(literal 1 binary64))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (fma.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l l) (*.f64 #s(literal 2 binary64) l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J #s(approx (sinh l) (fma.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/120 binary64) #s(literal 1/6 binary64)) l) l))) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 (*.f64 l (*.f64 l l)) (*.f64 J (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 K (*.f64 K (*.f64 (*.f64 J (*.f64 K K)) #s(literal -1/46080 binary64))))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (cos (* 1/2 K)) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)) #s(literal 1 binary64))) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J #s(approx (sinh l) (fma.f64 l (*.f64 (*.f64 (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l #s(literal 1/5040 binary64)) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) l) l) l))) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (-.f64 (*.f64 U U) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))))) (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 #s(literal 2 binary64) (*.f64 J l) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 J (*.f64 l (*.f64 K K))) (fma.f64 #s(literal -1/23040 binary64) (*.f64 K K) #s(literal 1/192 binary64)) (*.f64 J (*.f64 l #s(literal -1/4 binary64)))) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64)) (*.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64)) l)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 U (*.f64 U U))) (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (-.f64 (*.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) (+.f64 l #s(literal 1 binary64))) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (*.f64 (*.f64 l (*.f64 J #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) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U))
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))))) U)
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 l (*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 l (*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))
Calls

10 calls:

17.0ms
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
16.0ms
K
16.0ms
U
15.0ms
l
14.0ms
(/.f64 K #s(literal 2 binary64))
Results
AccuracySegmentsBranch
94.6%2K
94.6%2(/.f64 K #s(literal 2 binary64))
93.4%3J
97.1%5l
88.5%2U
92.4%3(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
92.4%3(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
92.4%3(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
92.4%3(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
94.8%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 93 to 73 computations (21.5% saved)

regimes93.0ms (0.7%)

Memory
5.0MiB live, 163.2MiB allocated
Counts
46 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l #s(approx (* J (+ (* l (* l 1/3)) 2)) (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 l (*.f64 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 (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 U (fma.f64 (*.f64 J l) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) U) #s(literal 1 binary64))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (fma.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l l) (*.f64 #s(literal 2 binary64) l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J #s(approx (sinh l) (fma.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/120 binary64) #s(literal 1/6 binary64)) l) l))) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 (*.f64 l (*.f64 l l)) (*.f64 J (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 l l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 K (*.f64 K (*.f64 (*.f64 J (*.f64 K K)) #s(literal -1/46080 binary64))))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (cos (* 1/2 K)) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (fma.f64 K (*.f64 K #s(literal -1/46080 binary64)) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)) #s(literal 1 binary64))) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J #s(approx (sinh l) (fma.f64 l (*.f64 (*.f64 (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l #s(literal 1/5040 binary64)) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) l) l) l))) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) (*.f64 J (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (-.f64 (*.f64 U U) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))))) (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 #s(literal 2 binary64) (*.f64 J l) (fma.f64 (*.f64 K K) (fma.f64 (*.f64 J (*.f64 l (*.f64 K K))) (fma.f64 #s(literal -1/23040 binary64) (*.f64 K K) #s(literal 1/192 binary64)) (*.f64 J (*.f64 l #s(literal -1/4 binary64)))) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal -2 binary64)) (*.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/60 binary64)) #s(literal 1/3 binary64)))) #s(literal -4 binary64)) l)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (fma.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (*.f64 U (*.f64 U U))) (fma.f64 U (-.f64 U (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))) (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 (-.f64 (*.f64 (*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))))) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) (neg.f64 U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J (-.f64 #s(approx (exp l) (+.f64 l #s(literal 1 binary64))) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 J l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (*.f64 (*.f64 l (*.f64 J #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) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) l) #s(literal 2 binary64) U))
(fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 #s(literal 2 binary64) l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))))) U)
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U)
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U))
Calls

5 calls:

37.0ms
J
13.0ms
(/.f64 K #s(literal 2 binary64))
13.0ms
l
13.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
13.0ms
K
Results
AccuracySegmentsBranch
89.3%3J
92.3%3l
86.0%2K
86.0%2(/.f64 K #s(literal 2 binary64))
91.2%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes139.0ms (1.1%)

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

8 calls:

41.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
28.0ms
U
13.0ms
l
12.0ms
J
11.0ms
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
Results
AccuracySegmentsBranch
86.0%2J
83.6%1U
83.6%1l
83.6%1(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
83.6%1(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
83.6%1(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
83.6%1(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
86.3%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 81 to 63 computations (22.2% saved)

regimes155.0ms (1.2%)

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

10 calls:

51.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
16.0ms
(/.f64 K #s(literal 2 binary64))
13.0ms
l
13.0ms
J
11.0ms
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
Results
AccuracySegmentsBranch
81.4%1U
81.4%1l
81.4%1(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
81.4%1(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
81.4%1(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
81.4%1(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
81.4%1K
81.4%1(/.f64 K #s(literal 2 binary64))
81.4%1J
84.0%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 93 to 73 computations (21.5% saved)

regimes73.0ms (0.6%)

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

10 calls:

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

Compiled 93 to 73 computations (21.5% saved)

regimes6.0ms (0%)

Memory
22.8MiB live, 22.8MiB allocated
Counts
16 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l #s(approx (* J (+ (* l (* l 1/3)) 2)) (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) U))
Calls

1 calls:

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

Compiled 8 to 7 computations (12.5% saved)

regimes46.0ms (0.3%)

Memory
11.3MiB live, 128.6MiB allocated
Counts
13 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l #s(approx (* J (+ (* l (* l 1/3)) 2)) (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 J l) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* J (cos (* K 1/2))) l) 2) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l #s(approx (* l (+ (* l (* l 1/60)) 1/3)) (*.f64 l #s(literal 1/3 binary64))) #s(literal 2 binary64)))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 (*.f64 K K) #s(approx (+ (* (* K K) (* J (+ (* -1/46080 (* K K)) 1/384))) (* J -1/8)) (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U))
Calls

10 calls:

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

Compiled 93 to 73 computations (21.5% saved)

regimes5.0ms (0%)

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

1 calls:

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

Compiled 8 to 7 computations (12.5% saved)

regimes83.0ms (0.6%)

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

10 calls:

31.0ms
J
27.0ms
K
3.0ms
U
3.0ms
l
3.0ms
(/.f64 K #s(literal 2 binary64))
Results
AccuracySegmentsBranch
72.8%1J
72.8%1U
72.8%1(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
72.8%1(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
72.8%1(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
72.8%1l
72.8%1K
72.8%1(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
72.8%1(/.f64 K #s(literal 2 binary64))
75.4%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 93 to 73 computations (21.5% saved)

regimes20.0ms (0.1%)

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

6 calls:

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

Compiled 56 to 44 computations (21.4% saved)

regimes22.0ms (0.2%)

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

10 calls:

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

Compiled 93 to 73 computations (21.5% saved)

regimes3.0ms (0%)

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

1 calls:

2.0ms
l
Results
AccuracySegmentsBranch
72.8%3l
Compiler

Compiled 5 to 4 computations (20% saved)

regimes15.0ms (0.1%)

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

10 calls:

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

Compiled 93 to 73 computations (21.5% saved)

bsearch1.0ms (0%)

Memory
1.5MiB live, 1.5MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
8.547307244342627e-116
8.285198301748188e-112
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory
1.4MiB live, 1.4MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
8.547307244342627e-116
8.285198301748188e-112
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory
1.2MiB live, 1.2MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
9.193845309049803e-14
1.3199113061350957e-10
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory
1.0MiB live, 1.0MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
9.193845309049803e-14
1.3199113061350957e-10
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory
1.0MiB live, 1.0MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.9932451877517829
0.9958007747439862
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory
1.1MiB live, 1.1MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.9932451877517829
0.9958007747439862
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory
1.0MiB live, 1.0MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.9932451877517829
0.9958007747439862
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory
1.4MiB live, 1.4MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.012532902181111482
-0.006961203503227426
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory
1.1MiB live, 1.1MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.012532902181111482
-0.006961203503227426
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory
1.2MiB live, 1.2MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.012532902181111482
-0.006961203503227426
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.012532902181111482
-0.006961203503227426
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.012532902181111482
-0.006961203503227426
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.012532902181111482
-0.006961203503227426
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.012532902181111482
-0.006961203503227426
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.012532902181111482
-0.006961203503227426
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch90.0ms (0.7%)

Memory
-14.3MiB live, 99.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
40.0ms
28466965734479.434
2.0346172411420187e+25
25.0ms
-60266260.41541223
-0.0034219971921074293
Samples
53.0ms320×0valid
Compiler

Compiled 632 to 391 computations (38.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 25.0ms
ival-cos: 7.0ms (27.5% of total)
ival-exp: 6.0ms (23.6% of total)
ival-mult: 4.0ms (15.7% of total)
ival-div: 3.0ms (11.8% of total)
ival-add: 2.0ms (7.9% of total)
ival-sub: 2.0ms (7.9% of total)
ival-neg: 1.0ms (3.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory
4.0MiB live, 4.0MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
28466965734479.434
2.0346172411420187e+25
1.0ms
-60266260.41541223
-0.0034219971921074293
Compiler

Compiled 622 to 381 computations (38.7% saved)

simplify19.0ms (0.1%)

Memory
-5.6MiB live, 34.3MiB allocated
Algorithm
egg-herbie
Rules
88×*-commutative_binary64
+-commutative_binary64
1-exp_binary64
1-exp_binary32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01951370
12491370
Stop Event
saturated
Calls
Call 1
Inputs
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(if (<=.f64 (/.f64 K #s(literal 2 binary64)) #s(literal 554533938824163/5545339388241629719156828368286167406872874150751633150340959161229242615611251246079948812208279156194782421922807143657948315648 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U) (+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U))
(if (<=.f64 (/.f64 K #s(literal 2 binary64)) #s(literal 554533938824163/5545339388241629719156828368286167406872874150751633150340959161229242615611251246079948812208279156194782421922807143657948315648 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U) (fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U))
(if (<=.f64 (/.f64 K #s(literal 2 binary64)) #s(literal 3961408125713217/39614081257132168796771975168 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U) (+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U))
(if (<=.f64 (/.f64 K #s(literal 2 binary64)) #s(literal 3961408125713217/39614081257132168796771975168 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U) (fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 8962163258467287/9007199254740992 binary64)) (+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 8962163258467287/9007199254740992 binary64)) (fma.f64 #s(approx (* (* 2 (sinh l)) (cos (* K 1/2))) (*.f64 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) J U) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 8962163258467287/9007199254740992 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 l (*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U))) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U))) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)))
(if (<=.f64 l #s(literal -34000 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l))))))) (if (<=.f64 l #s(literal 44000000000000 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))))))))
(if (<=.f64 l #s(literal -34000 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l))))))) (if (<=.f64 l #s(literal 44000000000000 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))
Outputs
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U)
(if (<=.f64 (/.f64 K #s(literal 2 binary64)) #s(literal 554533938824163/5545339388241629719156828368286167406872874150751633150340959161229242615611251246079948812208279156194782421922807143657948315648 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U) (+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U))
(if (<=.f64 (/.f64 K #s(literal 2 binary64)) #s(literal 554533938824163/5545339388241629719156828368286167406872874150751633150340959161229242615611251246079948812208279156194782421922807143657948315648 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U) (+.f64 U (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64))))))
(if (<=.f64 (/.f64 K #s(literal 2 binary64)) #s(literal 554533938824163/5545339388241629719156828368286167406872874150751633150340959161229242615611251246079948812208279156194782421922807143657948315648 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U) (fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U))
(if (<=.f64 (/.f64 K #s(literal 2 binary64)) #s(literal 554533938824163/5545339388241629719156828368286167406872874150751633150340959161229242615611251246079948812208279156194782421922807143657948315648 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 l (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))) #s(literal 1/3 binary64)) #s(literal 2 binary64))))) J U))
(if (<=.f64 (/.f64 K #s(literal 2 binary64)) #s(literal 3961408125713217/39614081257132168796771975168 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U) (+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U))
(if (<=.f64 (/.f64 K #s(literal 2 binary64)) #s(literal 3961408125713217/39614081257132168796771975168 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U) (+.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64)) #s(literal 2 binary64))))))))
(if (<=.f64 (/.f64 K #s(literal 2 binary64)) #s(literal 3961408125713217/39614081257132168796771975168 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U) (fma.f64 (*.f64 #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) J U))
(if (<=.f64 (/.f64 K #s(literal 2 binary64)) #s(literal 3961408125713217/39614081257132168796771975168 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (* K 1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))) J U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #s(approx (* 2 (sinh l)) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64))))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 8962163258467287/9007199254740992 binary64)) (+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 8962163258467287/9007199254740992 binary64)) (+.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))))) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 8962163258467287/9007199254740992 binary64)) (fma.f64 #s(approx (* (* 2 (sinh l)) (cos (* K 1/2))) (*.f64 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) J U) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 8962163258467287/9007199254740992 binary64)) (fma.f64 #s(approx (* (* 2 (sinh l)) (cos (* K 1/2))) (*.f64 l (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))))) J U) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 8962163258467287/9007199254740992 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 l (*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 8962163258467287/9007199254740992 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 l (*.f64 (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) J)) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (*.f64 l #s(literal 2 binary64))) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (*.f64 #s(literal 2 binary64) l)) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J))) #s(literal 2 binary64) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J))) #s(literal 2 binary64) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J))) #s(literal 2 binary64) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l (fma.f64 (*.f64 l l) #s(literal 1/60 binary64) #s(literal 1/3 binary64))) #s(literal 2 binary64)))) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J))) #s(literal 2 binary64) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(approx (+ (* (* l l) 1/60) 1/3) (*.f64 (*.f64 l l) #s(literal 1/60 binary64)))) #s(literal 2 binary64)))) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J)) l) #s(literal 2 binary64) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 l #s(approx (* J (cos (* K 1/2))) (fma.f64 K (*.f64 K (*.f64 J #s(literal -1/8 binary64))) J))) #s(literal 2 binary64) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U))) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 (*.f64 l J) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U))) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 l (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64)))) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 (*.f64 J l) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U))) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U))))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (cos (* 1/2 K)) (* J (* l 2))) U) (fma.f64 (*.f64 l J) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) U))) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) (fma.f64 l (*.f64 J (fma.f64 l (*.f64 l #s(literal 1/3 binary64)) #s(literal 2 binary64))) U)))
(if (<=.f64 l #s(literal -34000 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l))))))) (if (<=.f64 l #s(literal 44000000000000 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))))))))
(if (<=.f64 l #s(literal -34000 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l))))))) (if (<=.f64 l #s(literal 44000000000000 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* J (- (exp l) (exp (neg l)))) U) #s(approx (+ (* l (* J (+ (* l (* l 1/3)) 2))) U) (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 l l)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)) U))

soundness1.7s (12.9%)

Memory
50.0MiB live, 1 433.7MiB allocated
Rules
16 882×lower-fma.f64
16 882×lower-fma.f32
16 772×lower-fma.f64
16 772×lower-fma.f32
16 082×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01321686
14221686
213911576
334441576
083641502
03427609
111037603
231857261
365477247
085726768
01442
02334
17234
243334
0448533
03699218
112529020
237528576
081868043
03958762
113108700
238938323
082757783
054343
093319
1302319
21823319
08303317
Stop Event
fuel
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
Compiler

Compiled 1 651 to 837 computations (49.3% saved)

preprocess136.0ms (1%)

Memory
-13.7MiB live, 230.9MiB allocated
Remove

(abs K)

Compiler

Compiled 1 434 to 310 computations (78.4% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...