Maksimov and Kolovsky, Equation (32)

Time bar (total: 17.9s)

analyze1.0ms (0%)

Algorithm
1×search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.8%0.2%0%0%0%0
100%99.8%0%0.2%0%0%0%1
Compiler

Compiled 35 to 22 computations (37.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 0.0ms
ival-div: 0.0ms (0% of total)
ival-add: 0.0ms (0% of total)
ival-exp: 0.0ms (0% of total)
ival-mult: 0.0ms (0% of total)
ival-fabs: 0.0ms (0% of total)
ival-sub: 0.0ms (0% of total)
ival-cos: 0.0ms (0% of total)
const: 0.0ms (0% of total)
backward-pass: 0.0ms (0% of total)
ival-neg: 0.0ms (0% of total)
ival-pow: 0.0ms (0% of total)

sample1.9s (10.8%)

Results
1.3s7819×0valid
179.0ms437×1valid
Precisions
Click to see histograms. Total time spent on operations: 1.0s
ival-sub: 278.0ms (27% of total)
ival-mult: 150.0ms (14.6% of total)
ival-div: 133.0ms (12.9% of total)
ival-pow: 105.0ms (10.2% of total)
ival-add: 86.0ms (8.3% of total)
ival-cos: 85.0ms (8.3% of total)
ival-fabs: 56.0ms (5.4% of total)
ival-exp: 52.0ms (5% of total)
ival-neg: 51.0ms (5% of total)
backward-pass: 23.0ms (2.2% of total)
const: 12.0ms (1.2% of total)
Bogosity

preprocess279.0ms (1.6%)

Algorithm
2×egg-herbie
Rules
2350×*-lowering-*.f32
2350×*-lowering-*.f64
1812×sum3-define
1758×fmsub-define
1712×+-lowering-+.f64
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
0210626
1575576
21704551
36620551
02129
15227
213226
342726
4191526
5764026
0863126
Stop Event
1×iter limit
1×node limit
1×node limit
Calls
Call 1
Inputs
(* (cos (- (/ (* K (+ m n)) 2) M)) (exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- l (fabs (- m n))))))
Outputs
(* (cos (- (/ (* K (+ m n)) 2) M)) (exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- l (fabs (- m n))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
Call 2
Inputs
(* (cos (- (/ (* K (+ m n)) 2) M)) (exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- l (fabs (- m n))))))
(* (cos (- (/ (* (neg K) (+ m n)) 2) M)) (exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- l (fabs (- m n))))))
(* (cos (- (/ (* K (+ (neg m) n)) 2) M)) (exp (- (neg (pow (- (/ (+ (neg m) n) 2) M) 2)) (- l (fabs (- (neg m) n))))))
(* (cos (- (/ (* K (+ m (neg n))) 2) M)) (exp (- (neg (pow (- (/ (+ m (neg n)) 2) M) 2)) (- l (fabs (- m (neg n)))))))
(* (cos (- (/ (* K (+ m n)) 2) (neg M))) (exp (- (neg (pow (- (/ (+ m n) 2) (neg M)) 2)) (- l (fabs (- m n))))))
(* (cos (- (/ (* K (+ m n)) 2) M)) (exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- (neg l) (fabs (- m n))))))
(neg (* (cos (- (/ (* (neg K) (+ m n)) 2) M)) (exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- l (fabs (- m n)))))))
(neg (* (cos (- (/ (* K (+ (neg m) n)) 2) M)) (exp (- (neg (pow (- (/ (+ (neg m) n) 2) M) 2)) (- l (fabs (- (neg m) n)))))))
(neg (* (cos (- (/ (* K (+ m (neg n))) 2) M)) (exp (- (neg (pow (- (/ (+ m (neg n)) 2) M) 2)) (- l (fabs (- m (neg n))))))))
(neg (* (cos (- (/ (* K (+ m n)) 2) (neg M))) (exp (- (neg (pow (- (/ (+ m n) 2) (neg M)) 2)) (- l (fabs (- m n)))))))
(neg (* (cos (- (/ (* K (+ m n)) 2) M)) (exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- (neg l) (fabs (- m n)))))))
(* (cos (- (/ (* m (+ K n)) 2) M)) (exp (- (neg (pow (- (/ (+ K n) 2) M) 2)) (- l (fabs (- K n))))))
(* (cos (- (/ (* n (+ m K)) 2) M)) (exp (- (neg (pow (- (/ (+ m K) 2) M) 2)) (- l (fabs (- m K))))))
(* (cos (- (/ (* M (+ m n)) 2) K)) (exp (- (neg (pow (- (/ (+ m n) 2) K) 2)) (- l (fabs (- m n))))))
(* (cos (- (/ (* l (+ m n)) 2) M)) (exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- K (fabs (- m n))))))
(* (cos (- (/ (* K (+ n m)) 2) M)) (exp (- (neg (pow (- (/ (+ n m) 2) M) 2)) (- l (fabs (- n m))))))
(* (cos (- (/ (* K (+ M n)) 2) m)) (exp (- (neg (pow (- (/ (+ M n) 2) m) 2)) (- l (fabs (- M n))))))
(* (cos (- (/ (* K (+ l n)) 2) M)) (exp (- (neg (pow (- (/ (+ l n) 2) M) 2)) (- m (fabs (- l n))))))
(* (cos (- (/ (* K (+ m M)) 2) n)) (exp (- (neg (pow (- (/ (+ m M) 2) n) 2)) (- l (fabs (- m M))))))
(* (cos (- (/ (* K (+ m l)) 2) M)) (exp (- (neg (pow (- (/ (+ m l) 2) M) 2)) (- n (fabs (- m l))))))
(* (cos (- (/ (* K (+ m n)) 2) l)) (exp (- (neg (pow (- (/ (+ m n) 2) l) 2)) (- M (fabs (- m n))))))
Outputs
(* (cos (- (/ (* K (+ m n)) 2) M)) (exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- l (fabs (- m n))))))
(* (cos (fmsub (+ m n) (/ K 2) M)) (exp (- (- (fabs (- n m)) l) (square (- (/ (+ m n) 2) M)))))
(* (cos (- (/ (* (neg K) (+ m n)) 2) M)) (exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- l (fabs (- m n))))))
(* (exp (- (- (fabs (- n m)) l) (square (- (/ (+ m n) 2) M)))) (cos (fnmsub (+ m n) (/ K 2) M)))
(* (cos (- (/ (* K (+ (neg m) n)) 2) M)) (exp (- (neg (pow (- (/ (+ (neg m) n) 2) M) 2)) (- l (fabs (- (neg m) n))))))
(* (cos (fmsub (- n m) (/ K 2) M)) (exp (- (- (fabs (+ m n)) l) (square (- (/ (- n m) 2) M)))))
(* (cos (- (/ (* K (+ m (neg n))) 2) M)) (exp (- (neg (pow (- (/ (+ m (neg n)) 2) M) 2)) (- l (fabs (- m (neg n)))))))
(* (cos (fmsub K (/ (- m n) 2) M)) (exp (- (- (fabs (+ m n)) l) (square (- (/ (- m n) 2) M)))))
(* (cos (- (/ (* K (+ m n)) 2) (neg M))) (exp (- (neg (pow (- (/ (+ m n) 2) (neg M)) 2)) (- l (fabs (- m n))))))
(* (cos (fma (+ m n) (/ K 2) M)) (exp (- (- (fabs (- n m)) l) (square (+ M (/ (+ m n) 2))))))
(* (cos (- (/ (* K (+ m n)) 2) M)) (exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- (neg l) (fabs (- m n))))))
(* (cos (fmsub (+ m n) (/ K 2) M)) (exp (- (+ l (fabs (- n m))) (square (- (/ (+ m n) 2) M)))))
(neg (* (cos (- (/ (* (neg K) (+ m n)) 2) M)) (exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- l (fabs (- m n)))))))
(* (exp (- (- (fabs (- n m)) l) (square (- (/ (+ m n) 2) M)))) (neg (cos (fnmsub (+ m n) (/ K 2) M))))
(neg (* (cos (- (/ (* K (+ (neg m) n)) 2) M)) (exp (- (neg (pow (- (/ (+ (neg m) n) 2) M) 2)) (- l (fabs (- (neg m) n)))))))
(* (exp (- (- (fabs (+ m n)) l) (square (- (/ (- n m) 2) M)))) (neg (cos (fmsub (- n m) (/ K 2) M))))
(neg (* (cos (- (/ (* K (+ m (neg n))) 2) M)) (exp (- (neg (pow (- (/ (+ m (neg n)) 2) M) 2)) (- l (fabs (- m (neg n))))))))
(* (exp (- (- (fabs (+ m n)) l) (square (- (/ (- m n) 2) M)))) (neg (cos (fmsub K (/ (- m n) 2) M))))
(neg (* (cos (- (/ (* K (+ m n)) 2) (neg M))) (exp (- (neg (pow (- (/ (+ m n) 2) (neg M)) 2)) (- l (fabs (- m n)))))))
(* (cos (fma (+ m n) (/ K 2) M)) (neg (exp (- (- (fabs (- n m)) l) (square (+ M (/ (+ m n) 2)))))))
(neg (* (cos (- (/ (* K (+ m n)) 2) M)) (exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- (neg l) (fabs (- m n)))))))
(* (exp (- (+ l (fabs (- n m))) (square (- (/ (+ m n) 2) M)))) (neg (cos (fmsub (+ m n) (/ K 2) M))))
(* (cos (- (/ (* m (+ K n)) 2) M)) (exp (- (neg (pow (- (/ (+ K n) 2) M) 2)) (- l (fabs (- K n))))))
(* (cos (fmsub (+ K n) (/ m 2) M)) (exp (- (- (fabs (- K n)) l) (square (- (/ (+ K n) 2) M)))))
(* (cos (- (/ (* n (+ m K)) 2) M)) (exp (- (neg (pow (- (/ (+ m K) 2) M) 2)) (- l (fabs (- m K))))))
(* (cos (fmsub n (/ (+ K m) 2) M)) (exp (- (- (fabs (- m K)) l) (square (- (/ (+ K m) 2) M)))))
(* (cos (- (/ (* M (+ m n)) 2) K)) (exp (- (neg (pow (- (/ (+ m n) 2) K) 2)) (- l (fabs (- m n))))))
(* (cos (fmsub (+ m n) (/ M 2) K)) (exp (- (- (fabs (- n m)) l) (square (- (/ (+ m n) 2) K)))))
(* (cos (- (/ (* l (+ m n)) 2) M)) (exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- K (fabs (- m n))))))
(* (cos (fmsub (+ m n) (/ l 2) M)) (exp (- (- (fabs (- n m)) K) (square (- (/ (+ m n) 2) M)))))
(* (cos (- (/ (* K (+ n m)) 2) M)) (exp (- (neg (pow (- (/ (+ n m) 2) M) 2)) (- l (fabs (- n m))))))
(* (cos (fmsub (+ m n) (/ K 2) M)) (exp (- (- (fabs (- n m)) l) (square (- (/ (+ m n) 2) M)))))
(* (cos (- (/ (* K (+ M n)) 2) m)) (exp (- (neg (pow (- (/ (+ M n) 2) m) 2)) (- l (fabs (- M n))))))
(* (cos (fmsub (+ n M) (/ K 2) m)) (exp (- (- (fabs (- M n)) l) (square (- (/ (+ n M) 2) m)))))
(* (cos (- (/ (* K (+ l n)) 2) M)) (exp (- (neg (pow (- (/ (+ l n) 2) M) 2)) (- m (fabs (- l n))))))
(* (cos (fmsub (+ n l) (/ K 2) M)) (exp (- (- (fabs (- l n)) m) (square (- (/ (+ n l) 2) M)))))
(* (cos (- (/ (* K (+ m M)) 2) n)) (exp (- (neg (pow (- (/ (+ m M) 2) n) 2)) (- l (fabs (- m M))))))
(* (cos (fmsub K (/ (+ m M) 2) n)) (exp (- (- (fabs (- m M)) l) (square (- (/ (+ m M) 2) n)))))
(* (cos (- (/ (* K (+ m l)) 2) M)) (exp (- (neg (pow (- (/ (+ m l) 2) M) 2)) (- n (fabs (- m l))))))
(* (cos (fmsub (+ m l) (/ K 2) M)) (exp (- (- (fabs (- m l)) n) (square (- (/ (+ m l) 2) M)))))
(* (cos (- (/ (* K (+ m n)) 2) l)) (exp (- (neg (pow (- (/ (+ m n) 2) l) 2)) (- M (fabs (- m n))))))
(* (cos (fmsub (+ m n) (/ K 2) l)) (exp (- (- (fabs (- n m)) M) (square (- (/ (+ m n) 2) l)))))
Symmetry

(sort m n)

explain536.0ms (3%)

FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
17339(-2.6033157452543572e-158 -2.9477907380757637e-61 8.75963407817101e+99 7.583785668036844e+63 -1.1085393373128533e-222)51(5.4122246005392684e+271 -2.4706943539023064e+297 5.564522104053847e+186 1.2526785384760015e+35 -24143900538044.543)(cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M))
00-0-M
00-0-l
00-0-#s(literal 2 binary64)
00-0-(-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)
00-0-(-.f64 m n)
041(-2.6033157452543572e-158 -2.9477907380757637e-61 8.75963407817101e+99 7.583785668036844e+63 -1.1085393373128533e-222)0-(pow.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 2 binary64))
00-0-(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (exp.f64 (-.f64 (neg.f64 (pow.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 2 binary64))) (-.f64 l (fabs.f64 (-.f64 m n))))))
00-0-(-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)
00-0-(exp.f64 (-.f64 (neg.f64 (pow.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 2 binary64))) (-.f64 l (fabs.f64 (-.f64 m n)))))
00-0-n
00-0-(*.f64 K (+.f64 m n))
00-0-m
00-0-(fabs.f64 (-.f64 m n))
00-0-(+.f64 m n)
00-0-(-.f64 (neg.f64 (pow.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 2 binary64))) (-.f64 l (fabs.f64 (-.f64 m n))))
00-0-(neg.f64 (pow.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 2 binary64)))
00-0-(-.f64 l (fabs.f64 (-.f64 m n)))
00-0-(/.f64 (+.f64 m n) #s(literal 2 binary64))
00-0-K
00-0-(/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64))
Results
373.0ms424×1valid
47.0ms88×0valid
Compiler

Compiled 342 to 65 computations (81% saved)

Precisions
Click to see histograms. Total time spent on operations: 228.0ms
ival-mult: 61.0ms (26.8% of total)
ival-cos: 54.0ms (23.7% of total)
ival-sub: 25.0ms (11% of total)
backward-pass: 25.0ms (11% of total)
ival-pow: 19.0ms (8.3% of total)
ival-div: 14.0ms (6.1% of total)
ival-add: 14.0ms (6.1% of total)
ival-exp: 5.0ms (2.2% of total)
ival-fabs: 5.0ms (2.2% of total)
ival-neg: 4.0ms (1.8% of total)
const: 1.0ms (0.4% of total)

eval0.0ms (0%)

Compiler

Compiled 39 to 21 computations (46.2% saved)

prune1.0ms (0%)

Alt Table
Click to see full alt table
StatusAccuracyProgram
▶77.2%
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
▶77.2%
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (exp.f64 (-.f64 (neg.f64 (pow.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 2 binary64))) (-.f64 l (fabs.f64 (-.f64 m n))))))
Compiler

Compiled 73 to 42 computations (42.5% saved)

simplify184.0ms (1%)

Algorithm
1×egg-herbie
Localize:

Found 8 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64))
✓cost-diff0
(+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))
✓cost-diff0
(cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64))))
✓cost-diff0
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
✓cost-diff0
(cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M))
✓cost-diff0
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (exp.f64 (-.f64 (neg.f64 (pow.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 2 binary64))) (-.f64 l (fabs.f64 (-.f64 m n))))))
✓cost-diff64
(neg.f64 (pow.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 2 binary64)))
✓cost-diff5952
(pow.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 2 binary64))
Rules
2360×*-lowering-*.f32
2360×*-lowering-*.f64
1474×+-lowering-+.f64
1474×+-lowering-+.f32
1350×exp-sum
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
029276
171270
2166266
3523266
42266266
57166266
08035266
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(* (cos (- (/ (* K (+ m n)) 2) M)) (exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- l (fabs (- m n))))))
(cos (- (/ (* K (+ m n)) 2) M))
(- (/ (* K (+ m n)) 2) M)
(/ (* K (+ m n)) 2)
(* K (+ m n))
K
(+ m n)
m
n
2
M
(exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- l (fabs (- m n)))))
(- (neg (pow (- (/ (+ m n) 2) M) 2)) (- l (fabs (- m n))))
(neg (pow (- (/ (+ m n) 2) M) 2))
(pow (- (/ (+ m n) 2) M) 2)
(- (/ (+ m n) 2) M)
(/ (+ m n) 2)
(- l (fabs (- m n)))
l
(fabs (- m n))
(- m n)
(/ (cos (+ M (/ (* K (+ m n)) -2))) (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))))
(cos (+ M (/ (* K (+ m n)) -2)))
(+ M (/ (* K (+ m n)) -2))
M
(/ (* K (+ m n)) -2)
(* K (+ m n))
K
(+ m n)
m
n
-2
(exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n)))))
(+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))
(* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M))
(- (/ (+ m n) 2) M)
(/ (+ m n) 2)
2
(- l (fabs (- m n)))
l
(fabs (- m n))
(- m n)
Outputs
(* (cos (- (/ (* K (+ m n)) 2) M)) (exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- l (fabs (- m n))))))
(/.f64 (cos.f64 (-.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal 2 binary64))) M)) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(cos (- (/ (* K (+ m n)) 2) M))
(cos.f64 (-.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal 2 binary64))) M))
(- (/ (* K (+ m n)) 2) M)
(-.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal 2 binary64))) M)
(/ (* K (+ m n)) 2)
(*.f64 K (/.f64 (+.f64 m n) #s(literal 2 binary64)))
(* K (+ m n))
(*.f64 K (+.f64 m n))
K
(+ m n)
(+.f64 m n)
m
n
2
#s(literal 2 binary64)
M
(exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- l (fabs (- m n)))))
(exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 (fabs.f64 (-.f64 m n)) l)))
(- (neg (pow (- (/ (+ m n) 2) M) 2)) (- l (fabs (- m n))))
(+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 (fabs.f64 (-.f64 m n)) l))
(neg (pow (- (/ (+ m n) 2) M) 2))
(*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))
(pow (- (/ (+ m n) 2) M) 2)
(*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))
(- (/ (+ m n) 2) M)
(-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)
(/ (+ m n) 2)
(/.f64 (+.f64 m n) #s(literal 2 binary64))
(- l (fabs (- m n)))
(-.f64 l (fabs.f64 (-.f64 m n)))
l
(fabs (- m n))
(fabs.f64 (-.f64 m n))
(- m n)
(-.f64 m n)
(/ (cos (+ M (/ (* K (+ m n)) -2))) (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))))
(/.f64 (cos.f64 (-.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal 2 binary64))) M)) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(cos (+ M (/ (* K (+ m n)) -2)))
(cos.f64 (-.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal 2 binary64))) M))
(+ M (/ (* K (+ m n)) -2))
(+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))
M
(/ (* K (+ m n)) -2)
(*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))
(* K (+ m n))
(*.f64 K (+.f64 m n))
K
(+ m n)
(+.f64 m n)
m
n
-2
#s(literal -2 binary64)
(exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n)))))
(exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))
(+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))
(+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))
(* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M))
(*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))
(- (/ (+ m n) 2) M)
(-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)
(/ (+ m n) 2)
(/.f64 (+.f64 m n) #s(literal 2 binary64))
2
#s(literal 2 binary64)
(- l (fabs (- m n)))
(-.f64 l (fabs.f64 (-.f64 m n)))
l
(fabs (- m n))
(fabs.f64 (-.f64 m n))
(- m n)
(-.f64 m n)

localize432.0ms (2.4%)

Localize:

Found 8 expressions of interest:

NewMetricScoreProgram
✓accuracy100.0%
(exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))
✓accuracy100.0%
(*.f64 K (+.f64 m n))
✓accuracy100.0%
(*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))
✓accuracy41.1%
(cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64))))
✓accuracy100.0%
(exp.f64 (-.f64 (neg.f64 (pow.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 2 binary64))) (-.f64 l (fabs.f64 (-.f64 m n)))))
✓accuracy100.0%
(*.f64 K (+.f64 m n))
✓accuracy100.0%
(pow.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 2 binary64))
✓accuracy41.1%
(cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M))
Results
297.0ms203×1valid
54.0ms19×5exit
17.0ms34×0valid
Compiler

Compiled 314 to 30 computations (90.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 141.0ms
backward-pass: 34.0ms (24.2% of total)
ival-sub: 27.0ms (19.2% of total)
ival-cos: 26.0ms (18.5% of total)
ival-div: 17.0ms (12.1% of total)
ival-mult: 10.0ms (7.1% of total)
ival-add: 10.0ms (7.1% of total)
ival-exp: 6.0ms (4.3% of total)
ival-pow: 6.0ms (4.3% of total)
ival-neg: 2.0ms (1.4% of total)
ival-fabs: 2.0ms (1.4% of total)
const: 1.0ms (0.7% of total)

series69.0ms (0.4%)

Counts
12 → 540
Calls
Call 1
Inputs
#<alt (pow (- (/ (+ m n) 2) M) 2)>
#<alt (neg (pow (- (/ (+ m n) 2) M) 2))>
#<alt (* (cos (- (/ (* K (+ m n)) 2) M)) (exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- l (fabs (- m n))))))>
#<alt (cos (- (/ (* K (+ m n)) 2) M))>
#<alt (/ (cos (+ M (/ (* K (+ m n)) -2))) (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))))>
#<alt (cos (+ M (/ (* K (+ m n)) -2)))>
#<alt (+ M (/ (* K (+ m n)) -2))>
#<alt (/ (* K (+ m n)) -2)>
#<alt (* K (+ m n))>
#<alt (exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- l (fabs (- m n)))))>
#<alt (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M))>
#<alt (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n)))))>
Outputs
#<alt (pow (- (* 1/2 n) M) 2)>
#<alt (+ (* m (- (* 1/2 n) M)) (pow (- (* 1/2 n) M) 2))>
#<alt (+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))>
#<alt (+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))>
#<alt (* 1/4 (pow m 2))>
#<alt (* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))>
#<alt (* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2)))) (/ M m)))>
#<alt (* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2)))) (/ M m)))>
#<alt (* 1/4 (pow m 2))>
#<alt (* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))>
#<alt (* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (pow (- (* 1/2 n) M) 2) m))) m))))>
#<alt (* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (pow (- (* 1/2 n) M) 2) m))) m))))>
#<alt (pow (- (* 1/2 m) M) 2)>
#<alt (+ (* n (- (* 1/2 m) M)) (pow (- (* 1/2 m) M) 2))>
#<alt (+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))>
#<alt (+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))>
#<alt (* 1/4 (pow n 2))>
#<alt (* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))>
#<alt (* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2)))) (/ M n)))>
#<alt (* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2)))) (/ M n)))>
#<alt (* 1/4 (pow n 2))>
#<alt (* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (pow (- (* 1/2 m) M) 2) n))) n))))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (pow (- (* 1/2 m) M) 2) n))) n))))>
#<alt (* 1/4 (pow (+ m n) 2))>
#<alt (+ (* -1 (* M (+ m n))) (* 1/4 (pow (+ m n) 2)))>
#<alt (+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))>
#<alt (+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))>
#<alt (pow M 2)>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))>
#<alt (* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))>
#<alt (* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))>
#<alt (pow M 2)>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))>
#<alt (* -1 (pow (- (* 1/2 n) M) 2))>
#<alt (- (* m (- M (* 1/2 n))) (pow (- (* 1/2 n) M) 2))>
#<alt (- (* m (- (+ M (* -1/4 m)) (* 1/2 n))) (pow (- (* 1/2 n) M) 2))>
#<alt (- (* m (- (+ M (* -1/4 m)) (* 1/2 n))) (pow (- (* 1/2 n) M) 2))>
#<alt (* -1/4 (pow m 2))>
#<alt (* (pow m 2) (- (/ M m) (+ 1/4 (* 1/2 (/ n m)))))>
#<alt (* (pow m 2) (- (+ (* -1 (/ (pow (- (* 1/2 n) M) 2) (pow m 2))) (/ M m)) (+ 1/4 (* 1/2 (/ n m)))))>
#<alt (* (pow m 2) (- (+ (* -1 (/ (pow (- (* 1/2 n) M) 2) (pow m 2))) (/ M m)) (+ 1/4 (* 1/2 (/ n m)))))>
#<alt (* -1/4 (pow m 2))>
#<alt (* (pow m 2) (- (* -1 (/ (- (* 1/2 n) M) m)) 1/4))>
#<alt (* (pow m 2) (- (* -1 (/ (- (/ (pow (- (* 1/2 n) M) 2) m) (* -1 (- (* 1/2 n) M))) m)) 1/4))>
#<alt (* (pow m 2) (- (* -1 (/ (- (/ (pow (- (* 1/2 n) M) 2) m) (* -1 (- (* 1/2 n) M))) m)) 1/4))>
#<alt (* -1 (pow (- (* 1/2 m) M) 2))>
#<alt (- (* n (- M (* 1/2 m))) (pow (- (* 1/2 m) M) 2))>
#<alt (- (* n (- (+ M (* -1/4 n)) (* 1/2 m))) (pow (- (* 1/2 m) M) 2))>
#<alt (- (* n (- (+ M (* -1/4 n)) (* 1/2 m))) (pow (- (* 1/2 m) M) 2))>
#<alt (* -1/4 (pow n 2))>
#<alt (* (pow n 2) (- (/ M n) (+ 1/4 (* 1/2 (/ m n)))))>
#<alt (* (pow n 2) (- (+ (* -1 (/ (pow (- (* 1/2 m) M) 2) (pow n 2))) (/ M n)) (+ 1/4 (* 1/2 (/ m n)))))>
#<alt (* (pow n 2) (- (+ (* -1 (/ (pow (- (* 1/2 m) M) 2) (pow n 2))) (/ M n)) (+ 1/4 (* 1/2 (/ m n)))))>
#<alt (* -1/4 (pow n 2))>
#<alt (* (pow n 2) (- (* -1 (/ (- (* 1/2 m) M) n)) 1/4))>
#<alt (* (pow n 2) (- (* -1 (/ (- (/ (pow (- (* 1/2 m) M) 2) n) (* -1 (- (* 1/2 m) M))) n)) 1/4))>
#<alt (* (pow n 2) (- (* -1 (/ (- (/ (pow (- (* 1/2 m) M) 2) n) (* -1 (- (* 1/2 m) M))) n)) 1/4))>
#<alt (* -1/4 (pow (+ m n) 2))>
#<alt (- (* M (+ m n)) (* 1/4 (pow (+ m n) 2)))>
#<alt (- (* M (- (* -1 M) (* -1 (+ m n)))) (* 1/4 (pow (+ m n) 2)))>
#<alt (- (* M (- (* -1 M) (* -1 (+ m n)))) (* 1/4 (pow (+ m n) 2)))>
#<alt (* -1 (pow M 2))>
#<alt (* (pow M 2) (- (+ (/ m M) (/ n M)) 1))>
#<alt (* (pow M 2) (- (* -1/4 (/ (pow (+ m n) 2) (pow M 2))) (+ 1 (* -1 (/ (+ m n) M)))))>
#<alt (* (pow M 2) (- (* -1/4 (/ (pow (+ m n) 2) (pow M 2))) (+ 1 (* -1 (/ (+ m n) M)))))>
#<alt (* -1 (pow M 2))>
#<alt (* (pow M 2) (- (+ (/ m M) (/ n M)) 1))>
#<alt (* (pow M 2) (- (* -1 (/ (- (* 1/4 (/ (pow (+ m n) 2) M)) (+ m n)) M)) 1))>
#<alt (* (pow M 2) (- (* -1 (/ (- (* 1/4 (/ (pow (+ m n) 2) M)) (+ m n)) M)) 1))>
#<alt (* (cos (neg M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))) (* (sin (neg M)) (+ m n))))) (* (cos (neg M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))))>
#<alt (+ (* K (+ (* -1/2 (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))) (* (sin (neg M)) (+ m n)))) (* -1/8 (* K (* (cos (neg M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))) (pow (+ m n) 2))))))) (* (cos (neg M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))))>
#<alt (+ (* K (+ (* -1/2 (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))) (* (sin (neg M)) (+ m n)))) (* K (+ (* -1/8 (* (cos (neg M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))) (pow (+ m n) 2)))) (* 1/48 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))) (* (sin (neg M)) (pow (+ m n) 3))))))))) (* (cos (neg M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K n)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))))>
#<alt (+ (* m (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (sin (- (* 1/2 (* K n)) M))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- M (* 1/2 n)))))) (* (cos (- (* 1/2 (* K n)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2))))))>
#<alt (+ (* m (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (sin (- (* 1/2 (* K n)) M))))) (+ (* m (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (* (sin (- (* 1/2 (* K n)) M)) (- M (* 1/2 n)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K n)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2))))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 n)) 2)) 1/4)))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- M (* 1/2 n))))))) (* (cos (- (* 1/2 (* K n)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2))))))>
#<alt (+ (* m (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (sin (- (* 1/2 (* K n)) M))))) (+ (* m (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (* (sin (- (* 1/2 (* K n)) M)) (- M (* 1/2 n)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K n)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2))))))) (+ (* m (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (* (sin (- (* 1/2 (* K n)) M)) (- (* 1/2 (pow (- M (* 1/2 n)) 2)) 1/4))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- M (* 1/2 n)))))) (+ (* 1/48 (* (pow K 3) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (sin (- (* 1/2 (* K n)) M))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (+ (* -1/4 (- M (* 1/2 n))) (* 1/6 (pow (- M (* 1/2 n)) 3))))))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 n)) 2)) 1/4))))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- M (* 1/2 n))))))) (* (cos (- (* 1/2 (* K n)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K m)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))))>
#<alt (+ (* n (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (sin (- (* 1/2 (* K m)) M))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- M (* 1/2 m)))))) (* (cos (- (* 1/2 (* K m)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2))))))>
#<alt (+ (* n (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (sin (- (* 1/2 (* K m)) M))))) (+ (* n (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (* (sin (- (* 1/2 (* K m)) M)) (- M (* 1/2 m)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K m)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2))))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 m)) 2)) 1/4)))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- M (* 1/2 m))))))) (* (cos (- (* 1/2 (* K m)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2))))))>
#<alt (+ (* n (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (sin (- (* 1/2 (* K m)) M))))) (+ (* n (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (* (sin (- (* 1/2 (* K m)) M)) (- M (* 1/2 m)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K m)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2))))))) (+ (* n (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (* (sin (- (* 1/2 (* K m)) M)) (- (* 1/2 (pow (- M (* 1/2 m)) 2)) 1/4))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- M (* 1/2 m)))))) (+ (* 1/48 (* (pow K 3) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (sin (- (* 1/2 (* K m)) M))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (+ (* -1/4 (- M (* 1/2 m))) (* 1/6 (pow (- M (* 1/2 m)) 3))))))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 m)) 2)) 1/4))))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- M (* 1/2 m))))))) (* (cos (- (* 1/2 (* K m)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)))))>
#<alt (* (cos (* 1/2 (* K (+ m n)))) (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))))>
#<alt (+ (* M (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ m n))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (sin (* 1/2 (* K (+ m n))))))) (* (cos (* 1/2 (* K (+ m n)))) (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2)))))))>
#<alt (+ (* M (+ (* M (+ (* -1/2 (* (cos (* 1/2 (* K (+ m n)))) (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (- (* 1/2 (pow (+ m n) 2)) 1))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (* (sin (* 1/2 (* K (+ m n)))) (+ m n)))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ m n))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (sin (* 1/2 (* K (+ m n)))))))) (* (cos (* 1/2 (* K (+ m n)))) (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2)))))))>
#<alt (+ (* M (+ (* M (+ (* -1/2 (* (cos (* 1/2 (* K (+ m n)))) (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))))) (+ (* M (+ (* -1/2 (* (cos (* 1/2 (* K (+ m n)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ m n)))) (+ (* -1/6 (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (sin (* 1/2 (* K (+ m n)))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ (* -1 (+ m n)) (* 1/6 (pow (+ m n) 3))))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (* (sin (* 1/2 (* K (+ m n)))) (- (* 1/2 (pow (+ m n) 2)) 1))))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (- (* 1/2 (pow (+ m n) 2)) 1))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (* (sin (* 1/2 (* K (+ m n)))) (+ m n))))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ m n))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (sin (* 1/2 (* K (+ m n)))))))) (* (cos (* 1/2 (* K (+ m n)))) (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2)))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)))))>
#<alt (* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)))))>
#<alt (* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)))))>
#<alt (* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))))>
#<alt (+ (* -1 (* l (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))))) (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (+ (* l (+ (* -1 (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))))) (* 1/2 (* l (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))))))) (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (+ (* l (+ (* -1 (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))))) (* l (+ (* -1/6 (* l (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))))) (* 1/2 (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))))))))) (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2))))>
#<alt (cos (neg M))>
#<alt (+ (cos (neg M)) (* -1/2 (* K (* (sin (neg M)) (+ m n)))))>
#<alt (+ (cos (neg M)) (* K (- (* -1/8 (* K (* (cos (neg M)) (pow (+ m n) 2)))) (* 1/2 (* (sin (neg M)) (+ m n))))))>
#<alt (+ (cos (neg M)) (* K (- (* K (+ (* -1/8 (* (cos (neg M)) (pow (+ m n) 2))) (* 1/48 (* K (* (sin (neg M)) (pow (+ m n) 3)))))) (* 1/2 (* (sin (neg M)) (+ m n))))))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K n)) M))>
#<alt (+ (cos (- (* 1/2 (* K n)) M)) (* -1/2 (* K (* m (sin (- (* 1/2 (* K n)) M))))))>
#<alt (+ (cos (- (* 1/2 (* K n)) M)) (* m (- (* -1/8 (* (pow K 2) (* m (cos (- (* 1/2 (* K n)) M))))) (* 1/2 (* K (sin (- (* 1/2 (* K n)) M)))))))>
#<alt (+ (cos (- (* 1/2 (* K n)) M)) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (- (* 1/2 (* K n)) M)))) (* 1/48 (* (pow K 3) (* m (sin (- (* 1/2 (* K n)) M))))))) (* 1/2 (* K (sin (- (* 1/2 (* K n)) M)))))))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (- n (* -1 m)))) M))>
#<alt (cos (- (* 1/2 (* K (- n (* -1 m)))) M))>
#<alt (cos (- (* 1/2 (* K (- n (* -1 m)))) M))>
#<alt (cos (- (* 1/2 (* K (- n (* -1 m)))) M))>
#<alt (cos (- (* 1/2 (* K m)) M))>
#<alt (+ (cos (- (* 1/2 (* K m)) M)) (* -1/2 (* K (* n (sin (- (* 1/2 (* K m)) M))))))>
#<alt (+ (cos (- (* 1/2 (* K m)) M)) (* n (- (* -1/8 (* (pow K 2) (* n (cos (- (* 1/2 (* K m)) M))))) (* 1/2 (* K (sin (- (* 1/2 (* K m)) M)))))))>
#<alt (+ (cos (- (* 1/2 (* K m)) M)) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (- (* 1/2 (* K m)) M)))) (* 1/48 (* (pow K 3) (* n (sin (- (* 1/2 (* K m)) M))))))) (* 1/2 (* K (sin (- (* 1/2 (* K m)) M)))))))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (- m (* -1 n)))) M))>
#<alt (cos (- (* 1/2 (* K (- m (* -1 n)))) M))>
#<alt (cos (- (* 1/2 (* K (- m (* -1 n)))) M))>
#<alt (cos (- (* 1/2 (* K (- m (* -1 n)))) M))>
#<alt (cos (* 1/2 (* K (+ m n))))>
#<alt (+ (cos (* 1/2 (* K (+ m n)))) (* M (sin (* 1/2 (* K (+ m n))))))>
#<alt (+ (cos (* 1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* 1/2 (* K (+ m n)))))) (* -1 (sin (* 1/2 (* K (+ m n))))))))>
#<alt (+ (cos (* 1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* 1/2 (* K (+ m n))))) (* -1/6 (* M (sin (* 1/2 (* K (+ m n)))))))) (* -1 (sin (* 1/2 (* K (+ m n))))))))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))>
#<alt (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))>
#<alt (+ (* M (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))>
#<alt (+ (* M (- (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1 (* (+ m n) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))>
#<alt (+ (* M (- (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (+ (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (* 1/6 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1 (* (+ m n) (- (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1 (* (+ m n) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (+ (* (+ 1 (* 1/2 (pow (+ m n) 2))) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ (* -1 (+ m n)) (* -1/6 (pow (+ m n) 3)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))))) (+ (* -1 (* (+ m n) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (+ (* 1/2 (/ (* K (* (sin M) (+ m n))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))))>
#<alt (+ (* K (+ (* -1/8 (/ (* K (* (cos M) (pow (+ m n) 2))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (* (sin M) (+ m n)) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))))>
#<alt (+ (* K (+ (* 1/2 (/ (* (sin M) (+ m n)) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (* K (+ (* -1/8 (/ (* (cos M) (pow (+ m n) 2)) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (* -1/48 (/ (* K (* (sin M) (pow (+ m n) 3))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))>
#<alt (+ (* m (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))>
#<alt (+ (* m (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* m (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* (- (* 1/2 n) M) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))>
#<alt (+ (* m (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* m (- (+ (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* m (- (* -1/48 (/ (* (pow K 3) (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (+ (* (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* (- (* 1/2 n) M) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (- (* 1/2 n) M)) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ (* 1/6 (pow (- (* 1/2 n) M) 3)) (* 1/4 (- (* 1/2 n) M)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))))) (+ (* (- (* 1/2 n) M) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))>
#<alt (+ (* n (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))>
#<alt (+ (* n (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* n (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* (- (* 1/2 m) M) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))>
#<alt (+ (* n (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* n (- (+ (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* n (- (* -1/48 (/ (* (pow K 3) (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (+ (* (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* (- (* 1/2 m) M) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (- (* 1/2 m) M)) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ (* 1/6 (pow (- (* 1/2 m) M) 3)) (* 1/4 (- (* 1/2 m) M)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))))) (+ (* (- (* 1/2 m) M) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))>
#<alt (+ (* -1 (/ (* l (cos (+ M (* -1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))>
#<alt (+ (* l (- (* -1 (* l (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))>
#<alt (+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))) (+ (* -1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/6 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))))) (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (cos (* -1/2 (* K (+ m n))))>
#<alt (+ (cos (* -1/2 (* K (+ m n)))) (* -1 (* M (sin (* -1/2 (* K (+ m n)))))))>
#<alt (+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K (+ m n)))))) (sin (* -1/2 (* K (+ m n)))))))>
#<alt (+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* 1/6 (* M (sin (* -1/2 (* K (+ m n)))))))) (sin (* -1/2 (* K (+ m n)))))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (- (* -1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos M)>
#<alt (+ (cos M) (* 1/2 (* K (* (sin M) (+ m n)))))>
#<alt (+ (cos M) (* K (- (* -1/8 (* K (* (cos M) (pow (+ m n) 2)))) (* -1/2 (* (sin M) (+ m n))))))>
#<alt (+ (cos M) (* K (- (* K (+ (* -1/8 (* (cos M) (pow (+ m n) 2))) (* -1/48 (* K (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n))))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* -1/8 (* (pow K 2) (* m (cos (+ M (* -1/2 (* K n))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/48 (* (pow K 3) (* m (sin (+ M (* -1/2 (* K n))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* -1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* -1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* -1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* -1/2 (* K m))))>
#<alt (+ (cos (+ M (* -1/2 (* K m)))) (* 1/2 (* K (* n (sin (+ M (* -1/2 (* K m))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* -1/8 (* (pow K 2) (* n (cos (+ M (* -1/2 (* K m))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/48 (* (pow K 3) (* n (sin (+ M (* -1/2 (* K m))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (- m (* -1 n))))))>
#<alt (cos (+ M (* -1/2 (* K (- m (* -1 n))))))>
#<alt (cos (+ M (* -1/2 (* K (- m (* -1 n))))))>
#<alt (cos (+ M (* -1/2 (* K (- m (* -1 n))))))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (+ M (* -1/2 (* K (+ m n))))>
#<alt (+ M (* -1/2 (* K (+ m n))))>
#<alt (+ M (* -1/2 (* K (+ m n))))>
#<alt M>
#<alt (* M (+ 1 (* -1/2 (/ (* K (+ m n)) M))))>
#<alt (* M (+ 1 (* -1/2 (/ (* K (+ m n)) M))))>
#<alt (* M (+ 1 (* -1/2 (/ (* K (+ m n)) M))))>
#<alt M>
#<alt (* -1 (* M (- (* 1/2 (/ (* K (+ m n)) M)) 1)))>
#<alt (* -1 (* M (- (* 1/2 (/ (* K (+ m n)) M)) 1)))>
#<alt (* -1 (* M (- (* 1/2 (/ (* K (+ m n)) M)) 1)))>
#<alt M>
#<alt (+ M (* -1/2 (* K (+ m n))))>
#<alt (+ M (* -1/2 (* K (+ m n))))>
#<alt (+ M (* -1/2 (* K (+ m n))))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* K (+ (* -1/2 (+ m n)) (/ M K)))>
#<alt (* K (+ (* -1/2 (+ m n)) (/ M K)))>
#<alt (* K (+ (* -1/2 (+ m n)) (/ M K)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1 (* K (+ (* -1 (/ M K)) (* 1/2 (+ m n)))))>
#<alt (* -1 (* K (+ (* -1 (/ M K)) (* 1/2 (+ m n)))))>
#<alt (* -1 (* K (+ (* -1 (/ M K)) (* 1/2 (+ m n)))))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))>
#<alt (+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))>
#<alt (+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))>
#<alt (* -1/2 (* K m))>
#<alt (* m (+ (* -1/2 K) (+ (* -1/2 (/ (* K n) m)) (/ M m))))>
#<alt (* m (+ (* -1/2 K) (+ (* -1/2 (/ (* K n) m)) (/ M m))))>
#<alt (* m (+ (* -1/2 K) (+ (* -1/2 (/ (* K n) m)) (/ M m))))>
#<alt (* -1/2 (* K m))>
#<alt (* -1 (* m (+ (* -1 (/ (+ M (* -1/2 (* K n))) m)) (* 1/2 K))))>
#<alt (* -1 (* m (+ (* -1 (/ (+ M (* -1/2 (* K n))) m)) (* 1/2 K))))>
#<alt (* -1 (* m (+ (* -1 (/ (+ M (* -1/2 (* K n))) m)) (* 1/2 K))))>
#<alt (+ M (* -1/2 (* K m)))>
#<alt (+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))>
#<alt (+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))>
#<alt (+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))>
#<alt (* -1/2 (* K n))>
#<alt (* n (+ (* -1/2 K) (+ (* -1/2 (/ (* K m) n)) (/ M n))))>
#<alt (* n (+ (* -1/2 K) (+ (* -1/2 (/ (* K m) n)) (/ M n))))>
#<alt (* n (+ (* -1/2 K) (+ (* -1/2 (/ (* K m) n)) (/ M n))))>
#<alt (* -1/2 (* K n))>
#<alt (* -1 (* n (+ (* -1 (/ (+ M (* -1/2 (* K m))) n)) (* 1/2 K))))>
#<alt (* -1 (* n (+ (* -1 (/ (+ M (* -1/2 (* K m))) n)) (* 1/2 K))))>
#<alt (* -1 (* n (+ (* -1 (/ (+ M (* -1/2 (* K m))) n)) (* 1/2 K))))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K n))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (* -1/2 (* K m))>
#<alt (* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))>
#<alt (* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))>
#<alt (* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))>
#<alt (* -1/2 (* K m))>
#<alt (* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))>
#<alt (* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))>
#<alt (* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))>
#<alt (* -1/2 (* K m))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (* -1/2 (* K n))>
#<alt (* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))>
#<alt (* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))>
#<alt (* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))>
#<alt (* -1/2 (* K n))>
#<alt (* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))>
#<alt (* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))>
#<alt (* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K n)>
#<alt (+ (* K m) (* K n))>
#<alt (+ (* K m) (* K n))>
#<alt (+ (* K m) (* K n))>
#<alt (* K m)>
#<alt (* m (+ K (/ (* K n) m)))>
#<alt (* m (+ K (/ (* K n) m)))>
#<alt (* m (+ K (/ (* K n) m)))>
#<alt (* K m)>
#<alt (* -1 (* m (+ (* -1 K) (* -1 (/ (* K n) m)))))>
#<alt (* -1 (* m (+ (* -1 K) (* -1 (/ (* K n) m)))))>
#<alt (* -1 (* m (+ (* -1 K) (* -1 (/ (* K n) m)))))>
#<alt (* K m)>
#<alt (+ (* K m) (* K n))>
#<alt (+ (* K m) (* K n))>
#<alt (+ (* K m) (* K n))>
#<alt (* K n)>
#<alt (* n (+ K (/ (* K m) n)))>
#<alt (* n (+ K (/ (* K m) n)))>
#<alt (* n (+ K (/ (* K m) n)))>
#<alt (* K n)>
#<alt (* -1 (* n (+ (* -1 K) (* -1 (/ (* K m) n)))))>
#<alt (* -1 (* n (+ (* -1 K) (* -1 (/ (* K m) n)))))>
#<alt (* -1 (* n (+ (* -1 K) (* -1 (/ (* K m) n)))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2))))>
#<alt (+ (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (* m (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- M (* 1/2 n)))))>
#<alt (+ (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (* m (+ (* m (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 n)) 2)) 1/4))) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- M (* 1/2 n))))))>
#<alt (+ (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (* m (+ (* m (+ (* m (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (+ (* -1/4 (- M (* 1/2 n))) (* 1/6 (pow (- M (* 1/2 n)) 3))))) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 n)) 2)) 1/4)))) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- M (* 1/2 n))))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))>
#<alt (exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2))))>
#<alt (exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2))))>
#<alt (exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2))))>
#<alt (exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2))))>
#<alt (+ (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (* n (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- M (* 1/2 m)))))>
#<alt (+ (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (* n (+ (* n (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 m)) 2)) 1/4))) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- M (* 1/2 m))))))>
#<alt (+ (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (* n (+ (* n (+ (* n (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (+ (* -1/4 (- M (* 1/2 m))) (* 1/6 (pow (- M (* 1/2 m)) 3))))) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 m)) 2)) 1/4)))) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- M (* 1/2 m))))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))>
#<alt (exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2))))>
#<alt (exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2))))>
#<alt (exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2))))>
#<alt (exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2))))>
#<alt (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2)))))>
#<alt (+ (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (* M (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ m n))))>
#<alt (+ (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (* M (+ (* M (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (- (* 1/2 (pow (+ m n) 2)) 1))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ m n)))))>
#<alt (+ (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (* M (+ (* M (+ (* M (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ (* -1 (+ m n)) (* 1/6 (pow (+ m n) 3))))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (- (* 1/2 (pow (+ m n) 2)) 1)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ m n)))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2))))>
#<alt (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))>
#<alt (+ (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))) (* -1 (* l (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))))))>
#<alt (+ (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))) (* l (+ (* -1 (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))) (* 1/2 (* l (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))))))))>
#<alt (+ (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))) (* l (+ (* -1 (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))) (* l (+ (* -1/6 (* l (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))))) (* 1/2 (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))))))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))>
#<alt (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))>
#<alt (exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2)))>
#<alt (exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2)))>
#<alt (exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2)))>
#<alt (exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2)))>
#<alt (pow (- (* 1/2 n) M) 2)>
#<alt (+ (* m (- (* 1/2 n) M)) (pow (- (* 1/2 n) M) 2))>
#<alt (+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))>
#<alt (+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))>
#<alt (* 1/4 (pow m 2))>
#<alt (* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))>
#<alt (* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2)))) (/ M m)))>
#<alt (* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2)))) (/ M m)))>
#<alt (* 1/4 (pow m 2))>
#<alt (* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))>
#<alt (* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (pow (- (* 1/2 n) M) 2) m))) m))))>
#<alt (* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (pow (- (* 1/2 n) M) 2) m))) m))))>
#<alt (pow (- (* 1/2 m) M) 2)>
#<alt (+ (* n (- (* 1/2 m) M)) (pow (- (* 1/2 m) M) 2))>
#<alt (+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))>
#<alt (+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))>
#<alt (* 1/4 (pow n 2))>
#<alt (* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))>
#<alt (* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2)))) (/ M n)))>
#<alt (* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2)))) (/ M n)))>
#<alt (* 1/4 (pow n 2))>
#<alt (* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (pow (- (* 1/2 m) M) 2) n))) n))))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (pow (- (* 1/2 m) M) 2) n))) n))))>
#<alt (* 1/4 (pow (+ m n) 2))>
#<alt (+ (* -1 (* M (+ m n))) (* 1/4 (pow (+ m n) 2)))>
#<alt (+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))>
#<alt (+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))>
#<alt (pow M 2)>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))>
#<alt (* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))>
#<alt (* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))>
#<alt (pow M 2)>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))>
#<alt (+ (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (* m (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (- (* 1/2 n) M))))>
#<alt (+ (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (* m (+ (* m (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))))) (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (- (* 1/2 n) M)))))>
#<alt (+ (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (* m (+ (* m (+ (* m (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (+ (* 1/6 (pow (- (* 1/2 n) M) 3)) (* 1/4 (- (* 1/2 n) M))))) (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))))) (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (- (* 1/2 n) M)))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))>
#<alt (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))>
#<alt (+ (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (* n (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (- (* 1/2 m) M))))>
#<alt (+ (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (* n (+ (* n (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))))) (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (- (* 1/2 m) M)))))>
#<alt (+ (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (* n (+ (* n (+ (* n (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (+ (* 1/6 (pow (- (* 1/2 m) M) 3)) (* 1/4 (- (* 1/2 m) M))))) (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))))) (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (- (* 1/2 m) M)))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))>
#<alt (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))>
#<alt (+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* -1 (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)))))>
#<alt (+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* M (+ (* -1 (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n))) (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2))))))))>
#<alt (+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* M (+ (* -1 (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n))) (* M (+ (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ (* -1 (+ m n)) (* -1/6 (pow (+ m n) 3))))) (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))))))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))>
#<alt (+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))>
#<alt (+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* 1/2 (* l (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))))>
#<alt (+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (+ (* 1/6 (* l (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))>
#<alt (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))>
#<alt (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))>
#<alt (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))>
Calls

135 calls:

TimeVariablePointExpression
4.0ms
M
@0
(/ (cos (+ M (/ (* K (+ m n)) -2))) (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))))
3.0ms
m
@0
(* (cos (- (/ (* K (+ m n)) 2) M)) (exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- l (fabs (- m n))))))
3.0ms
l
@inf
(/ (cos (+ M (/ (* K (+ m n)) -2))) (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))))
3.0ms
K
@0
(cos (- (/ (* K (+ m n)) 2) M))
2.0ms
m
@0
(/ (cos (+ M (/ (* K (+ m n)) -2))) (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))))

rewrite630.0ms (3.5%)

Algorithm
1×batch-egg-rewrite
Rules
2884×/-lowering-/.f32
2884×/-lowering-/.f64
2442×*-lowering-*.f32
2442×*-lowering-*.f64
1482×fma-lowering-fma.f32
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
029155
1115143
2403140
32127140
08168140
Stop Event
1×iter limit
1×node limit
Counts
12 → 1276
Calls
Call 1
Inputs
(pow (- (/ (+ m n) 2) M) 2)
(neg (pow (- (/ (+ m n) 2) M) 2))
(* (cos (- (/ (* K (+ m n)) 2) M)) (exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- l (fabs (- m n))))))
(cos (- (/ (* K (+ m n)) 2) M))
(/ (cos (+ M (/ (* K (+ m n)) -2))) (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))))
(cos (+ M (/ (* K (+ m n)) -2)))
(+ M (/ (* K (+ m n)) -2))
(/ (* K (+ m n)) -2)
(* K (+ m n))
(exp (- (neg (pow (- (/ (+ m n) 2) M) 2)) (- l (fabs (- m n)))))
(* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M))
(exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n)))))
Outputs
(+.f64 (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(+.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(exp.f64 (log.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal 2 binary64))) (log.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(-.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))) (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))
(-.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))) (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) M))
(fma.f64 (+.f64 m n) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 (+.f64 m n) #s(literal 2 binary64)) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 #s(literal 0 binary64) M) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(fma.f64 (-.f64 (-.f64 #s(literal 0 binary64) n) m) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 (-.f64 #s(literal 0 binary64) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(fma.f64 #s(literal -1 binary64) (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) M (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(fma.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 m n)) #s(literal 1/2 binary64) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (-.f64 #s(literal 0 binary64) n) m)) #s(literal -1/2 binary64) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 1 binary64)) (/.f64 (+.f64 m n) #s(literal 2 binary64)) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 1/2 binary64)) (+.f64 m n) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(pow.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 2 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))
(*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))
(*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))
(*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))
(+.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (neg.f64 (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))))
(+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 #s(literal -1 binary64) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))))
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (/.f64 (+.f64 m n) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 #s(literal 0 binary64) M)))
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 #s(literal 0 binary64) M)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (/.f64 (+.f64 m n) #s(literal 2 binary64))))
(+.f64 (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))) #s(literal -1 binary64)) (*.f64 (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))) #s(literal -1 binary64)))
(+.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))) (*.f64 (-.f64 #s(literal 0 binary64) M) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) M) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))) (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))
(-.f64 (-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (*.f64 (-.f64 #s(literal 0 binary64) M) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) #s(literal 0 binary64))
(fma.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)) #s(literal -1 binary64) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) M) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 #s(literal -1 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)) #s(literal 0 binary64))
(fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))) (*.f64 #s(literal -1 binary64) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (/.f64 (+.f64 m n) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 #s(literal 0 binary64) M)))
(fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 #s(literal 0 binary64) M) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (/.f64 (+.f64 m n) #s(literal 2 binary64))))
(fma.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))) #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))) #s(literal -1 binary64)))
(neg.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))
(*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))
(*.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 (sin.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (sin.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(+.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(+.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(+.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (/.f64 (cos.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (/.f64 (cos.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (/.f64 (cos.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (/.f64 (cos.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 M)) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 M)) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 M)) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 M)) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 M) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 M) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 M) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 M) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(exp.f64 (*.f64 (-.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (log.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal -1 binary64)))
(-.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64)))
(-.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(-.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(-.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(-.f64 (/.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(-.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(-.f64 (/.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64)) (/.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64)))
(-.f64 (/.f64 (/.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64)) (/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64)))
(fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64)) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (/.f64 (cos.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (/.f64 (cos.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (sin.f64 M) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (sin.f64 M) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 l)) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 l)) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 M)) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 M)) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 M) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 M) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (sin.f64 M)) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (sin.f64 M) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 l)) (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 l)) (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64))
(/.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))) (/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 l))))
(/.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal -1 binary64))
(/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64)) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 l)) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (neg.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal -1 binary64)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1 binary64))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1 binary64)) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1 binary64)) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1 binary64)) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1 binary64)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1 binary64)) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal -1 binary64)) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal -1 binary64)) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal -1 binary64)) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal -1 binary64)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal -1 binary64)) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal -1 binary64)) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal -1 binary64)) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal -1 binary64)) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal -1 binary64)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal -1 binary64)) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 #s(literal 2 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 #s(literal 2 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) #s(literal 1 binary64))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal -1 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (neg.f64 (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 (neg.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) #s(literal 1 binary64))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 (neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 (neg.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (neg.f64 (/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 l))) (neg.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))))
(pow.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64))
(pow.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) #s(literal -1 binary64))
(pow.f64 (exp.f64 (-.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (log.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) #s(literal -1 binary64))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(*.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64))
(*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(*.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (pow.f64 (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal -1 binary64)))
(*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (pow.f64 (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (pow.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) #s(literal -1 binary64)))
(*.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)))
(*.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 l)) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))))
(*.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64)) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(*.f64 (/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 l)) (exp.f64 (fabs.f64 (-.f64 m n))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(*.f64 (pow.f64 (/.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) #s(literal -1 binary64)) #s(literal -1 binary64)) (pow.f64 (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal -1 binary64)))
(+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 M))) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fma.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (neg.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(+.f64 (fma.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (cos.f64 M) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))))
(+.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))))
(+.f64 (*.f64 (cos.f64 (+.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) #s(literal 0 binary64))) (cos.f64 M)) (*.f64 (sin.f64 (+.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) #s(literal 0 binary64))) (sin.f64 M)))
(cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))
(cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(-.f64 (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal 4 binary64)))
(fma.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(fma.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64) (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 M))) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (neg.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (cos.f64 M) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (cos.f64 M) (neg.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (cos.f64 M) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (cos.f64 M) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))))
(fma.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (sin.f64 M) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 M))) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 M))) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))))
(fma.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 M)) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (*.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M)))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (neg.f64 (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) #s(literal -2 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M)))) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal -2 binary64)))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M)))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (neg.f64 (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))) #s(literal -4 binary64))
(*.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 (sin.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (sin.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(+.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(+.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(+.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (/.f64 (cos.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (/.f64 (cos.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (/.f64 (cos.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (/.f64 (cos.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 M)) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 M)) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 M)) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 M)) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 M) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 M) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 M) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 M) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))))
(exp.f64 (*.f64 (-.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (log.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal -1 binary64)))
(-.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64)))
(-.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(-.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(-.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(-.f64 (/.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(-.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(-.f64 (/.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64)) (/.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64)))
(-.f64 (/.f64 (/.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64)) (/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64)))
(fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64)) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (/.f64 (cos.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (/.f64 (cos.f64 M) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (sin.f64 M) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (sin.f64 M) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (/.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 l)) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 l)) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 M)) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 M)) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 M) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 M) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (sin.f64 M)) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (sin.f64 M) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 l)) (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 l)) (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64))
(/.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))) (/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 l))))
(/.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (neg.f64 (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal -1 binary64))
(/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64)) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 l)) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (neg.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal -1 binary64)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1 binary64))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1 binary64)) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1 binary64)) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1 binary64)) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1 binary64)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1 binary64)) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal -1 binary64)) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal -1 binary64)) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal -1 binary64)) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal -1 binary64)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal -1 binary64)) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 2 binary64)) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 2 binary64)) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal -1 binary64)) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal -1 binary64)) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal -1 binary64)) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal -1 binary64)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal -1 binary64)) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 #s(literal 2 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 #s(literal 2 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 #s(literal 2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 #s(literal 2 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) #s(literal 1 binary64))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal -1 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (neg.f64 (pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 (neg.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) #s(literal 1 binary64))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 (neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 (neg.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (neg.f64 (/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 l))) (neg.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))))
(pow.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64))
(pow.f64 (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) #s(literal -1 binary64))
(pow.f64 (exp.f64 (-.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (log.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) #s(literal -1 binary64))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(*.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal 1 binary64))
(*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(*.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (pow.f64 (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal -1 binary64)))
(*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (pow.f64 (*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (pow.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) #s(literal -1 binary64)))
(*.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)))
(*.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 l)) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))))
(*.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64)) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(*.f64 (/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 l)) (exp.f64 (fabs.f64 (-.f64 m n))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(*.f64 (pow.f64 (/.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) #s(literal -1 binary64)) #s(literal -1 binary64)) (pow.f64 (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal -1 binary64)))
(+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 M))) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fma.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (neg.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(+.f64 (fma.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (cos.f64 M) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))))
(+.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))))
(+.f64 (*.f64 (cos.f64 (+.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) #s(literal 0 binary64))) (cos.f64 M)) (*.f64 (sin.f64 (+.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) #s(literal 0 binary64))) (sin.f64 M)))
(cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))
(cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(-.f64 (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal 4 binary64)))
(fma.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(fma.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64) (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 M))) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (neg.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (cos.f64 M) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (cos.f64 M) (neg.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (cos.f64 M) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (cos.f64 M) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))))
(fma.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (sin.f64 M) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 M))) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 M))) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))))
(fma.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 M)) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (*.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M)))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (neg.f64 (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) #s(literal -2 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M)))) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (neg.f64 (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal -2 binary64)))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M)))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (neg.f64 (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))) #s(literal -4 binary64))
(*.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))
(+.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))) M)
(-.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(fma.f64 (+.f64 m n) (/.f64 K #s(literal -2 binary64)) M)
(fma.f64 (+.f64 m n) (neg.f64 (/.f64 K #s(literal 2 binary64))) M)
(fma.f64 (+.f64 m n) (*.f64 (-.f64 #s(literal 0 binary64) K) #s(literal 1/2 binary64)) M)
(fma.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) K) M)
(fma.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)
(fma.f64 (*.f64 (+.f64 m n) K) #s(literal -1/2 binary64) M)
(fma.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))) #s(literal 1 binary64) M)
(fma.f64 (-.f64 (-.f64 #s(literal 0 binary64) n) m) (/.f64 K #s(literal 2 binary64)) M)
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)) #s(literal 1/2 binary64) M)
(fma.f64 #s(literal 1 binary64) (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))) M)
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)) M)
(fma.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K) M)
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 m n) K) #s(literal 1 binary64)) M)
(fma.f64 #s(literal -1 binary64) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)
(fma.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) K M)
(fma.f64 (-.f64 #s(literal 0 binary64) K) (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)
(fma.f64 (/.f64 K #s(literal -2 binary64)) (+.f64 m n) M)
(fma.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K))) #s(literal 1/2 binary64) M)
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 m K)) (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)) (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))
(+.f64 (*.f64 (*.f64 m K) #s(literal -1/2 binary64)) (*.f64 (*.f64 n K) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (*.f64 n K) #s(literal -1/2 binary64)) (*.f64 (*.f64 m K) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (+.f64 m n))) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -2 binary64) K)) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) n) m) (/.f64 #s(literal -2 binary64) K)))
(-.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 m K)) #s(literal 2 binary64)) (/.f64 (*.f64 n K) #s(literal 2 binary64)))
(-.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 n K)) #s(literal 2 binary64)) (/.f64 (*.f64 m K) #s(literal 2 binary64)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 m K) (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 n K) (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))
(fma.f64 (*.f64 m K) #s(literal -1/2 binary64) (*.f64 (*.f64 n K) #s(literal -1/2 binary64)))
(fma.f64 (*.f64 n K) #s(literal -1/2 binary64) (*.f64 (*.f64 m K) #s(literal -1/2 binary64)))
(neg.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(/.f64 (+.f64 m n) (/.f64 #s(literal -2 binary64) K))
(/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))
(/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))
(/.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) #s(literal -1 binary64))
(/.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) n) m) (neg.f64 (/.f64 #s(literal -2 binary64) K)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K)))
(/.f64 #s(literal 1/2 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 m n) K))))
(/.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 m n) K)))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 m n) K)))
(/.f64 (-.f64 #s(literal 0 binary64) K) (/.f64 #s(literal 2 binary64) (+.f64 m n)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) K)) (/.f64 #s(literal -2 binary64) (+.f64 m n)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)))) #s(literal -2 binary64))
(pow.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K)) #s(literal -1 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K)))) #s(literal -1 binary64))
(*.f64 (+.f64 m n) (/.f64 K #s(literal -2 binary64)))
(*.f64 (+.f64 m n) (neg.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 (+.f64 m n) (*.f64 (-.f64 #s(literal 0 binary64) K) #s(literal 1/2 binary64)))
(*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) K))
(*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))
(*.f64 (*.f64 (+.f64 m n) K) #s(literal -1/2 binary64))
(*.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 (-.f64 #s(literal 0 binary64) n) m) (/.f64 K #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) (*.f64 (+.f64 m n) K)) #s(literal -1 binary64)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1 binary64)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 m n) K) #s(literal 1 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(*.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) K)
(*.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) K) #s(literal -1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) K) (/.f64 (+.f64 m n) #s(literal 2 binary64)))
(*.f64 (/.f64 K #s(literal -2 binary64)) (+.f64 m n))
(*.f64 (/.f64 K #s(literal -2 binary64)) (/.f64 (+.f64 m n) #s(literal 1 binary64)))
(*.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal 1 binary64)) #s(literal -1/2 binary64))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (*.f64 (+.f64 m n) K)) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(+.f64 (*.f64 m K) (*.f64 n K))
(+.f64 (*.f64 n K) (*.f64 m K))
(+.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 m K))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 n K))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)))
(fma.f64 m K (*.f64 n K))
(fma.f64 n K (*.f64 m K))
(fma.f64 K m (*.f64 n K))
(fma.f64 K n (*.f64 m K))
(neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)))
(*.f64 (+.f64 m n) K)
(*.f64 (+.f64 m n) (neg.f64 (-.f64 #s(literal 0 binary64) K)))
(*.f64 K (+.f64 m n))
(*.f64 (-.f64 (-.f64 #s(literal 0 binary64) n) m) (-.f64 #s(literal 0 binary64) K))
(*.f64 #s(literal 1 binary64) (*.f64 (+.f64 m n) K))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)))
(*.f64 (-.f64 #s(literal 0 binary64) K) (-.f64 (-.f64 #s(literal 0 binary64) n) m))
(*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) K)) (+.f64 m n))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))
(exp.f64 (*.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) #s(literal -1 binary64)))
(exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 #s(literal 1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)) (-.f64 (fabs.f64 (-.f64 m n)) l))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)) (-.f64 (fabs.f64 (-.f64 m n)) l))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (exp.f64 (-.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)) (-.f64 (fabs.f64 (-.f64 m n)) l)))))
(/.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(/.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))
(/.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 l))
(/.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (neg.f64 (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))) (exp.f64 l))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (exp.f64 (-.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)) (fabs.f64 (-.f64 m n)))))
(/.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) #s(literal 0 binary64))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))
(/.f64 (exp.f64 (+.f64 (fabs.f64 (-.f64 m n)) #s(literal 0 binary64))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (neg.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))))
(/.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (neg.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal -1 binary64))
(pow.f64 (exp.f64 #s(literal -1 binary64)) (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))
(pow.f64 (exp.f64 (-.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)) (-.f64 (fabs.f64 (-.f64 m n)) l))) #s(literal -1 binary64))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 1 binary64))
(*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)))
(*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (pow.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(*.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (fabs.f64 (-.f64 m n))))
(*.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (pow.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))) #s(literal -1 binary64)))
(*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 #s(literal 1 binary64) (exp.f64 l)))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (pow.f64 (exp.f64 (-.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)) (fabs.f64 (-.f64 m n)))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (pow.f64 (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)) (fabs.f64 (-.f64 m n))))))
(*.f64 (pow.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal -1 binary64)) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)))
(*.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) #s(literal 0 binary64))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) #s(literal 0 binary64))) (exp.f64 (fabs.f64 (-.f64 m n))))
(+.f64 (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(+.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(exp.f64 (log.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal 2 binary64))) (log.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(-.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))) (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))
(-.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))) (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) M))
(fma.f64 (+.f64 m n) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 (+.f64 m n) #s(literal 2 binary64)) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 #s(literal 0 binary64) M) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(fma.f64 (-.f64 (-.f64 #s(literal 0 binary64) n) m) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 (-.f64 #s(literal 0 binary64) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(fma.f64 #s(literal -1 binary64) (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) M (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(fma.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 m n)) #s(literal 1/2 binary64) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (-.f64 #s(literal 0 binary64) n) m)) #s(literal -1/2 binary64) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 1 binary64)) (/.f64 (+.f64 m n) #s(literal 2 binary64)) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 1/2 binary64)) (+.f64 m n) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(pow.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 2 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))
(*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))
(*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))
(*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))
(exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))
(exp.f64 (neg.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(exp.f64 (neg.f64 (*.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) #s(literal -1 binary64))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 1 binary64))
(/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (fabs.f64 (-.f64 m n)))) (exp.f64 l)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1 binary64) (exp.f64 (fabs.f64 (-.f64 m n)))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (exp.f64 l) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (exp.f64 l) (exp.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (fabs.f64 (-.f64 m n)))))
(/.f64 (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (fabs.f64 (-.f64 m n))))
(/.f64 (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (*.f64 #s(literal 1 binary64) (exp.f64 (fabs.f64 (-.f64 m n)))))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (neg.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (neg.f64 (exp.f64 l)) (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(/.f64 (neg.f64 (exp.f64 l)) (neg.f64 (exp.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (fabs.f64 (-.f64 m n))))))
(/.f64 (neg.f64 (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))))
(/.f64 (neg.f64 (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (neg.f64 (*.f64 #s(literal 1 binary64) (exp.f64 (fabs.f64 (-.f64 m n))))))
(/.f64 (exp.f64 (+.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) #s(literal 0 binary64))) (exp.f64 (fabs.f64 (-.f64 m n))))
(/.f64 (neg.f64 (neg.f64 (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))) (neg.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n))))))
(pow.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal -1 binary64))
(pow.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 1 binary64))
(*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) #s(literal 1 binary64))
(*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(*.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))
(*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))) #s(literal 1 binary64)))
(*.f64 #s(literal 1 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(*.f64 (exp.f64 l) (exp.f64 (-.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)) (fabs.f64 (-.f64 m n)))))
(*.f64 (exp.f64 l) (exp.f64 (-.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(*.f64 (exp.f64 l) (exp.f64 (neg.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))))
(*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))) (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(*.f64 (exp.f64 (+.f64 l (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (+.f64 (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))) (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(*.f64 (exp.f64 (-.f64 (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)) (fabs.f64 (-.f64 m n)))) (exp.f64 l))
(*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))))

simplify442.0ms (2.5%)

Algorithm
1×egg-herbie
Rules
5878×*-lowering-*.f32
5878×*-lowering-*.f64
5720×+-lowering-+.f64
5720×+-lowering-+.f32
1306×distribute-lft-in
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
099813971
1345112873
0829512873
Stop Event
1×iter limit
1×node limit
Counts
540 → 540
Calls
Call 1
Inputs
(pow (- (* 1/2 n) M) 2)
(+ (* m (- (* 1/2 n) M)) (pow (- (* 1/2 n) M) 2))
(+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))
(+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))
(* 1/4 (pow m 2))
(* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))
(* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2)))) (/ M m)))
(* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2)))) (/ M m)))
(* 1/4 (pow m 2))
(* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (pow (- (* 1/2 n) M) 2) m))) m))))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (pow (- (* 1/2 n) M) 2) m))) m))))
(pow (- (* 1/2 m) M) 2)
(+ (* n (- (* 1/2 m) M)) (pow (- (* 1/2 m) M) 2))
(+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))
(+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))
(* 1/4 (pow n 2))
(* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))
(* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2)))) (/ M n)))
(* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2)))) (/ M n)))
(* 1/4 (pow n 2))
(* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (pow (- (* 1/2 m) M) 2) n))) n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (pow (- (* 1/2 m) M) 2) n))) n))))
(* 1/4 (pow (+ m n) 2))
(+ (* -1 (* M (+ m n))) (* 1/4 (pow (+ m n) 2)))
(+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))
(+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))
(pow M 2)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))
(* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))
(pow M 2)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))
(* -1 (pow (- (* 1/2 n) M) 2))
(- (* m (- M (* 1/2 n))) (pow (- (* 1/2 n) M) 2))
(- (* m (- (+ M (* -1/4 m)) (* 1/2 n))) (pow (- (* 1/2 n) M) 2))
(- (* m (- (+ M (* -1/4 m)) (* 1/2 n))) (pow (- (* 1/2 n) M) 2))
(* -1/4 (pow m 2))
(* (pow m 2) (- (/ M m) (+ 1/4 (* 1/2 (/ n m)))))
(* (pow m 2) (- (+ (* -1 (/ (pow (- (* 1/2 n) M) 2) (pow m 2))) (/ M m)) (+ 1/4 (* 1/2 (/ n m)))))
(* (pow m 2) (- (+ (* -1 (/ (pow (- (* 1/2 n) M) 2) (pow m 2))) (/ M m)) (+ 1/4 (* 1/2 (/ n m)))))
(* -1/4 (pow m 2))
(* (pow m 2) (- (* -1 (/ (- (* 1/2 n) M) m)) 1/4))
(* (pow m 2) (- (* -1 (/ (- (/ (pow (- (* 1/2 n) M) 2) m) (* -1 (- (* 1/2 n) M))) m)) 1/4))
(* (pow m 2) (- (* -1 (/ (- (/ (pow (- (* 1/2 n) M) 2) m) (* -1 (- (* 1/2 n) M))) m)) 1/4))
(* -1 (pow (- (* 1/2 m) M) 2))
(- (* n (- M (* 1/2 m))) (pow (- (* 1/2 m) M) 2))
(- (* n (- (+ M (* -1/4 n)) (* 1/2 m))) (pow (- (* 1/2 m) M) 2))
(- (* n (- (+ M (* -1/4 n)) (* 1/2 m))) (pow (- (* 1/2 m) M) 2))
(* -1/4 (pow n 2))
(* (pow n 2) (- (/ M n) (+ 1/4 (* 1/2 (/ m n)))))
(* (pow n 2) (- (+ (* -1 (/ (pow (- (* 1/2 m) M) 2) (pow n 2))) (/ M n)) (+ 1/4 (* 1/2 (/ m n)))))
(* (pow n 2) (- (+ (* -1 (/ (pow (- (* 1/2 m) M) 2) (pow n 2))) (/ M n)) (+ 1/4 (* 1/2 (/ m n)))))
(* -1/4 (pow n 2))
(* (pow n 2) (- (* -1 (/ (- (* 1/2 m) M) n)) 1/4))
(* (pow n 2) (- (* -1 (/ (- (/ (pow (- (* 1/2 m) M) 2) n) (* -1 (- (* 1/2 m) M))) n)) 1/4))
(* (pow n 2) (- (* -1 (/ (- (/ (pow (- (* 1/2 m) M) 2) n) (* -1 (- (* 1/2 m) M))) n)) 1/4))
(* -1/4 (pow (+ m n) 2))
(- (* M (+ m n)) (* 1/4 (pow (+ m n) 2)))
(- (* M (- (* -1 M) (* -1 (+ m n)))) (* 1/4 (pow (+ m n) 2)))
(- (* M (- (* -1 M) (* -1 (+ m n)))) (* 1/4 (pow (+ m n) 2)))
(* -1 (pow M 2))
(* (pow M 2) (- (+ (/ m M) (/ n M)) 1))
(* (pow M 2) (- (* -1/4 (/ (pow (+ m n) 2) (pow M 2))) (+ 1 (* -1 (/ (+ m n) M)))))
(* (pow M 2) (- (* -1/4 (/ (pow (+ m n) 2) (pow M 2))) (+ 1 (* -1 (/ (+ m n) M)))))
(* -1 (pow M 2))
(* (pow M 2) (- (+ (/ m M) (/ n M)) 1))
(* (pow M 2) (- (* -1 (/ (- (* 1/4 (/ (pow (+ m n) 2) M)) (+ m n)) M)) 1))
(* (pow M 2) (- (* -1 (/ (- (* 1/4 (/ (pow (+ m n) 2) M)) (+ m n)) M)) 1))
(* (cos (neg M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))) (* (sin (neg M)) (+ m n))))) (* (cos (neg M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))))
(+ (* K (+ (* -1/2 (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))) (* (sin (neg M)) (+ m n)))) (* -1/8 (* K (* (cos (neg M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))) (pow (+ m n) 2))))))) (* (cos (neg M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))))
(+ (* K (+ (* -1/2 (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))) (* (sin (neg M)) (+ m n)))) (* K (+ (* -1/8 (* (cos (neg M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))) (pow (+ m n) 2)))) (* 1/48 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))) (* (sin (neg M)) (pow (+ m n) 3))))))))) (* (cos (neg M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K n)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))))
(+ (* m (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (sin (- (* 1/2 (* K n)) M))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- M (* 1/2 n)))))) (* (cos (- (* 1/2 (* K n)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2))))))
(+ (* m (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (sin (- (* 1/2 (* K n)) M))))) (+ (* m (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (* (sin (- (* 1/2 (* K n)) M)) (- M (* 1/2 n)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K n)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2))))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 n)) 2)) 1/4)))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- M (* 1/2 n))))))) (* (cos (- (* 1/2 (* K n)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2))))))
(+ (* m (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (sin (- (* 1/2 (* K n)) M))))) (+ (* m (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (* (sin (- (* 1/2 (* K n)) M)) (- M (* 1/2 n)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K n)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2))))))) (+ (* m (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (* (sin (- (* 1/2 (* K n)) M)) (- (* 1/2 (pow (- M (* 1/2 n)) 2)) 1/4))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- M (* 1/2 n)))))) (+ (* 1/48 (* (pow K 3) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (sin (- (* 1/2 (* K n)) M))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (+ (* -1/4 (- M (* 1/2 n))) (* 1/6 (pow (- M (* 1/2 n)) 3))))))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 n)) 2)) 1/4))))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- M (* 1/2 n))))))) (* (cos (- (* 1/2 (* K n)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)))))
(* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)))))
(* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)))))
(* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)))))
(* (cos (- (* 1/2 (* K m)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))))
(+ (* n (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (sin (- (* 1/2 (* K m)) M))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- M (* 1/2 m)))))) (* (cos (- (* 1/2 (* K m)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2))))))
(+ (* n (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (sin (- (* 1/2 (* K m)) M))))) (+ (* n (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (* (sin (- (* 1/2 (* K m)) M)) (- M (* 1/2 m)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K m)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2))))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 m)) 2)) 1/4)))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- M (* 1/2 m))))))) (* (cos (- (* 1/2 (* K m)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2))))))
(+ (* n (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (sin (- (* 1/2 (* K m)) M))))) (+ (* n (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (* (sin (- (* 1/2 (* K m)) M)) (- M (* 1/2 m)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K m)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2))))))) (+ (* n (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (* (sin (- (* 1/2 (* K m)) M)) (- (* 1/2 (pow (- M (* 1/2 m)) 2)) 1/4))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- M (* 1/2 m)))))) (+ (* 1/48 (* (pow K 3) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (sin (- (* 1/2 (* K m)) M))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (+ (* -1/4 (- M (* 1/2 m))) (* 1/6 (pow (- M (* 1/2 m)) 3))))))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 m)) 2)) 1/4))))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- M (* 1/2 m))))))) (* (cos (- (* 1/2 (* K m)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)))))
(* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)))))
(* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)))))
(* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)))))
(* (cos (* 1/2 (* K (+ m n)))) (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))))
(+ (* M (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ m n))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (sin (* 1/2 (* K (+ m n))))))) (* (cos (* 1/2 (* K (+ m n)))) (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2)))))))
(+ (* M (+ (* M (+ (* -1/2 (* (cos (* 1/2 (* K (+ m n)))) (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (- (* 1/2 (pow (+ m n) 2)) 1))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (* (sin (* 1/2 (* K (+ m n)))) (+ m n)))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ m n))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (sin (* 1/2 (* K (+ m n)))))))) (* (cos (* 1/2 (* K (+ m n)))) (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2)))))))
(+ (* M (+ (* M (+ (* -1/2 (* (cos (* 1/2 (* K (+ m n)))) (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))))) (+ (* M (+ (* -1/2 (* (cos (* 1/2 (* K (+ m n)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ m n)))) (+ (* -1/6 (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (sin (* 1/2 (* K (+ m n)))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ (* -1 (+ m n)) (* 1/6 (pow (+ m n) 3))))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (* (sin (* 1/2 (* K (+ m n)))) (- (* 1/2 (pow (+ m n) 2)) 1))))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (- (* 1/2 (pow (+ m n) 2)) 1))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (* (sin (* 1/2 (* K (+ m n)))) (+ m n))))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ m n))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (sin (* 1/2 (* K (+ m n)))))))) (* (cos (* 1/2 (* K (+ m n)))) (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2)))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)))))
(* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)))))
(* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)))))
(* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))))
(+ (* -1 (* l (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))))) (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))))
(+ (* l (+ (* -1 (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))))) (* 1/2 (* l (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))))))) (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))))
(+ (* l (+ (* -1 (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))))) (* l (+ (* -1/6 (* l (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))))) (* 1/2 (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))))))))) (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2))))
(cos (neg M))
(+ (cos (neg M)) (* -1/2 (* K (* (sin (neg M)) (+ m n)))))
(+ (cos (neg M)) (* K (- (* -1/8 (* K (* (cos (neg M)) (pow (+ m n) 2)))) (* 1/2 (* (sin (neg M)) (+ m n))))))
(+ (cos (neg M)) (* K (- (* K (+ (* -1/8 (* (cos (neg M)) (pow (+ m n) 2))) (* 1/48 (* K (* (sin (neg M)) (pow (+ m n) 3)))))) (* 1/2 (* (sin (neg M)) (+ m n))))))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K n)) M))
(+ (cos (- (* 1/2 (* K n)) M)) (* -1/2 (* K (* m (sin (- (* 1/2 (* K n)) M))))))
(+ (cos (- (* 1/2 (* K n)) M)) (* m (- (* -1/8 (* (pow K 2) (* m (cos (- (* 1/2 (* K n)) M))))) (* 1/2 (* K (sin (- (* 1/2 (* K n)) M)))))))
(+ (cos (- (* 1/2 (* K n)) M)) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (- (* 1/2 (* K n)) M)))) (* 1/48 (* (pow K 3) (* m (sin (- (* 1/2 (* K n)) M))))))) (* 1/2 (* K (sin (- (* 1/2 (* K n)) M)))))))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (- n (* -1 m)))) M))
(cos (- (* 1/2 (* K (- n (* -1 m)))) M))
(cos (- (* 1/2 (* K (- n (* -1 m)))) M))
(cos (- (* 1/2 (* K (- n (* -1 m)))) M))
(cos (- (* 1/2 (* K m)) M))
(+ (cos (- (* 1/2 (* K m)) M)) (* -1/2 (* K (* n (sin (- (* 1/2 (* K m)) M))))))
(+ (cos (- (* 1/2 (* K m)) M)) (* n (- (* -1/8 (* (pow K 2) (* n (cos (- (* 1/2 (* K m)) M))))) (* 1/2 (* K (sin (- (* 1/2 (* K m)) M)))))))
(+ (cos (- (* 1/2 (* K m)) M)) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (- (* 1/2 (* K m)) M)))) (* 1/48 (* (pow K 3) (* n (sin (- (* 1/2 (* K m)) M))))))) (* 1/2 (* K (sin (- (* 1/2 (* K m)) M)))))))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (- m (* -1 n)))) M))
(cos (- (* 1/2 (* K (- m (* -1 n)))) M))
(cos (- (* 1/2 (* K (- m (* -1 n)))) M))
(cos (- (* 1/2 (* K (- m (* -1 n)))) M))
(cos (* 1/2 (* K (+ m n))))
(+ (cos (* 1/2 (* K (+ m n)))) (* M (sin (* 1/2 (* K (+ m n))))))
(+ (cos (* 1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* 1/2 (* K (+ m n)))))) (* -1 (sin (* 1/2 (* K (+ m n))))))))
(+ (cos (* 1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* 1/2 (* K (+ m n))))) (* -1/6 (* M (sin (* 1/2 (* K (+ m n)))))))) (* -1 (sin (* 1/2 (* K (+ m n))))))))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))
(cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))
(cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))
(cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))
(/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))
(+ (* M (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))
(+ (* M (- (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1 (* (+ m n) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))
(+ (* M (- (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (+ (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (* 1/6 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1 (* (+ m n) (- (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1 (* (+ m n) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (+ (* (+ 1 (* 1/2 (pow (+ m n) 2))) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ (* -1 (+ m n)) (* -1/6 (pow (+ m n) 3)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))))) (+ (* -1 (* (+ m n) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(+ (* 1/2 (/ (* K (* (sin M) (+ m n))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))))
(+ (* K (+ (* -1/8 (/ (* K (* (cos M) (pow (+ m n) 2))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (* (sin M) (+ m n)) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))))
(+ (* K (+ (* 1/2 (/ (* (sin M) (+ m n)) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (* K (+ (* -1/8 (/ (* (cos M) (pow (+ m n) 2)) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (* -1/48 (/ (* K (* (sin M) (pow (+ m n) 3))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))
(+ (* m (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))
(+ (* m (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* m (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* (- (* 1/2 n) M) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))
(+ (* m (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* m (- (+ (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* m (- (* -1/48 (/ (* (pow K 3) (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (+ (* (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* (- (* 1/2 n) M) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (- (* 1/2 n) M)) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ (* 1/6 (pow (- (* 1/2 n) M) 3)) (* 1/4 (- (* 1/2 n) M)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))))) (+ (* (- (* 1/2 n) M) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))
(+ (* n (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))
(+ (* n (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* n (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* (- (* 1/2 m) M) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))
(+ (* n (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* n (- (+ (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* n (- (* -1/48 (/ (* (pow K 3) (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (+ (* (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* (- (* 1/2 m) M) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (- (* 1/2 m) M)) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ (* 1/6 (pow (- (* 1/2 m) M) 3)) (* 1/4 (- (* 1/2 m) M)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))))) (+ (* (- (* 1/2 m) M) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))
(+ (* -1 (/ (* l (cos (+ M (* -1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))
(+ (* l (- (* -1 (* l (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))
(+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))) (+ (* -1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/6 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))))) (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(cos (* -1/2 (* K (+ m n))))
(+ (cos (* -1/2 (* K (+ m n)))) (* -1 (* M (sin (* -1/2 (* K (+ m n)))))))
(+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K (+ m n)))))) (sin (* -1/2 (* K (+ m n)))))))
(+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* 1/6 (* M (sin (* -1/2 (* K (+ m n)))))))) (sin (* -1/2 (* K (+ m n)))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos M)
(+ (cos M) (* 1/2 (* K (* (sin M) (+ m n)))))
(+ (cos M) (* K (- (* -1/8 (* K (* (cos M) (pow (+ m n) 2)))) (* -1/2 (* (sin M) (+ m n))))))
(+ (cos M) (* K (- (* K (+ (* -1/8 (* (cos M) (pow (+ m n) 2))) (* -1/48 (* K (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K n))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* -1/8 (* (pow K 2) (* m (cos (+ M (* -1/2 (* K n))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/48 (* (pow K 3) (* m (sin (+ M (* -1/2 (* K n))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos (+ M (* -1/2 (* K m))))
(+ (cos (+ M (* -1/2 (* K m)))) (* 1/2 (* K (* n (sin (+ M (* -1/2 (* K m))))))))
(+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* -1/8 (* (pow K 2) (* n (cos (+ M (* -1/2 (* K m))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))
(+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/48 (* (pow K 3) (* n (sin (+ M (* -1/2 (* K m))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(* -1/2 (* K (+ m n)))
(+ M (* -1/2 (* K (+ m n))))
(+ M (* -1/2 (* K (+ m n))))
(+ M (* -1/2 (* K (+ m n))))
M
(* M (+ 1 (* -1/2 (/ (* K (+ m n)) M))))
(* M (+ 1 (* -1/2 (/ (* K (+ m n)) M))))
(* M (+ 1 (* -1/2 (/ (* K (+ m n)) M))))
M
(* -1 (* M (- (* 1/2 (/ (* K (+ m n)) M)) 1)))
(* -1 (* M (- (* 1/2 (/ (* K (+ m n)) M)) 1)))
(* -1 (* M (- (* 1/2 (/ (* K (+ m n)) M)) 1)))
M
(+ M (* -1/2 (* K (+ m n))))
(+ M (* -1/2 (* K (+ m n))))
(+ M (* -1/2 (* K (+ m n))))
(* -1/2 (* K (+ m n)))
(* K (+ (* -1/2 (+ m n)) (/ M K)))
(* K (+ (* -1/2 (+ m n)) (/ M K)))
(* K (+ (* -1/2 (+ m n)) (/ M K)))
(* -1/2 (* K (+ m n)))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 (+ m n)))))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 (+ m n)))))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 (+ m n)))))
(+ M (* -1/2 (* K n)))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(* -1/2 (* K m))
(* m (+ (* -1/2 K) (+ (* -1/2 (/ (* K n) m)) (/ M m))))
(* m (+ (* -1/2 K) (+ (* -1/2 (/ (* K n) m)) (/ M m))))
(* m (+ (* -1/2 K) (+ (* -1/2 (/ (* K n) m)) (/ M m))))
(* -1/2 (* K m))
(* -1 (* m (+ (* -1 (/ (+ M (* -1/2 (* K n))) m)) (* 1/2 K))))
(* -1 (* m (+ (* -1 (/ (+ M (* -1/2 (* K n))) m)) (* 1/2 K))))
(* -1 (* m (+ (* -1 (/ (+ M (* -1/2 (* K n))) m)) (* 1/2 K))))
(+ M (* -1/2 (* K m)))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(* -1/2 (* K n))
(* n (+ (* -1/2 K) (+ (* -1/2 (/ (* K m) n)) (/ M n))))
(* n (+ (* -1/2 K) (+ (* -1/2 (/ (* K m) n)) (/ M n))))
(* n (+ (* -1/2 K) (+ (* -1/2 (/ (* K m) n)) (/ M n))))
(* -1/2 (* K n))
(* -1 (* n (+ (* -1 (/ (+ M (* -1/2 (* K m))) n)) (* 1/2 K))))
(* -1 (* n (+ (* -1 (/ (+ M (* -1/2 (* K m))) n)) (* 1/2 K))))
(* -1 (* n (+ (* -1 (/ (+ M (* -1/2 (* K m))) n)) (* 1/2 K))))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K n))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(* -1/2 (* K m))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(* -1/2 (* K m))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(* -1/2 (* K m))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(* -1/2 (* K n))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(* -1/2 (* K n))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(* K (+ m n))
(* K (+ m n))
(* K (+ m n))
(* K (+ m n))
(* K (+ m n))
(* K (+ m n))
(* K (+ m n))
(* K (+ m n))
(* K (+ m n))
(* K (+ m n))
(* K (+ m n))
(* K (+ m n))
(* K n)
(+ (* K m) (* K n))
(+ (* K m) (* K n))
(+ (* K m) (* K n))
(* K m)
(* m (+ K (/ (* K n) m)))
(* m (+ K (/ (* K n) m)))
(* m (+ K (/ (* K n) m)))
(* K m)
(* -1 (* m (+ (* -1 K) (* -1 (/ (* K n) m)))))
(* -1 (* m (+ (* -1 K) (* -1 (/ (* K n) m)))))
(* -1 (* m (+ (* -1 K) (* -1 (/ (* K n) m)))))
(* K m)
(+ (* K m) (* K n))
(+ (* K m) (* K n))
(+ (* K m) (* K n))
(* K n)
(* n (+ K (/ (* K m) n)))
(* n (+ K (/ (* K m) n)))
(* n (+ K (/ (* K m) n)))
(* K n)
(* -1 (* n (+ (* -1 K) (* -1 (/ (* K m) n)))))
(* -1 (* n (+ (* -1 K) (* -1 (/ (* K m) n)))))
(* -1 (* n (+ (* -1 K) (* -1 (/ (* K m) n)))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2))))
(+ (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (* m (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- M (* 1/2 n)))))
(+ (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (* m (+ (* m (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 n)) 2)) 1/4))) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- M (* 1/2 n))))))
(+ (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (* m (+ (* m (+ (* m (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (+ (* -1/4 (- M (* 1/2 n))) (* 1/6 (pow (- M (* 1/2 n)) 3))))) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 n)) 2)) 1/4)))) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- M (* 1/2 n))))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2))))
(exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2))))
(exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2))))
(exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2))))
(+ (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (* n (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- M (* 1/2 m)))))
(+ (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (* n (+ (* n (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 m)) 2)) 1/4))) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- M (* 1/2 m))))))
(+ (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (* n (+ (* n (+ (* n (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (+ (* -1/4 (- M (* 1/2 m))) (* 1/6 (pow (- M (* 1/2 m)) 3))))) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 m)) 2)) 1/4)))) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- M (* 1/2 m))))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2))))
(exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2))))
(exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2))))
(exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2))))
(exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2)))))
(+ (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (* M (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ m n))))
(+ (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (* M (+ (* M (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (- (* 1/2 (pow (+ m n) 2)) 1))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ m n)))))
(+ (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (* M (+ (* M (+ (* M (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ (* -1 (+ m n)) (* 1/6 (pow (+ m n) 3))))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (- (* 1/2 (pow (+ m n) 2)) 1)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ m n)))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2))))
(exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2))))
(exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2))))
(exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2))))
(exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))
(+ (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))) (* -1 (* l (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))))))
(+ (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))) (* l (+ (* -1 (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))) (* 1/2 (* l (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))))))))
(+ (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))) (* l (+ (* -1 (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))) (* l (+ (* -1/6 (* l (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))))) (* 1/2 (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))))))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2)))
(exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2)))
(exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2)))
(exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2)))
(pow (- (* 1/2 n) M) 2)
(+ (* m (- (* 1/2 n) M)) (pow (- (* 1/2 n) M) 2))
(+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))
(+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))
(* 1/4 (pow m 2))
(* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))
(* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2)))) (/ M m)))
(* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2)))) (/ M m)))
(* 1/4 (pow m 2))
(* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (pow (- (* 1/2 n) M) 2) m))) m))))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (pow (- (* 1/2 n) M) 2) m))) m))))
(pow (- (* 1/2 m) M) 2)
(+ (* n (- (* 1/2 m) M)) (pow (- (* 1/2 m) M) 2))
(+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))
(+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))
(* 1/4 (pow n 2))
(* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))
(* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2)))) (/ M n)))
(* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2)))) (/ M n)))
(* 1/4 (pow n 2))
(* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (pow (- (* 1/2 m) M) 2) n))) n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (pow (- (* 1/2 m) M) 2) n))) n))))
(* 1/4 (pow (+ m n) 2))
(+ (* -1 (* M (+ m n))) (* 1/4 (pow (+ m n) 2)))
(+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))
(+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))
(pow M 2)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))
(* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))
(pow M 2)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))
(+ (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (* m (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (- (* 1/2 n) M))))
(+ (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (* m (+ (* m (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))))) (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (- (* 1/2 n) M)))))
(+ (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (* m (+ (* m (+ (* m (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (+ (* 1/6 (pow (- (* 1/2 n) M) 3)) (* 1/4 (- (* 1/2 n) M))))) (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))))) (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (- (* 1/2 n) M)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))
(exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))
(exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))
(exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))
(exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))
(+ (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (* n (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (- (* 1/2 m) M))))
(+ (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (* n (+ (* n (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))))) (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (- (* 1/2 m) M)))))
(+ (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (* n (+ (* n (+ (* n (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (+ (* 1/6 (pow (- (* 1/2 m) M) 3)) (* 1/4 (- (* 1/2 m) M))))) (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))))) (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (- (* 1/2 m) M)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))
(exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))
(exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))
(exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))
(exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))
(+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* -1 (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)))))
(+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* M (+ (* -1 (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n))) (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2))))))))
(+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* M (+ (* -1 (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n))) (* M (+ (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ (* -1 (+ m n)) (* -1/6 (pow (+ m n) 3))))) (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))))))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))
(+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))
(+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* 1/2 (* l (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))))
(+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (+ (* 1/6 (* l (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))
(exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))
(exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))
(exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))
Outputs
(pow (- (* 1/2 n) M) 2)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M))
(+ (* m (- (* 1/2 n) M)) (pow (- (* 1/2 n) M) 2))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) m))
(+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))
(+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (*.f64 m (+.f64 (*.f64 m #s(literal 1/4 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M))))
(+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))
(+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (*.f64 m (+.f64 (*.f64 m #s(literal 1/4 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M))))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) m)))
(* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2)))) (/ M m)))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 n m)) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) m) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) m))) (/.f64 M m))))
(* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2)))) (/ M m)))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 n m)) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) m) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) m))) (/.f64 M m))))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) m)))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (pow (- (* 1/2 n) M) 2) m))) m))))
(*.f64 (*.f64 m m) (-.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 n #s(literal -1/2 binary64)) M) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) m)) m)))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (pow (- (* 1/2 n) M) 2) m))) m))))
(*.f64 (*.f64 m m) (-.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 n #s(literal -1/2 binary64)) M) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) m)) m)))
(pow (- (* 1/2 m) M) 2)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M))
(+ (* n (- (* 1/2 m) M)) (pow (- (* 1/2 m) M) 2))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) n))
(+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))
(+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (*.f64 n (+.f64 (*.f64 n #s(literal 1/4 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M))))
(+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))
(+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (*.f64 n (+.f64 (*.f64 n #s(literal 1/4 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M))))
(* 1/4 (pow n 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
(* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) n)))
(* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2)))) (/ M n)))
(*.f64 (*.f64 n n) (-.f64 (+.f64 (+.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) m) n)) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (*.f64 n n))) (/.f64 M n)))
(* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2)))) (/ M n)))
(*.f64 (*.f64 n n) (-.f64 (+.f64 (+.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) m) n)) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (*.f64 n n))) (/.f64 M n)))
(* 1/4 (pow n 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
(* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) n)))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (pow (- (* 1/2 m) M) 2) n))) n))))
(*.f64 (*.f64 n n) (-.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 m #s(literal -1/2 binary64)) M) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) n)) n)))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (pow (- (* 1/2 m) M) 2) n))) n))))
(*.f64 (*.f64 n n) (-.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 m #s(literal -1/2 binary64)) M) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) n)) n)))
(* 1/4 (pow (+ m n) 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m)))
(+ (* -1 (* M (+ m n))) (* 1/4 (pow (+ m n) 2)))
(-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (*.f64 M (+.f64 n m)))
(+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (*.f64 M (-.f64 M (+.f64 n m))))
(+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (*.f64 M (-.f64 M (+.f64 n m))))
(pow M 2)
(*.f64 M M)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(*.f64 (*.f64 M M) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 n m) M)))
(* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))
(*.f64 (*.f64 M M) (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 n m) M)) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (*.f64 M M))))
(* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))
(*.f64 (*.f64 M M) (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 n m) M)) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (*.f64 M M))))
(pow M 2)
(*.f64 M M)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(*.f64 (*.f64 M M) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 n m) M)))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))
(*.f64 (*.f64 M M) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 n m) (/.f64 (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)) M)) M)))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))
(*.f64 (*.f64 M M) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 n m) (/.f64 (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)) M)) M)))
(* -1 (pow (- (* 1/2 n) M) 2))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (+.f64 (*.f64 n #s(literal -1/2 binary64)) M))
(- (* m (- M (* 1/2 n))) (pow (- (* 1/2 n) M) 2))
(+.f64 (*.f64 m (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (+.f64 (*.f64 n #s(literal -1/2 binary64)) M)))
(- (* m (- (+ M (* -1/4 m)) (* 1/2 n))) (pow (- (* 1/2 n) M) 2))
(+.f64 (*.f64 m (+.f64 (*.f64 m #s(literal -1/4 binary64)) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (+.f64 (*.f64 n #s(literal -1/2 binary64)) M)))
(- (* m (- (+ M (* -1/4 m)) (* 1/2 n))) (pow (- (* 1/2 n) M) 2))
(+.f64 (*.f64 m (+.f64 (*.f64 m #s(literal -1/4 binary64)) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (+.f64 (*.f64 n #s(literal -1/2 binary64)) M)))
(* -1/4 (pow m 2))
(*.f64 (*.f64 m m) #s(literal -1/4 binary64))
(* (pow m 2) (- (/ M m) (+ 1/4 (* 1/2 (/ n m)))))
(*.f64 (*.f64 m m) (+.f64 (+.f64 (/.f64 M m) #s(literal -1/4 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 n m))))
(* (pow m 2) (- (+ (* -1 (/ (pow (- (* 1/2 n) M) 2) (pow m 2))) (/ M m)) (+ 1/4 (* 1/2 (/ n m)))))
(*.f64 (*.f64 m m) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (+.f64 (*.f64 n #s(literal -1/2 binary64)) M)) (*.f64 m m)) (+.f64 (+.f64 (/.f64 M m) #s(literal -1/4 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 n m)))))
(* (pow m 2) (- (+ (* -1 (/ (pow (- (* 1/2 n) M) 2) (pow m 2))) (/ M m)) (+ 1/4 (* 1/2 (/ n m)))))
(*.f64 (*.f64 m m) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (+.f64 (*.f64 n #s(literal -1/2 binary64)) M)) (*.f64 m m)) (+.f64 (+.f64 (/.f64 M m) #s(literal -1/4 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 n m)))))
(* -1/4 (pow m 2))
(*.f64 (*.f64 m m) #s(literal -1/4 binary64))
(* (pow m 2) (- (* -1 (/ (- (* 1/2 n) M) m)) 1/4))
(*.f64 (*.f64 m m) (+.f64 (/.f64 (+.f64 (*.f64 n #s(literal -1/2 binary64)) M) m) #s(literal -1/4 binary64)))
(* (pow m 2) (- (* -1 (/ (- (/ (pow (- (* 1/2 n) M) 2) m) (* -1 (- (* 1/2 n) M))) m)) 1/4))
(*.f64 (*.f64 m m) (+.f64 (/.f64 (-.f64 (+.f64 (*.f64 n #s(literal -1/2 binary64)) M) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) m)) m) #s(literal -1/4 binary64)))
(* (pow m 2) (- (* -1 (/ (- (/ (pow (- (* 1/2 n) M) 2) m) (* -1 (- (* 1/2 n) M))) m)) 1/4))
(*.f64 (*.f64 m m) (+.f64 (/.f64 (-.f64 (+.f64 (*.f64 n #s(literal -1/2 binary64)) M) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) m)) m) #s(literal -1/4 binary64)))
(* -1 (pow (- (* 1/2 m) M) 2))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (+.f64 (*.f64 m #s(literal -1/2 binary64)) M))
(- (* n (- M (* 1/2 m))) (pow (- (* 1/2 m) M) 2))
(+.f64 (*.f64 n (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (+.f64 (*.f64 m #s(literal -1/2 binary64)) M)))
(- (* n (- (+ M (* -1/4 n)) (* 1/2 m))) (pow (- (* 1/2 m) M) 2))
(+.f64 (*.f64 n (+.f64 M (+.f64 (*.f64 n #s(literal -1/4 binary64)) (*.f64 m #s(literal -1/2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (+.f64 (*.f64 m #s(literal -1/2 binary64)) M)))
(- (* n (- (+ M (* -1/4 n)) (* 1/2 m))) (pow (- (* 1/2 m) M) 2))
(+.f64 (*.f64 n (+.f64 M (+.f64 (*.f64 n #s(literal -1/4 binary64)) (*.f64 m #s(literal -1/2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (+.f64 (*.f64 m #s(literal -1/2 binary64)) M)))
(* -1/4 (pow n 2))
(*.f64 (*.f64 n n) #s(literal -1/4 binary64))
(* (pow n 2) (- (/ M n) (+ 1/4 (* 1/2 (/ m n)))))
(*.f64 (*.f64 n n) (+.f64 (+.f64 (/.f64 M n) #s(literal -1/4 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 m n))))
(* (pow n 2) (- (+ (* -1 (/ (pow (- (* 1/2 m) M) 2) (pow n 2))) (/ M n)) (+ 1/4 (* 1/2 (/ m n)))))
(*.f64 (*.f64 n n) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (+.f64 (*.f64 m #s(literal -1/2 binary64)) M)) (*.f64 n n)) (+.f64 (+.f64 (/.f64 M n) #s(literal -1/4 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 m n)))))
(* (pow n 2) (- (+ (* -1 (/ (pow (- (* 1/2 m) M) 2) (pow n 2))) (/ M n)) (+ 1/4 (* 1/2 (/ m n)))))
(*.f64 (*.f64 n n) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (+.f64 (*.f64 m #s(literal -1/2 binary64)) M)) (*.f64 n n)) (+.f64 (+.f64 (/.f64 M n) #s(literal -1/4 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 m n)))))
(* -1/4 (pow n 2))
(*.f64 (*.f64 n n) #s(literal -1/4 binary64))
(* (pow n 2) (- (* -1 (/ (- (* 1/2 m) M) n)) 1/4))
(*.f64 (*.f64 n n) (+.f64 (/.f64 (+.f64 (*.f64 m #s(literal -1/2 binary64)) M) n) #s(literal -1/4 binary64)))
(* (pow n 2) (- (* -1 (/ (- (/ (pow (- (* 1/2 m) M) 2) n) (* -1 (- (* 1/2 m) M))) n)) 1/4))
(*.f64 (*.f64 n n) (+.f64 (/.f64 (-.f64 (+.f64 (*.f64 m #s(literal -1/2 binary64)) M) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) n)) n) #s(literal -1/4 binary64)))
(* (pow n 2) (- (* -1 (/ (- (/ (pow (- (* 1/2 m) M) 2) n) (* -1 (- (* 1/2 m) M))) n)) 1/4))
(*.f64 (*.f64 n n) (+.f64 (/.f64 (-.f64 (+.f64 (*.f64 m #s(literal -1/2 binary64)) M) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) n)) n) #s(literal -1/4 binary64)))
(* -1/4 (pow (+ m n) 2))
(*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))
(- (* M (+ m n)) (* 1/4 (pow (+ m n) 2)))
(+.f64 (*.f64 M (+.f64 n m)) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))
(- (* M (- (* -1 M) (* -1 (+ m n)))) (* 1/4 (pow (+ m n) 2)))
(+.f64 (*.f64 M (*.f64 #s(literal -1 binary64) (-.f64 M (+.f64 n m)))) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))
(- (* M (- (* -1 M) (* -1 (+ m n)))) (* 1/4 (pow (+ m n) 2)))
(+.f64 (*.f64 M (*.f64 #s(literal -1 binary64) (-.f64 M (+.f64 n m)))) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))
(* -1 (pow M 2))
(-.f64 #s(literal 0 binary64) (*.f64 M M))
(* (pow M 2) (- (+ (/ m M) (/ n M)) 1))
(*.f64 (*.f64 M M) (+.f64 (/.f64 m M) (+.f64 (/.f64 n M) #s(literal -1 binary64))))
(* (pow M 2) (- (* -1/4 (/ (pow (+ m n) 2) (pow M 2))) (+ 1 (* -1 (/ (+ m n) M)))))
(*.f64 (*.f64 M M) (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 n m) (+.f64 n m)) M) (/.f64 #s(literal -1/4 binary64) M)) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 n m) M))))
(* (pow M 2) (- (* -1/4 (/ (pow (+ m n) 2) (pow M 2))) (+ 1 (* -1 (/ (+ m n) M)))))
(*.f64 (*.f64 M M) (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 n m) (+.f64 n m)) M) (/.f64 #s(literal -1/4 binary64) M)) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 n m) M))))
(* -1 (pow M 2))
(-.f64 #s(literal 0 binary64) (*.f64 M M))
(* (pow M 2) (- (+ (/ m M) (/ n M)) 1))
(*.f64 (*.f64 M M) (+.f64 (/.f64 m M) (+.f64 (/.f64 n M) #s(literal -1 binary64))))
(* (pow M 2) (- (* -1 (/ (- (* 1/4 (/ (pow (+ m n) 2) M)) (+ m n)) M)) 1))
(*.f64 (*.f64 M M) (+.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 n m) (+.f64 n m)) M)) (+.f64 n m)) (-.f64 #s(literal 0 binary64) M)) #s(literal -1 binary64)))
(* (pow M 2) (- (* -1 (/ (- (* 1/4 (/ (pow (+ m n) 2) M)) (+ m n)) M)) 1))
(*.f64 (*.f64 M M) (+.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 n m) (+.f64 n m)) M)) (+.f64 n m)) (-.f64 #s(literal 0 binary64) M)) #s(literal -1 binary64)))
(* (cos (neg M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (cos.f64 M) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))))
(+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))) (* (sin (neg M)) (+ m n))))) (* (cos (neg M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))))
(+.f64 (*.f64 (cos.f64 M) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))) (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (*.f64 (+.f64 n m) (-.f64 #s(literal 0 binary64) (sin.f64 M))))))
(+ (* K (+ (* -1/2 (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))) (* (sin (neg M)) (+ m n)))) (* -1/8 (* K (* (cos (neg M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))) (pow (+ m n) 2))))))) (* (cos (neg M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))))
(+.f64 (*.f64 (cos.f64 M) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))) (*.f64 K (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (*.f64 (+.f64 n m) (-.f64 #s(literal 0 binary64) (sin.f64 M))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K (cos.f64 M)) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))))))))
(+ (* K (+ (* -1/2 (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))) (* (sin (neg M)) (+ m n)))) (* K (+ (* -1/8 (* (cos (neg M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))) (pow (+ m n) 2)))) (* 1/48 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))) (* (sin (neg M)) (pow (+ m n) 3))))))))) (* (cos (neg M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))))
(+.f64 (*.f64 (cos.f64 M) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))) (*.f64 K (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (*.f64 (+.f64 n m) (-.f64 #s(literal 0 binary64) (sin.f64 M))))) (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 M)) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))))) (*.f64 (*.f64 #s(literal 1/48 binary64) K) (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 M)) (*.f64 (+.f64 n m) (*.f64 (+.f64 n m) (+.f64 n m)))))))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K n)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))))
(*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l))))
(+ (* m (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (sin (- (* 1/2 (* K n)) M))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- M (* 1/2 n)))))) (* (cos (- (* 1/2 (* K n)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2))))))
(+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l)))) (*.f64 m (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l))))))))
(+ (* m (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (sin (- (* 1/2 (* K n)) M))))) (+ (* m (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (* (sin (- (* 1/2 (* K n)) M)) (- M (* 1/2 n)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K n)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2))))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 n)) 2)) 1/4)))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- M (* 1/2 n))))))) (* (cos (- (* 1/2 (* K n)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2))))))
(+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l)))) (*.f64 m (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l)))))) (*.f64 m (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l))) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (*.f64 K K)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l))))) (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))) #s(literal -1/4 binary64)))))))))
(+ (* m (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (sin (- (* 1/2 (* K n)) M))))) (+ (* m (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (* (sin (- (* 1/2 (* K n)) M)) (- M (* 1/2 n)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K n)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2))))))) (+ (* m (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (* (sin (- (* 1/2 (* K n)) M)) (- (* 1/2 (pow (- M (* 1/2 n)) 2)) 1/4))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- M (* 1/2 n)))))) (+ (* 1/48 (* (pow K 3) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (sin (- (* 1/2 (* K n)) M))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (+ (* -1/4 (- M (* 1/2 n))) (* 1/6 (pow (- M (* 1/2 n)) 3))))))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 n)) 2)) 1/4))))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- M (* 1/2 n))))))) (* (cos (- (* 1/2 (* K n)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2))))))
(+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l)))) (*.f64 m (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)))) (+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l))))) (*.f64 m (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l))) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (*.f64 K K)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l))))) (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))) #s(literal -1/4 binary64))))) (*.f64 m (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))) #s(literal -1/4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (*.f64 K K)) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l)))))) (+.f64 (*.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 K (*.f64 K K))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)))) (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))))))))))))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K m)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))))
(*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l))))
(+ (* n (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (sin (- (* 1/2 (* K m)) M))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- M (* 1/2 m)))))) (* (cos (- (* 1/2 (* K m)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2))))))
(+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l)))) (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l))))))))
(+ (* n (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (sin (- (* 1/2 (* K m)) M))))) (+ (* n (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (* (sin (- (* 1/2 (* K m)) M)) (- M (* 1/2 m)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K m)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2))))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 m)) 2)) 1/4)))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- M (* 1/2 m))))))) (* (cos (- (* 1/2 (* K m)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2))))))
(+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l)))) (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)))) (+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l))))) (*.f64 n (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 K (*.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))))) (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l))))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) #s(literal -1/4 binary64)))))))))))
(+ (* n (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (sin (- (* 1/2 (* K m)) M))))) (+ (* n (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (* (sin (- (* 1/2 (* K m)) M)) (- M (* 1/2 m)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K m)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2))))))) (+ (* n (+ (* -1/2 (* K (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (* (sin (- (* 1/2 (* K m)) M)) (- (* 1/2 (pow (- M (* 1/2 m)) 2)) 1/4))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- M (* 1/2 m)))))) (+ (* 1/48 (* (pow K 3) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (sin (- (* 1/2 (* K m)) M))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (+ (* -1/4 (- M (* 1/2 m))) (* 1/6 (pow (- M (* 1/2 m)) 3))))))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 m)) 2)) 1/4))))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- M (* 1/2 m))))))) (* (cos (- (* 1/2 (* K m)) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2))))))
(+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l)))) (*.f64 n (+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l))))) (+.f64 (*.f64 n (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 K (*.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))))) (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l))))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) #s(literal -1/4 binary64)))))) (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) #s(literal -1/4 binary64)))) (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l)))))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 K (*.f64 K K)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))))) (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))))))))))))) (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (* 1/2 (* K (+ m n)))) (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K))) (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))))
(+ (* M (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ m n))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (sin (* 1/2 (* K (+ m n))))))) (* (cos (* 1/2 (* K (+ m n)))) (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2)))))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K))) (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))) (*.f64 M (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K))) (*.f64 (+.f64 n m) (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))))) (*.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)))))))
(+ (* M (+ (* M (+ (* -1/2 (* (cos (* 1/2 (* K (+ m n)))) (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (- (* 1/2 (pow (+ m n) 2)) 1))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (* (sin (* 1/2 (* K (+ m n)))) (+ m n)))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ m n))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (sin (* 1/2 (* K (+ m n)))))))) (* (cos (* 1/2 (* K (+ m n)))) (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2)))))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K))) (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))) (*.f64 M (+.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K))) (*.f64 (+.f64 n m) (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))))) (*.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K))))) (*.f64 M (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K))) (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))) (+.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) #s(literal -1 binary64)))) (*.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))) (*.f64 (+.f64 n m) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K))))))))))
(+ (* M (+ (* M (+ (* -1/2 (* (cos (* 1/2 (* K (+ m n)))) (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))))) (+ (* M (+ (* -1/2 (* (cos (* 1/2 (* K (+ m n)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ m n)))) (+ (* -1/6 (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (sin (* 1/2 (* K (+ m n)))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ (* -1 (+ m n)) (* 1/6 (pow (+ m n) 3))))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (* (sin (* 1/2 (* K (+ m n)))) (- (* 1/2 (pow (+ m n) 2)) 1))))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (- (* 1/2 (pow (+ m n) 2)) 1))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (* (sin (* 1/2 (* K (+ m n)))) (+ m n))))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ m n))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (sin (* 1/2 (* K (+ m n)))))))) (* (cos (* 1/2 (* K (+ m n)))) (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2)))))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K))) (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))) (*.f64 M (+.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K))) (*.f64 (+.f64 n m) (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))))) (*.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K))))) (*.f64 M (+.f64 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K))) (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))) (+.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) #s(literal -1 binary64)))) (*.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))) (*.f64 (+.f64 n m) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)))))) (*.f64 M (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)))) (*.f64 (+.f64 n m) (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))))) (+.f64 (*.f64 (*.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)))) #s(literal -1/6 binary64)) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K))) (*.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))) (-.f64 (*.f64 (*.f64 (+.f64 n m) (*.f64 (+.f64 n m) (+.f64 n m))) #s(literal 1/6 binary64)) (+.f64 n m)))) (*.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) #s(literal -1 binary64)))))))))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))))
(*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))))
(+ (* -1 (* l (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))))) (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (+.f64 (-.f64 #s(literal 0 binary64) l) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))))
(+ (* l (+ (* -1 (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))))) (* 1/2 (* l (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))))))) (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))))
(+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))) (*.f64 l (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) l)))))
(+ (* l (+ (* -1 (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))))) (* l (+ (* -1/6 (* l (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))))) (* 1/2 (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))))))))) (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))))
(+.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) l) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))))) (*.f64 l (*.f64 l (*.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))) (+.f64 (*.f64 #s(literal -1/6 binary64) l) #s(literal 1/2 binary64))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2)))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2))))
(*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(cos (neg M))
(cos.f64 M)
(+ (cos (neg M)) (* -1/2 (* K (* (sin (neg M)) (+ m n)))))
(+.f64 (cos.f64 M) (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (+.f64 n m) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(+ (cos (neg M)) (* K (- (* -1/8 (* K (* (cos (neg M)) (pow (+ m n) 2)))) (* 1/2 (* (sin (neg M)) (+ m n))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K (cos.f64 M)) (*.f64 (+.f64 n m) (+.f64 n m)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (sin.f64 M))))))
(+ (cos (neg M)) (* K (- (* K (+ (* -1/8 (* (cos (neg M)) (pow (+ m n) 2))) (* 1/48 (* K (* (sin (neg M)) (pow (+ m n) 3)))))) (* 1/2 (* (sin (neg M)) (+ m n))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal 1/48 binary64) K) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 M)) (*.f64 (+.f64 n m) (*.f64 (+.f64 n m) (+.f64 n m))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 M)) (*.f64 (+.f64 n m) (+.f64 n m))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (sin.f64 M))))))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K n)) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))
(+ (cos (- (* 1/2 (* K n)) M)) (* -1/2 (* K (* m (sin (- (* 1/2 (* K n)) M))))))
(+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)))))
(+ (cos (- (* 1/2 (* K n)) M)) (* m (- (* -1/8 (* (pow K 2) (* m (cos (- (* 1/2 (* K n)) M))))) (* 1/2 (* K (sin (- (* 1/2 (* K n)) M)))))))
(+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (*.f64 m (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) m) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)))) (*.f64 #s(literal -1/2 binary64) (*.f64 K (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)))))))
(+ (cos (- (* 1/2 (* K n)) M)) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (- (* 1/2 (* K n)) M)))) (* 1/48 (* (pow K 3) (* m (sin (- (* 1/2 (* K n)) M))))))) (* 1/2 (* K (sin (- (* 1/2 (* K n)) M)))))))
(+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (*.f64 m (+.f64 (*.f64 m (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))) (*.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) m) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 K (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)))))))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (- n (* -1 m)))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (- n (* -1 m)))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (- n (* -1 m)))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (- n (* -1 m)))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K m)) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))
(+ (cos (- (* 1/2 (* K m)) M)) (* -1/2 (* K (* n (sin (- (* 1/2 (* K m)) M))))))
(+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 n K) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)))))
(+ (cos (- (* 1/2 (* K m)) M)) (* n (- (* -1/8 (* (pow K 2) (* n (cos (- (* 1/2 (* K m)) M))))) (* 1/2 (* K (sin (- (* 1/2 (* K m)) M)))))))
(+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) (*.f64 n (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) n) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)))) (*.f64 #s(literal -1/2 binary64) (*.f64 K (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)))))))
(+ (cos (- (* 1/2 (* K m)) M)) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (- (* 1/2 (* K m)) M)))) (* 1/48 (* (pow K 3) (* n (sin (- (* 1/2 (* K m)) M))))))) (* 1/2 (* K (sin (- (* 1/2 (* K m)) M)))))))
(+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) (*.f64 n (+.f64 (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))) (*.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) n) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 K (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)))))))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (- m (* -1 n)))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (- m (* -1 n)))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (- m (* -1 n)))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (- m (* -1 n)))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (* 1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)))
(+ (cos (* 1/2 (* K (+ m n)))) (* M (sin (* 1/2 (* K (+ m n))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K))) (*.f64 M (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)))))
(+ (cos (* 1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* 1/2 (* K (+ m n)))))) (* -1 (sin (* 1/2 (* K (+ m n))))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K))) (*.f64 M (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K))))))
(+ (cos (* 1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* 1/2 (* K (+ m n))))) (* -1/6 (* M (sin (* 1/2 (* K (+ m n)))))))) (* -1 (sin (* 1/2 (* K (+ m n))))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K))) (*.f64 M (+.f64 (*.f64 M (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)))) (*.f64 (*.f64 #s(literal -1/6 binary64) M) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K))))))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M))
(/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))))))
(+ (* M (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))) (*.f64 M (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (+.f64 n m) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))))))
(+ (* M (- (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1 (* (+ m n) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))) (*.f64 M (+.f64 (-.f64 (*.f64 M (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))) (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (+.f64 n m))))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))) (*.f64 (+.f64 n m) (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (+.f64 n m) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))))))))))) (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 (+.f64 n m) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))))))
(+ (* M (- (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (+ (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (* 1/6 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1 (* (+ m n) (- (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1 (* (+ m n) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (+ (* (+ 1 (* 1/2 (pow (+ m n) 2))) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ (* -1 (+ m n)) (* -1/6 (pow (+ m n) 3)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))))) (+ (* -1 (* (+ m n) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))) (*.f64 M (+.f64 (-.f64 (*.f64 M (+.f64 (*.f64 M (-.f64 (/.f64 (*.f64 #s(literal 1/6 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))) (-.f64 (+.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (+.f64 n m) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (+.f64 n m))))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (-.f64 (*.f64 (*.f64 (+.f64 n m) (*.f64 (+.f64 n m) (+.f64 n m))) #s(literal -1/6 binary64)) (+.f64 n m))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))))))) (*.f64 (+.f64 n m) (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))) (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (+.f64 n m))))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))) (*.f64 (+.f64 n m) (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (+.f64 n m) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))))))))))) (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))) (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (+.f64 n m))))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))) (*.f64 (+.f64 n m) (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (+.f64 n m) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))))))))) (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 (+.f64 n m) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(+ (* 1/2 (/ (* K (* (sin M) (+ m n))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 (+.f64 n m) (sin.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))))
(+ (* K (+ (* -1/8 (/ (* K (* (cos M) (pow (+ m n) 2))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (* (sin M) (+ m n)) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 K (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K (cos.f64 M)) (*.f64 (+.f64 n m) (+.f64 n m)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (sin.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))))))
(+ (* K (+ (* 1/2 (/ (* (sin M) (+ m n)) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (* K (+ (* -1/8 (/ (* (cos M) (pow (+ m n) 2)) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (* -1/48 (/ (* K (* (sin M) (pow (+ m n) 3))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 K (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (sin.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 K (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 M)) (*.f64 (+.f64 n m) (+.f64 n m))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 K (sin.f64 M)) (*.f64 (+.f64 n m) (*.f64 (+.f64 n m) (+.f64 n m))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))
(+ (* m (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 m (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))))))
(+ (* m (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* m (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* (- (* 1/2 n) M) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 m (+.f64 (*.f64 m (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))))) (/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))))))
(+ (* m (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* m (- (+ (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* m (- (* -1/48 (/ (* (pow K 3) (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (+ (* (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* (- (* 1/2 n) M) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (- (* 1/2 n) M)) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ (* 1/6 (pow (- (* 1/2 n) M) 3)) (* 1/4 (- (* 1/2 n) M)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))))) (+ (* (- (* 1/2 n) M) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 m (+.f64 (*.f64 m (+.f64 (*.f64 m (-.f64 (/.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 K (*.f64 K K)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))))) (/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) #s(literal 1/4 binary64)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M))))))))) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))))) (/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))))))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m)))))
(+ (* n (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))) (*.f64 n (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m)))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))))))
(+ (* n (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* n (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* (- (* 1/2 m) M) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))) (*.f64 n (+.f64 (*.f64 n (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m)))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M))))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m)))))))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m)))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m)))))))))
(+ (* n (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* n (- (+ (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* n (- (* -1/48 (/ (* (pow K 3) (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (+ (* (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* (- (* 1/2 m) M) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (- (* 1/2 m) M)) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ (* 1/6 (pow (- (* 1/2 m) M) 3)) (* 1/4 (- (* 1/2 m) M)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))))) (+ (* (- (* 1/2 m) M) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))) (*.f64 n (+.f64 (*.f64 n (+.f64 (*.f64 n (-.f64 (/.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 K (*.f64 K K)) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m)))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M))))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m)))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m)))))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M))))))))) (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m)))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M))))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))))))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m)))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m)))))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(+ (* -1 (/ (* l (cos (+ M (* -1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))
(-.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 l (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(+ (* l (- (* -1 (* l (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))) (*.f64 l (-.f64 (*.f64 l (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))))
(+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))) (+ (* -1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/6 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))))) (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))) (*.f64 l (-.f64 (*.f64 l (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) l) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))) (*.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))) #s(literal -1/3 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (-.f64 (fabs.f64 (-.f64 n m)) l))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (-.f64 (fabs.f64 (-.f64 n m)) l))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (-.f64 (fabs.f64 (-.f64 n m)) l))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (-.f64 (fabs.f64 (-.f64 n m)) l))))
(cos (* -1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))
(+ (cos (* -1/2 (* K (+ m n)))) (* -1 (* M (sin (* -1/2 (* K (+ m n)))))))
(-.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (*.f64 M (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K (+ m n)))))) (sin (* -1/2 (* K (+ m n)))))))
(+.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (*.f64 M (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) M) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))))
(+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* 1/6 (* M (sin (* -1/2 (* K (+ m n)))))))) (sin (* -1/2 (* K (+ m n)))))))
(+.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (*.f64 M (-.f64 (*.f64 M (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (*.f64 (*.f64 #s(literal 1/6 binary64) M) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos M)
(cos.f64 M)
(+ (cos M) (* 1/2 (* K (* (sin M) (+ m n)))))
(+.f64 (cos.f64 M) (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 (+.f64 n m) (sin.f64 M))))
(+ (cos M) (* K (- (* -1/8 (* K (* (cos M) (pow (+ m n) 2)))) (* -1/2 (* (sin M) (+ m n))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K (cos.f64 M)) (*.f64 (+.f64 n m) (+.f64 n m)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (sin.f64 M))))))
(+ (cos M) (* K (- (* K (+ (* -1/8 (* (cos M) (pow (+ m n) 2))) (* -1/48 (* K (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 M)) (*.f64 (+.f64 n m) (+.f64 n m))) (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 K (sin.f64 M)) (*.f64 (+.f64 n m) (*.f64 (+.f64 n m) (+.f64 n m))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (sin.f64 M))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* -1/8 (* (pow K 2) (* m (cos (+ M (* -1/2 (* K n))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 m (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) m) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (*.f64 (*.f64 #s(literal -1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/48 (* (pow K 3) (* m (sin (+ M (* -1/2 (* K n))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 m (+.f64 (*.f64 m (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) m) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K m))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m)))
(+ (cos (+ M (* -1/2 (* K m)))) (* 1/2 (* K (* n (sin (+ M (* -1/2 (* K m))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 n K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))))))
(+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* -1/8 (* (pow K 2) (* n (cos (+ M (* -1/2 (* K m))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))) (*.f64 n (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) n) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))))))))
(+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/48 (* (pow K 3) (* n (sin (+ M (* -1/2 (* K m))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))) (*.f64 n (+.f64 (*.f64 n (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) n) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(+ M (* -1/2 (* K (+ m n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))
(+ M (* -1/2 (* K (+ m n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))
(+ M (* -1/2 (* K (+ m n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))
M
(* M (+ 1 (* -1/2 (/ (* K (+ m n)) M))))
(*.f64 M (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* M (+ 1 (* -1/2 (/ (* K (+ m n)) M))))
(*.f64 M (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
(* M (+ 1 (* -1/2 (/ (* K (+ m n)) M))))
(*.f64 M (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)) M)))
M
(* -1 (* M (- (* 1/2 (/ (* K (+ m n)) M)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) M) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M) #s(literal -1 binary64)))
(* -1 (* M (- (* 1/2 (/ (* K (+ m n)) M)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) M) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M) #s(literal -1 binary64)))
(* -1 (* M (- (* 1/2 (/ (* K (+ m n)) M)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) M) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) K)) M) #s(literal -1 binary64)))
M
(+ M (* -1/2 (* K (+ m n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))
(+ M (* -1/2 (* K (+ m n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))
(+ M (* -1/2 (* K (+ m n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* K (+ (* -1/2 (+ m n)) (/ M K)))
(*.f64 K (+.f64 (*.f64 (+.f64 n m) #s(literal -1/2 binary64)) (/.f64 M K)))
(* K (+ (* -1/2 (+ m n)) (/ M K)))
(*.f64 K (+.f64 (*.f64 (+.f64 n m) #s(literal -1/2 binary64)) (/.f64 M K)))
(* K (+ (* -1/2 (+ m n)) (/ M K)))
(*.f64 K (+.f64 (*.f64 (+.f64 n m) #s(literal -1/2 binary64)) (/.f64 M K)))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 (+ m n)))))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) (/.f64 M K)) (-.f64 #s(literal 0 binary64) K))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 (+ m n)))))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) (/.f64 M K)) (-.f64 #s(literal 0 binary64) K))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 (+ m n)))))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) (/.f64 M K)) (-.f64 #s(literal 0 binary64) K))
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))
(* -1/2 (* K m))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) m)
(* m (+ (* -1/2 K) (+ (* -1/2 (/ (* K n) m)) (/ M m))))
(*.f64 m (+.f64 (/.f64 M m) (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m)))))
(* m (+ (* -1/2 K) (+ (* -1/2 (/ (* K n) m)) (/ M m))))
(*.f64 m (+.f64 (/.f64 M m) (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m)))))
(* m (+ (* -1/2 K) (+ (* -1/2 (/ (* K n) m)) (/ M m))))
(*.f64 m (+.f64 (/.f64 M m) (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m)))))
(* -1/2 (* K m))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) m)
(* -1 (* m (+ (* -1 (/ (+ M (* -1/2 (* K n))) m)) (* 1/2 K))))
(*.f64 (-.f64 #s(literal 0 binary64) m) (-.f64 (*.f64 #s(literal 1/2 binary64) K) (/.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) m)))
(* -1 (* m (+ (* -1 (/ (+ M (* -1/2 (* K n))) m)) (* 1/2 K))))
(*.f64 (-.f64 #s(literal 0 binary64) m) (-.f64 (*.f64 #s(literal 1/2 binary64) K) (/.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) m)))
(* -1 (* m (+ (* -1 (/ (+ M (* -1/2 (* K n))) m)) (* 1/2 K))))
(*.f64 (-.f64 #s(literal 0 binary64) m) (-.f64 (*.f64 #s(literal 1/2 binary64) K) (/.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) m)))
(+ M (* -1/2 (* K m)))
(+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* n (+ (* -1/2 K) (+ (* -1/2 (/ (* K m) n)) (/ M n))))
(*.f64 n (+.f64 (/.f64 M n) (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n)))))
(* n (+ (* -1/2 K) (+ (* -1/2 (/ (* K m) n)) (/ M n))))
(*.f64 n (+.f64 (/.f64 M n) (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n)))))
(* n (+ (* -1/2 K) (+ (* -1/2 (/ (* K m) n)) (/ M n))))
(*.f64 n (+.f64 (/.f64 M n) (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n)))))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1 (* n (+ (* -1 (/ (+ M (* -1/2 (* K m))) n)) (* 1/2 K))))
(*.f64 (-.f64 #s(literal 0 binary64) n) (-.f64 (*.f64 #s(literal 1/2 binary64) K) (/.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m)) n)))
(* -1 (* n (+ (* -1 (/ (+ M (* -1/2 (* K m))) n)) (* 1/2 K))))
(*.f64 (-.f64 #s(literal 0 binary64) n) (-.f64 (*.f64 #s(literal 1/2 binary64) K) (/.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m)) n)))
(* -1 (* n (+ (* -1 (/ (+ M (* -1/2 (* K m))) n)) (* 1/2 K))))
(*.f64 (-.f64 #s(literal 0 binary64) n) (-.f64 (*.f64 #s(literal 1/2 binary64) K) (/.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m)) n)))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K m))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) m)
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(*.f64 m (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(*.f64 m (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(*.f64 m (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* -1/2 (* K m))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) m)
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(*.f64 (-.f64 #s(literal 0 binary64) m) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(*.f64 (-.f64 #s(literal 0 binary64) m) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(*.f64 (-.f64 #s(literal 0 binary64) m) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* -1/2 (* K m))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) m)
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(*.f64 n (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(*.f64 n (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(*.f64 n (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(*.f64 (-.f64 #s(literal 0 binary64) n) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(*.f64 (-.f64 #s(literal 0 binary64) n) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(*.f64 (-.f64 #s(literal 0 binary64) n) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(* K (+ m n))
(*.f64 (+.f64 n m) K)
(* K (+ m n))
(*.f64 (+.f64 n m) K)
(* K (+ m n))
(*.f64 (+.f64 n m) K)
(* K (+ m n))
(*.f64 (+.f64 n m) K)
(* K (+ m n))
(*.f64 (+.f64 n m) K)
(* K (+ m n))
(*.f64 (+.f64 n m) K)
(* K (+ m n))
(*.f64 (+.f64 n m) K)
(* K (+ m n))
(*.f64 (+.f64 n m) K)
(* K (+ m n))
(*.f64 (+.f64 n m) K)
(* K (+ m n))
(*.f64 (+.f64 n m) K)
(* K (+ m n))
(*.f64 (+.f64 n m) K)
(* K (+ m n))
(*.f64 (+.f64 n m) K)
(* K n)
(*.f64 n K)
(+ (* K m) (* K n))
(*.f64 (+.f64 n m) K)
(+ (* K m) (* K n))
(*.f64 (+.f64 n m) K)
(+ (* K m) (* K n))
(*.f64 (+.f64 n m) K)
(* K m)
(*.f64 m K)
(* m (+ K (/ (* K n) m)))
(*.f64 m (+.f64 K (/.f64 (*.f64 n K) m)))
(* m (+ K (/ (* K n) m)))
(*.f64 m (+.f64 K (/.f64 (*.f64 n K) m)))
(* m (+ K (/ (* K n) m)))
(*.f64 m (+.f64 K (/.f64 (*.f64 n K) m)))
(* K m)
(*.f64 m K)
(* -1 (* m (+ (* -1 K) (* -1 (/ (* K n) m)))))
(*.f64 (-.f64 #s(literal 0 binary64) m) (-.f64 (-.f64 #s(literal 0 binary64) K) (/.f64 (*.f64 n K) m)))
(* -1 (* m (+ (* -1 K) (* -1 (/ (* K n) m)))))
(*.f64 (-.f64 #s(literal 0 binary64) m) (-.f64 (-.f64 #s(literal 0 binary64) K) (/.f64 (*.f64 n K) m)))
(* -1 (* m (+ (* -1 K) (* -1 (/ (* K n) m)))))
(*.f64 (-.f64 #s(literal 0 binary64) m) (-.f64 (-.f64 #s(literal 0 binary64) K) (/.f64 (*.f64 n K) m)))
(* K m)
(*.f64 m K)
(+ (* K m) (* K n))
(*.f64 (+.f64 n m) K)
(+ (* K m) (* K n))
(*.f64 (+.f64 n m) K)
(+ (* K m) (* K n))
(*.f64 (+.f64 n m) K)
(* K n)
(*.f64 n K)
(* n (+ K (/ (* K m) n)))
(*.f64 n (+.f64 K (/.f64 (*.f64 m K) n)))
(* n (+ K (/ (* K m) n)))
(*.f64 n (+.f64 K (/.f64 (*.f64 m K) n)))
(* n (+ K (/ (* K m) n)))
(*.f64 n (+.f64 K (/.f64 (*.f64 m K) n)))
(* K n)
(*.f64 n K)
(* -1 (* n (+ (* -1 K) (* -1 (/ (* K m) n)))))
(-.f64 #s(literal 0 binary64) (*.f64 n (-.f64 (-.f64 #s(literal 0 binary64) K) (/.f64 (*.f64 m K) n))))
(* -1 (* n (+ (* -1 K) (* -1 (/ (* K m) n)))))
(-.f64 #s(literal 0 binary64) (*.f64 n (-.f64 (-.f64 #s(literal 0 binary64) K) (/.f64 (*.f64 m K) n))))
(* -1 (* n (+ (* -1 K) (* -1 (/ (* K m) n)))))
(-.f64 #s(literal 0 binary64) (*.f64 n (-.f64 (-.f64 #s(literal 0 binary64) K) (/.f64 (*.f64 m K) n))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2))))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l)))
(+ (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (* m (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- M (* 1/2 n)))))
(+.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l))) (*.f64 m (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l))))))
(+ (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (* m (+ (* m (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 n)) 2)) 1/4))) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- M (* 1/2 n))))))
(+.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l))) (*.f64 m (+.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l)))) (*.f64 (*.f64 m (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))) #s(literal -1/4 binary64))))))
(+ (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (* m (+ (* m (+ (* m (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (+ (* -1/4 (- M (* 1/2 n))) (* 1/6 (pow (- M (* 1/2 n)) 3))))) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 n)) 2)) 1/4)))) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 n) M) 2)))) (- M (* 1/2 n))))))
(+.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l))) (*.f64 m (+.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l)))) (*.f64 m (+.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))) #s(literal -1/4 binary64))) (*.f64 m (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) l))) (+.f64 (*.f64 #s(literal -1/4 binary64) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))))))))))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (neg (+ n (* -1 m)))) (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2))))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l)))
(+ (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (* n (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- M (* 1/2 m)))))
(+.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l))) (*.f64 n (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l))))))
(+ (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (* n (+ (* n (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 m)) 2)) 1/4))) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- M (* 1/2 m))))))
(+.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l))) (*.f64 n (+.f64 (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l)))) (*.f64 n (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) #s(literal -1/4 binary64)))))))
(+ (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (* n (+ (* n (+ (* n (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (+ (* -1/4 (- M (* 1/2 m))) (* 1/6 (pow (- M (* 1/2 m)) 3))))) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- (* 1/2 (pow (- M (* 1/2 m)) 2)) 1/4)))) (* (exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 m) M) 2)))) (- M (* 1/2 m))))))
(+.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l))) (*.f64 n (+.f64 (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l)))) (*.f64 n (+.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) #s(literal -1/4 binary64))) (*.f64 (*.f64 n (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))))))))))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (+ m (* -1 n))) (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(+ (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (* M (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ m n))))
(+.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))) (*.f64 M (*.f64 (+.f64 n m) (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))))))
(+ (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (* M (+ (* M (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (- (* 1/2 (pow (+ m n) 2)) 1))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ m n)))))
(+.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))) (*.f64 M (+.f64 (*.f64 (+.f64 n m) (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))) (*.f64 M (*.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) #s(literal -1 binary64)))))))
(+ (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (* M (+ (* M (+ (* M (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ (* -1 (+ m n)) (* 1/6 (pow (+ m n) 3))))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (- (* 1/2 (pow (+ m n) 2)) 1)))) (* (exp (- (fabs (- m n)) (+ l (* 1/4 (pow (+ m n) 2))))) (+ m n)))))
(+.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))) (*.f64 M (+.f64 (*.f64 (+.f64 n m) (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))) (*.f64 M (+.f64 (*.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) #s(literal -1 binary64))) (*.f64 M (*.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))) (-.f64 (*.f64 (*.f64 (+.f64 n m) (*.f64 (+.f64 n m) (+.f64 n m))) #s(literal 1/6 binary64)) (+.f64 n m)))))))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (- m n)) (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(+ (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))) (* -1 (* l (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))))))
(*.f64 (+.f64 (-.f64 #s(literal 0 binary64) l) #s(literal 1 binary64)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))))
(+ (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))) (* l (+ (* -1 (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))) (* 1/2 (* l (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))))))))
(+.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (*.f64 l (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) l)))))
(+ (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))) (* l (+ (* -1 (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))) (* l (+ (* -1/6 (* l (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2))))) (* 1/2 (exp (- (fabs (- m n)) (pow (- (* 1/2 (+ m n)) M) 2)))))))))
(+.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) l) #s(literal 1 binary64)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))) (*.f64 l (*.f64 l (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)))) (+.f64 (*.f64 #s(literal -1/6 binary64) l) #s(literal 1/2 binary64))))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (fabs (- m n)) (+ l (pow (- (* 1/2 (+ m n)) M) 2))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2)))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2)))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2)))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(exp (- (+ (fabs (- m n)) (* -1 l)) (pow (- (* 1/2 (+ m n)) M) 2)))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M))))
(pow (- (* 1/2 n) M) 2)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M))
(+ (* m (- (* 1/2 n) M)) (pow (- (* 1/2 n) M) 2))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) m))
(+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))
(+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (*.f64 m (+.f64 (*.f64 m #s(literal 1/4 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M))))
(+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))
(+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (*.f64 m (+.f64 (*.f64 m #s(literal 1/4 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M))))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) m)))
(* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2)))) (/ M m)))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 n m)) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) m) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) m))) (/.f64 M m))))
(* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2)))) (/ M m)))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 n m)) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) m) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) m))) (/.f64 M m))))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) m)))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (pow (- (* 1/2 n) M) 2) m))) m))))
(*.f64 (*.f64 m m) (-.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 n #s(literal -1/2 binary64)) M) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) m)) m)))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (pow (- (* 1/2 n) M) 2) m))) m))))
(*.f64 (*.f64 m m) (-.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 n #s(literal -1/2 binary64)) M) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) m)) m)))
(pow (- (* 1/2 m) M) 2)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M))
(+ (* n (- (* 1/2 m) M)) (pow (- (* 1/2 m) M) 2))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) n))
(+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))
(+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (*.f64 n (+.f64 (*.f64 n #s(literal 1/4 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M))))
(+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))
(+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (*.f64 n (+.f64 (*.f64 n #s(literal 1/4 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M))))
(* 1/4 (pow n 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
(* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) n)))
(* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2)))) (/ M n)))
(*.f64 (*.f64 n n) (-.f64 (+.f64 (+.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) m) n)) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (*.f64 n n))) (/.f64 M n)))
(* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2)))) (/ M n)))
(*.f64 (*.f64 n n) (-.f64 (+.f64 (+.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) m) n)) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (*.f64 n n))) (/.f64 M n)))
(* 1/4 (pow n 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
(* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) n)))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (pow (- (* 1/2 m) M) 2) n))) n))))
(*.f64 (*.f64 n n) (-.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 m #s(literal -1/2 binary64)) M) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) n)) n)))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (pow (- (* 1/2 m) M) 2) n))) n))))
(*.f64 (*.f64 n n) (-.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 m #s(literal -1/2 binary64)) M) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) n)) n)))
(* 1/4 (pow (+ m n) 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m)))
(+ (* -1 (* M (+ m n))) (* 1/4 (pow (+ m n) 2)))
(-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (*.f64 M (+.f64 n m)))
(+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (*.f64 M (-.f64 M (+.f64 n m))))
(+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (*.f64 M (-.f64 M (+.f64 n m))))
(pow M 2)
(*.f64 M M)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(*.f64 (*.f64 M M) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 n m) M)))
(* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))
(*.f64 (*.f64 M M) (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 n m) M)) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (*.f64 M M))))
(* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))
(*.f64 (*.f64 M M) (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 n m) M)) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (*.f64 M M))))
(pow M 2)
(*.f64 M M)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(*.f64 (*.f64 M M) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 n m) M)))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))
(*.f64 (*.f64 M M) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 n m) (/.f64 (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)) M)) M)))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))
(*.f64 (*.f64 M M) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 n m) (/.f64 (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)) M)) M)))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))
(+ (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (* m (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (- (* 1/2 n) M))))
(+.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))) (*.f64 m (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))))
(+ (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (* m (+ (* m (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))))) (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (- (* 1/2 n) M)))))
(+.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))) (*.f64 m (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 m (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)))))))))
(+ (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (* m (+ (* m (+ (* m (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (+ (* 1/6 (pow (- (* 1/2 n) M) 3)) (* 1/4 (- (* 1/2 n) M))))) (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))))) (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (- (* 1/2 n) M)))))
(+.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))) (*.f64 m (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 m (+.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M))))) (*.f64 (*.f64 m (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) #s(literal 1/4 binary64)))))))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))
(+ (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (* n (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (- (* 1/2 m) M))))
(+.f64 (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m)))) (*.f64 n (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m)))))))
(+ (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (* n (+ (* n (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))))) (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (- (* 1/2 m) M)))))
(+.f64 (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m)))) (*.f64 n (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))) (*.f64 n (*.f64 (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m)))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)))))))))
(+ (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (* n (+ (* n (+ (* n (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (+ (* 1/6 (pow (- (* 1/2 m) M) 3)) (* 1/4 (- (* 1/2 m) M))))) (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))))) (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (- (* 1/2 m) M)))))
(+.f64 (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m)))) (*.f64 n (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))) (*.f64 n (+.f64 (*.f64 (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m)))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M))))) (*.f64 (*.f64 n (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)))))))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))
(+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* -1 (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)))))
(-.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))))) (*.f64 M (*.f64 (+.f64 n m) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))))))))
(+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* M (+ (* -1 (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n))) (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2))))))))
(+.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))))) (*.f64 M (-.f64 (*.f64 M (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (+.f64 n m)))))) (*.f64 (+.f64 n m) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))))))
(+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* M (+ (* -1 (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n))) (* M (+ (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ (* -1 (+ m n)) (* -1/6 (pow (+ m n) 3))))) (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))))))))
(+.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))))) (*.f64 M (-.f64 (*.f64 M (+.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (+.f64 n m))))) (*.f64 M (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))))) (-.f64 (*.f64 (*.f64 (+.f64 n m) (*.f64 (+.f64 n m) (+.f64 n m))) #s(literal -1/6 binary64)) (+.f64 n m)))))) (*.f64 (+.f64 n m) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))))))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))
(exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))
(+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))
(*.f64 (+.f64 l #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* 1/2 (* l (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))) (*.f64 l (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) l) #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))))
(+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (+ (* 1/6 (* l (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))))
(+.f64 (*.f64 (+.f64 l #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))) (*.f64 l (*.f64 l (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))) (+.f64 (*.f64 #s(literal 1/6 binary64) l) #s(literal 1/2 binary64))))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))
(exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (-.f64 (fabs.f64 (-.f64 n m)) l)))
(exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))
(exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (-.f64 (fabs.f64 (-.f64 n m)) l)))
(exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))
(exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (-.f64 (fabs.f64 (-.f64 n m)) l)))
(exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))
(exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (-.f64 (fabs.f64 (-.f64 n m)) l)))

eval292.0ms (1.6%)

Compiler

Compiled 130256 to 3810 computations (97.1% saved)

prune210.0ms (1.2%)

Pruning

19 alts after pruning (19 fresh and 0 done)

PrunedKeptTotal
New1850191869
Fresh000
Picked202
Done000
Total1852191871
Accuracy
98.4%
Counts
1871 → 19
Alt Table
Click to see full alt table
StatusAccuracyProgram
77.2%
(/.f64 (fma.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
76.4%
(/.f64 (-.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (*.f64 M (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
76.4%
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
77.2%
(/.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
77.6%
(/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
68.8%
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (*.f64 (+.f64 l #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
72.5%
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
68.6%
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
▶49.3%
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
45.0%
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (exp.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (-.f64 l (fabs.f64 (-.f64 m n))))))
70.5%
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m)))))
▶66.2%
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))
38.8%
(/.f64 (cos.f64 (+.f64 M (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1 binary64))))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
▶96.3%
(/.f64 (cos.f64 M) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
▶77.2%
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
76.4%
(*.f64 (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))))) (exp.f64 (-.f64 (neg.f64 (pow.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 2 binary64))) (-.f64 l (fabs.f64 (-.f64 m n))))))
▶77.2%
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
49.5%
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (exp.f64 (-.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)) (-.f64 l (fabs.f64 (-.f64 m n))))))
49.3%
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (exp.f64 (-.f64 (neg.f64 (*.f64 M M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
Compiler

Compiled 1490 to 844 computations (43.4% saved)

simplify246.0ms (1.4%)

Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)
✓cost-diff0
(cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M))
✓cost-diff0
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
✓cost-diff6464
(pow.f64 (exp.f64 #s(literal -1 binary64)) (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))
✓cost-diff0
(+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))
✓cost-diff0
(exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))
✓cost-diff0
(/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
✓cost-diff128
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
✓cost-diff0
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
✓cost-diff0
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
✓cost-diff0
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
✓cost-diff0
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))
✓cost-diff0
(/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64))
✓cost-diff0
(+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))
✓cost-diff0
(cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64))))
✓cost-diff0
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
✓cost-diff0
(+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))
✓cost-diff0
(exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))
✓cost-diff0
(cos.f64 M)
✓cost-diff0
(/.f64 (cos.f64 M) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
Rules
3160×*-lowering-*.f32
3160×*-lowering-*.f64
1750×+-lowering-+.f64
1750×+-lowering-+.f32
1350×/-lowering-/.f32
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
059588
1136575
2312574
31077570
44843570
08233570
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(/ (cos M) (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))))
(cos M)
M
(exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n)))))
(+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))
(* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M))
(- (/ (+ m n) 2) M)
(/ (+ m n) 2)
(+ m n)
m
n
2
(- l (fabs (- m n)))
l
(fabs (- m n))
(- m n)
(/ (cos (+ M (/ (* K (+ m n)) -2))) (exp (+ (* M M) (- l (fabs (- m n))))))
(cos (+ M (/ (* K (+ m n)) -2)))
(+ M (/ (* K (+ m n)) -2))
M
(/ (* K (+ m n)) -2)
(* K (+ m n))
K
(+ m n)
m
n
-2
(exp (+ (* M M) (- l (fabs (- m n)))))
(+ (* M M) (- l (fabs (- m n))))
(* M M)
(- l (fabs (- m n)))
l
(fabs (- m n))
(- m n)
(/ (cos (+ M (* -1/2 (* n K)))) (exp (+ l (- (* (- (* 1/2 n) M) (- (* 1/2 n) M)) (fabs (- n m))))))
(cos (+ M (* -1/2 (* n K))))
(+ M (* -1/2 (* n K)))
M
(* -1/2 (* n K))
-1/2
(* n K)
n
K
(exp (+ l (- (* (- (* 1/2 n) M) (- (* 1/2 n) M)) (fabs (- n m)))))
(+ l (- (* (- (* 1/2 n) M) (- (* 1/2 n) M)) (fabs (- n m))))
l
(- (* (- (* 1/2 n) M) (- (* 1/2 n) M)) (fabs (- n m)))
(* (- (* 1/2 n) M) (- (* 1/2 n) M))
(- (* 1/2 n) M)
(* 1/2 n)
1/2
(fabs (- n m))
(- n m)
m
(/ 1 (/ (exp (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M)))) (cos (+ M (* K (/ (+ m n) -2))))))
1
(/ (exp (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M)))) (cos (+ M (* K (/ (+ m n) -2)))))
(exp (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M))))
(+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M)))
(- l (fabs (- m n)))
l
(fabs (- m n))
(- m n)
m
n
(* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M))
(+ (/ (+ m n) -2) M)
(/ (+ m n) -2)
(+ m n)
-2
M
(cos (+ M (* K (/ (+ m n) -2))))
(+ M (* K (/ (+ m n) -2)))
(* K (/ (+ m n) -2))
K
(* (cos (- (/ (* K (+ m n)) 2) M)) (pow (exp -1) (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M)))))
(cos (- (/ (* K (+ m n)) 2) M))
(- (/ (* K (+ m n)) 2) M)
(/ (* K (+ m n)) 2)
(* K (+ m n))
K
(+ m n)
m
n
2
M
(pow (exp -1) (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M))))
(exp -1)
-1
(+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M)))
(- l (fabs (- m n)))
l
(fabs (- m n))
(- m n)
(* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M))
(+ (/ (+ m n) -2) M)
(/ (+ m n) -2)
-2
Outputs
(/ (cos M) (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (fabs.f64 (-.f64 m n))))))
(cos M)
(cos.f64 M)
M
(exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n)))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (fabs.f64 (-.f64 m n)))))
(+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))
(+.f64 l (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (fabs.f64 (-.f64 m n))))
(* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M))
(*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))
(- (/ (+ m n) 2) M)
(-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)
(/ (+ m n) 2)
(/.f64 (+.f64 m n) #s(literal 2 binary64))
(+ m n)
(+.f64 m n)
m
n
2
#s(literal 2 binary64)
(- l (fabs (- m n)))
(-.f64 l (fabs.f64 (-.f64 m n)))
l
(fabs (- m n))
(fabs.f64 (-.f64 m n))
(- m n)
(-.f64 m n)
(/ (cos (+ M (/ (* K (+ m n)) -2))) (exp (+ (* M M) (- l (fabs (- m n))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))
(cos (+ M (/ (* K (+ m n)) -2)))
(cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(+ M (/ (* K (+ m n)) -2))
(+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))
M
(/ (* K (+ m n)) -2)
(/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))
(* K (+ m n))
(*.f64 (+.f64 m n) K)
K
(+ m n)
(+.f64 m n)
m
n
-2
#s(literal -2 binary64)
(exp (+ (* M M) (- l (fabs (- m n)))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))
(+ (* M M) (- l (fabs (- m n))))
(-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))
(* M M)
(*.f64 M M)
(- l (fabs (- m n)))
(-.f64 l (fabs.f64 (-.f64 m n)))
l
(fabs (- m n))
(fabs.f64 (-.f64 m n))
(- m n)
(-.f64 m n)
(/ (cos (+ M (* -1/2 (* n K)))) (exp (+ l (- (* (- (* 1/2 n) M) (- (* 1/2 n) M)) (fabs (- n m))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))))
(cos (+ M (* -1/2 (* n K))))
(cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))
(+ M (* -1/2 (* n K)))
(+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))
M
(* -1/2 (* n K))
(*.f64 n (*.f64 K #s(literal -1/2 binary64)))
-1/2
#s(literal -1/2 binary64)
(* n K)
(*.f64 n K)
n
K
(exp (+ l (- (* (- (* 1/2 n) M) (- (* 1/2 n) M)) (fabs (- n m)))))
(exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))
(+ l (- (* (- (* 1/2 n) M) (- (* 1/2 n) M)) (fabs (- n m))))
(+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))
l
(- (* (- (* 1/2 n) M) (- (* 1/2 n) M)) (fabs (- n m)))
(-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n)))
(* (- (* 1/2 n) M) (- (* 1/2 n) M))
(*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))
(- (* 1/2 n) M)
(-.f64 (*.f64 n #s(literal 1/2 binary64)) M)
(* 1/2 n)
(*.f64 n #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
(fabs (- n m))
(fabs.f64 (-.f64 m n))
(- n m)
(-.f64 n m)
m
(/ 1 (/ (exp (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M)))) (cos (+ M (* K (/ (+ m n) -2))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (fabs.f64 (-.f64 m n))))))
1
#s(literal 1 binary64)
(/ (exp (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M)))) (cos (+ M (* K (/ (+ m n) -2)))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(exp (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (fabs.f64 (-.f64 m n)))))
(+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M)))
(+.f64 l (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (fabs.f64 (-.f64 m n))))
(- l (fabs (- m n)))
(-.f64 l (fabs.f64 (-.f64 m n)))
l
(fabs (- m n))
(fabs.f64 (-.f64 m n))
(- m n)
(-.f64 m n)
m
n
(* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M))
(*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))
(+ (/ (+ m n) -2) M)
(+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))
(/ (+ m n) -2)
(/.f64 (+.f64 m n) #s(literal -2 binary64))
(+ m n)
(+.f64 m n)
-2
#s(literal -2 binary64)
M
(cos (+ M (* K (/ (+ m n) -2))))
(cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(+ M (* K (/ (+ m n) -2)))
(+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))
(* K (/ (+ m n) -2))
(/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))
K
(* (cos (- (/ (* K (+ m n)) 2) M)) (pow (exp -1) (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M)))))
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal 2 binary64)) M)) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 (fabs.f64 (-.f64 m n)) l))))
(cos (- (/ (* K (+ m n)) 2) M))
(cos.f64 (-.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal 2 binary64)) M))
(- (/ (* K (+ m n)) 2) M)
(-.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal 2 binary64)) M)
(/ (* K (+ m n)) 2)
(/.f64 (*.f64 (+.f64 m n) K) #s(literal 2 binary64))
(* K (+ m n))
(*.f64 (+.f64 m n) K)
K
(+ m n)
(+.f64 m n)
m
n
2
#s(literal 2 binary64)
M
(pow (exp -1) (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M))))
(exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 (fabs.f64 (-.f64 m n)) l)))
(exp -1)
(exp.f64 #s(literal -1 binary64))
-1
#s(literal -1 binary64)
(+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M)))
(+.f64 l (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (fabs.f64 (-.f64 m n))))
(- l (fabs (- m n)))
(-.f64 l (fabs.f64 (-.f64 m n)))
l
(fabs (- m n))
(fabs.f64 (-.f64 m n))
(- m n)
(-.f64 m n)
(* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M))
(*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))
(+ (/ (+ m n) -2) M)
(+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))
(/ (+ m n) -2)
(/.f64 (+.f64 m n) #s(literal -2 binary64))
-2
#s(literal -2 binary64)

localize2.0s (11.1%)

Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
✓accuracy100.0%
(+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))
✓accuracy100.0%
(*.f64 K (+.f64 m n))
✓accuracy100.0%
(*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))
✓accuracy71.3%
(cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M))
✓accuracy100.0%
(*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))
✓accuracy100.0%
(exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))))
✓accuracy100.0%
(*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M))
✓accuracy71.3%
(cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))
✓accuracy100.0%
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
✓accuracy100.0%
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))
✓accuracy100.0%
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M))
✓accuracy77.9%
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
✓accuracy100.0%
(+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))
✓accuracy100.0%
(*.f64 K (+.f64 m n))
✓accuracy100.0%
(exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n)))))
✓accuracy71.3%
(cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64))))
✓accuracy100.0%
(cos.f64 M)
✓accuracy100.0%
(+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))
✓accuracy100.0%
(exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))
✓accuracy100.0%
(*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))
Results
1.0s107×5exit
438.0ms119×1valid
21.0ms19×0valid
19.0ms10×0unsamplable
2.0ms1×1unsamplable
Compiler

Compiled 721 to 60 computations (91.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 559.0ms
backward-pass: 184.0ms (32.9% of total)
ival-cos: 76.0ms (13.6% of total)
ival-pow: 68.0ms (12.2% of total)
ival-div: 63.0ms (11.3% of total)
ival-mult: 61.0ms (10.9% of total)
ival-sub: 36.0ms (6.4% of total)
ival-add: 36.0ms (6.4% of total)
ival-exp: 27.0ms (4.8% of total)
ival-fabs: 5.0ms (0.9% of total)
const: 2.0ms (0.4% of total)

series352.0ms (2%)

Counts
28 → 1236
Calls
Call 1
Inputs
#<alt (/ (cos M) (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))))>
#<alt (cos M)>
#<alt (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n)))))>
#<alt (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))>
#<alt (/ (cos (+ M (/ (* K (+ m n)) -2))) (exp (+ (* M M) (- l (fabs (- m n))))))>
#<alt (cos (+ M (/ (* K (+ m n)) -2)))>
#<alt (+ M (/ (* K (+ m n)) -2))>
#<alt (/ (* K (+ m n)) -2)>
#<alt (/ (cos (+ M (* -1/2 (* n K)))) (exp (+ l (- (* (- (* 1/2 n) M) (- (* 1/2 n) M)) (fabs (- n m))))))>
#<alt (cos (+ M (* -1/2 (* n K))))>
#<alt (+ M (* -1/2 (* n K)))>
#<alt (* -1/2 (* n K))>
#<alt (/ 1 (/ (exp (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M)))) (cos (+ M (* K (/ (+ m n) -2))))))>
#<alt (/ (exp (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M)))) (cos (+ M (* K (/ (+ m n) -2)))))>
#<alt (exp (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M))))>
#<alt (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M)))>
#<alt (pow (exp -1) (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M))))>
#<alt (* (cos (- (/ (* K (+ m n)) 2) M)) (pow (exp -1) (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M)))))>
#<alt (cos (- (/ (* K (+ m n)) 2) M))>
#<alt (- (/ (* K (+ m n)) 2) M)>
#<alt (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M))>
#<alt (exp (+ (* M M) (- l (fabs (- m n)))))>
#<alt (* K (+ m n))>
#<alt (* (- (* 1/2 n) M) (- (* 1/2 n) M))>
#<alt (exp (+ l (- (* (- (* 1/2 n) M) (- (* 1/2 n) M)) (fabs (- n m)))))>
#<alt (cos (+ M (* K (/ (+ m n) -2))))>
#<alt (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M))>
#<alt (* K (/ (+ m n) -2))>
Outputs
#<alt (/ 1 (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))>
#<alt (+ (/ 1 (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (/ (* M (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))>
#<alt (+ (* M (- (* -1 (* M (+ (* -1 (/ (pow (+ m n) 2) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* 1/2 (/ (pow (+ m n) 2) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* 3/2 (/ 1 (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))))) (* -1 (/ (+ m n) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ 1 (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))>
#<alt (+ (* M (- (* M (- (* -1 (* M (+ (* -1 (/ (+ m n) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1/6 (/ (pow (+ m n) 3) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* (+ m n) (+ (* -1 (/ (pow (+ m n) 2) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* 1/2 (/ (pow (+ m n) 2) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* 3/2 (/ 1 (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (+ 1 (* 1/2 (pow (+ m n) 2))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))))) (+ (* -1 (/ (pow (+ m n) 2) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* 1/2 (/ (pow (+ m n) 2) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* 3/2 (/ 1 (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))))) (* -1 (/ (+ m n) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ 1 (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))>
#<alt (+ (* -1 (/ (* m (* (cos M) (- (* 1/2 n) M))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))>
#<alt (+ (* m (- (* -1 (* m (+ (* -1 (/ (* (cos M) (pow (- (* 1/2 n) M) 2)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))) (/ (* (cos M) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))>
#<alt (+ (* m (- (* m (- (* -1 (* m (+ (* -1 (* (+ (* -1 (/ (* (cos M) (pow (- (* 1/2 n) M) 2)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (- (* 1/2 n) M))) (+ (* -1 (/ (* (cos M) (* (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))) (- (* 1/2 n) M))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ (* 1/6 (pow (- (* 1/2 n) M) 3)) (* 1/4 (- (* 1/2 n) M)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))))) (+ (* -1 (/ (* (cos M) (pow (- (* 1/2 n) M) 2)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))) (/ (* (cos M) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))>
#<alt (+ (* -1 (/ (* n (* (cos M) (- (* 1/2 m) M))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))>
#<alt (+ (* n (- (* -1 (* n (+ (* -1 (/ (* (cos M) (pow (- (* 1/2 m) M) 2)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))) (/ (* (cos M) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))>
#<alt (+ (* n (- (* n (- (* -1 (* n (+ (* -1 (* (+ (* -1 (/ (* (cos M) (pow (- (* 1/2 m) M) 2)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (- (* 1/2 m) M))) (+ (* -1 (/ (* (cos M) (* (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))) (- (* 1/2 m) M))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ (* 1/6 (pow (- (* 1/2 m) M) 3)) (* 1/4 (- (* 1/2 m) M)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))))) (+ (* -1 (/ (* (cos M) (pow (- (* 1/2 m) M) 2)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))) (/ (* (cos M) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))>
#<alt (+ (* -1 (/ (* l (cos M)) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))>
#<alt (+ (* l (- (* -1 (* l (+ (* -1 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))) (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))>
#<alt (+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))) (+ (* -1/2 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/6 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))))) (+ (* -1 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))) (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt 1>
#<alt (+ 1 (* -1/2 (pow M 2)))>
#<alt (+ 1 (* (pow M 2) (- (* 1/24 (pow M 2)) 1/2)))>
#<alt (+ 1 (* (pow M 2) (- (* (pow M 2) (+ 1/24 (* -1/720 (pow M 2)))) 1/2)))>
#<alt (cos M)>
#<alt (cos M)>
#<alt (cos M)>
#<alt (cos M)>
#<alt (cos M)>
#<alt (cos M)>
#<alt (cos M)>
#<alt (cos M)>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))>
#<alt (+ (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (* m (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (- (* 1/2 n) M))))>
#<alt (+ (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (* m (+ (* m (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))))) (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (- (* 1/2 n) M)))))>
#<alt (+ (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (* m (+ (* m (+ (* m (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (+ (* 1/6 (pow (- (* 1/2 n) M) 3)) (* 1/4 (- (* 1/2 n) M))))) (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))))) (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (- (* 1/2 n) M)))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))>
#<alt (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))>
#<alt (+ (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (* n (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (- (* 1/2 m) M))))>
#<alt (+ (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (* n (+ (* n (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))))) (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (- (* 1/2 m) M)))))>
#<alt (+ (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (* n (+ (* n (+ (* n (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (+ (* 1/6 (pow (- (* 1/2 m) M) 3)) (* 1/4 (- (* 1/2 m) M))))) (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))))) (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (- (* 1/2 m) M)))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))>
#<alt (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))>
#<alt (+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* -1 (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)))))>
#<alt (+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* M (+ (* -1 (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n))) (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2))))))))>
#<alt (+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* M (+ (* -1 (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n))) (* M (+ (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ (* -1 (+ m n)) (* -1/6 (pow (+ m n) 3))))) (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))))))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))>
#<alt (+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))>
#<alt (+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* 1/2 (* l (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))))>
#<alt (+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (+ (* 1/6 (* l (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))>
#<alt (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))>
#<alt (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))>
#<alt (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))>
#<alt (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))>
#<alt (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))>
#<alt (- (+ l (+ (* m (- (* 1/2 n) M)) (pow (- (* 1/2 n) M) 2))) (fabs (- m n)))>
#<alt (- (+ l (+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))) (fabs (- m n)))>
#<alt (- (+ l (+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))) (fabs (- m n)))>
#<alt (* 1/4 (pow m 2))>
#<alt (* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))>
#<alt (* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (+ (/ l (pow m 2)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2))))) (+ (/ M m) (/ (fabs (- m n)) (pow m 2)))))>
#<alt (* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (+ (/ l (pow m 2)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2))))) (+ (/ M m) (/ (fabs (- m n)) (pow m 2)))))>
#<alt (* 1/4 (pow m 2))>
#<alt (* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))>
#<alt (* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (neg (+ n (* -1 m))))) m))) m))))>
#<alt (* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (neg (+ n (* -1 m))))) m))) m))))>
#<alt (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))>
#<alt (- (+ l (+ (* n (- (* 1/2 m) M)) (pow (- (* 1/2 m) M) 2))) (fabs (- m n)))>
#<alt (- (+ l (+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))) (fabs (- m n)))>
#<alt (- (+ l (+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))) (fabs (- m n)))>
#<alt (* 1/4 (pow n 2))>
#<alt (* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))>
#<alt (* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (+ (/ l (pow n 2)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2))))) (+ (/ M n) (/ (fabs (- m n)) (pow n 2)))))>
#<alt (* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (+ (/ l (pow n 2)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2))))) (+ (/ M n) (/ (fabs (- m n)) (pow n 2)))))>
#<alt (* 1/4 (pow n 2))>
#<alt (* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (+ m (* -1 n)))) n))) n))))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (+ m (* -1 n)))) n))) n))))>
#<alt (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))>
#<alt (- (+ l (+ (* -1 (* M (+ m n))) (* 1/4 (pow (+ m n) 2)))) (fabs (- m n)))>
#<alt (- (+ l (+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))) (fabs (- m n)))>
#<alt (- (+ l (+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))) (fabs (- m n)))>
#<alt (pow M 2)>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))>
#<alt (* (pow M 2) (- (+ 1 (+ (* -1 (/ (+ m n) M)) (+ (* 1/4 (/ (pow (+ m n) 2) (pow M 2))) (/ l (pow M 2))))) (/ (fabs (- m n)) (pow M 2))))>
#<alt (* (pow M 2) (- (+ 1 (+ (* -1 (/ (+ m n) M)) (+ (* 1/4 (/ (pow (+ m n) 2) (pow M 2))) (/ l (pow M 2))))) (/ (fabs (- m n)) (pow M 2))))>
#<alt (pow M 2)>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1 (/ (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))) M)))) M))))>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1 (/ (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))) M)))) M))))>
#<alt (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))>
#<alt (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))>
#<alt (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))>
#<alt (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))>
#<alt l>
#<alt (* l (- (+ 1 (/ (pow (- (* 1/2 (+ m n)) M) 2) l)) (/ (fabs (- m n)) l)))>
#<alt (* l (- (+ 1 (/ (pow (- (* 1/2 (+ m n)) M) 2) l)) (/ (fabs (- m n)) l)))>
#<alt (* l (- (+ 1 (/ (pow (- (* 1/2 (+ m n)) M) 2) l)) (/ (fabs (- m n)) l)))>
#<alt l>
#<alt (* -1 (* l (- (* -1 (/ (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))) l)) 1)))>
#<alt (* -1 (* l (- (* -1 (/ (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))) l)) 1)))>
#<alt (* -1 (* l (- (* -1 (/ (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))) l)) 1)))>
#<alt (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n)))))>
#<alt (+ (* -1 (/ (* M (sin (* -1/2 (* K (+ m n))))) (exp (- l (fabs (- m n)))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n))))))>
#<alt (+ (* M (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n)))))) (* M (- (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n)))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n))))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n))))))>
#<alt (+ (* M (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n)))))) (* M (- (+ (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n)))))) (* M (- (* 1/6 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n)))))) (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n))))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n))))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (+ (* 1/2 (/ (* K (* (sin M) (+ m n))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n))))))>
#<alt (+ (* K (+ (* -1/8 (/ (* K (* (cos M) (pow (+ m n) 2))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* 1/2 (/ (* (sin M) (+ m n)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n))))))>
#<alt (+ (* K (+ (* 1/2 (/ (* (sin M) (+ m n)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* K (+ (* -1/8 (/ (* (cos M) (pow (+ m n) 2)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* -1/48 (/ (* K (* (sin M) (pow (+ m n) 3))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))>
#<alt (+ (* m (+ (* -1/8 (/ (* (pow K 2) (* m (cos (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))>
#<alt (+ (* m (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* m (+ (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* -1/48 (/ (* (pow K 3) (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (+ (* 1/2 (/ (* K (* n (sin (+ M (* -1/2 (* K m)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))>
#<alt (+ (* n (+ (* -1/8 (/ (* (pow K 2) (* n (cos (+ M (* -1/2 (* K m)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))>
#<alt (+ (* n (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* n (+ (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* -1/48 (/ (* (pow K 3) (* n (sin (+ M (* -1/2 (* K m)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n)))))>
#<alt (+ (* -1 (/ (* l (cos (+ M (* -1/2 (* K (+ m n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n))))))>
#<alt (+ (* l (- (* -1 (* l (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n))))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n))))))>
#<alt (+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n)))))))) (+ (* -1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n)))))) (* 1/6 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n)))))))))) (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n))))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (cos (* -1/2 (* K (+ m n))))>
#<alt (+ (cos (* -1/2 (* K (+ m n)))) (* -1 (* M (sin (* -1/2 (* K (+ m n)))))))>
#<alt (+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K (+ m n)))))) (sin (* -1/2 (* K (+ m n)))))))>
#<alt (+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* 1/6 (* M (sin (* -1/2 (* K (+ m n)))))))) (sin (* -1/2 (* K (+ m n)))))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (- (* -1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos M)>
#<alt (+ (cos M) (* 1/2 (* K (* (sin M) (+ m n)))))>
#<alt (+ (cos M) (* K (- (* -1/8 (* K (* (cos M) (pow (+ m n) 2)))) (* -1/2 (* (sin M) (+ m n))))))>
#<alt (+ (cos M) (* K (- (* K (+ (* -1/8 (* (cos M) (pow (+ m n) 2))) (* -1/48 (* K (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n))))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* -1/8 (* (pow K 2) (* m (cos (+ M (* -1/2 (* K n))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/48 (* (pow K 3) (* m (sin (+ M (* -1/2 (* K n))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* -1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* -1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* -1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* -1/2 (* K m))))>
#<alt (+ (cos (+ M (* -1/2 (* K m)))) (* 1/2 (* K (* n (sin (+ M (* -1/2 (* K m))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* -1/8 (* (pow K 2) (* n (cos (+ M (* -1/2 (* K m))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/48 (* (pow K 3) (* n (sin (+ M (* -1/2 (* K m))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (- m (* -1 n))))))>
#<alt (cos (+ M (* -1/2 (* K (- m (* -1 n))))))>
#<alt (cos (+ M (* -1/2 (* K (- m (* -1 n))))))>
#<alt (cos (+ M (* -1/2 (* K (- m (* -1 n))))))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (+ M (* -1/2 (* K (+ m n))))>
#<alt (+ M (* -1/2 (* K (+ m n))))>
#<alt (+ M (* -1/2 (* K (+ m n))))>
#<alt M>
#<alt (* M (+ 1 (* -1/2 (/ (* K (+ m n)) M))))>
#<alt (* M (+ 1 (* -1/2 (/ (* K (+ m n)) M))))>
#<alt (* M (+ 1 (* -1/2 (/ (* K (+ m n)) M))))>
#<alt M>
#<alt (* -1 (* M (- (* 1/2 (/ (* K (+ m n)) M)) 1)))>
#<alt (* -1 (* M (- (* 1/2 (/ (* K (+ m n)) M)) 1)))>
#<alt (* -1 (* M (- (* 1/2 (/ (* K (+ m n)) M)) 1)))>
#<alt M>
#<alt (+ M (* -1/2 (* K (+ m n))))>
#<alt (+ M (* -1/2 (* K (+ m n))))>
#<alt (+ M (* -1/2 (* K (+ m n))))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* K (+ (* -1/2 (+ m n)) (/ M K)))>
#<alt (* K (+ (* -1/2 (+ m n)) (/ M K)))>
#<alt (* K (+ (* -1/2 (+ m n)) (/ M K)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1 (* K (+ (* -1 (/ M K)) (* 1/2 (+ m n)))))>
#<alt (* -1 (* K (+ (* -1 (/ M K)) (* 1/2 (+ m n)))))>
#<alt (* -1 (* K (+ (* -1 (/ M K)) (* 1/2 (+ m n)))))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))>
#<alt (+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))>
#<alt (+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))>
#<alt (* -1/2 (* K m))>
#<alt (* m (+ (* -1/2 K) (+ (* -1/2 (/ (* K n) m)) (/ M m))))>
#<alt (* m (+ (* -1/2 K) (+ (* -1/2 (/ (* K n) m)) (/ M m))))>
#<alt (* m (+ (* -1/2 K) (+ (* -1/2 (/ (* K n) m)) (/ M m))))>
#<alt (* -1/2 (* K m))>
#<alt (* -1 (* m (+ (* -1 (/ (+ M (* -1/2 (* K n))) m)) (* 1/2 K))))>
#<alt (* -1 (* m (+ (* -1 (/ (+ M (* -1/2 (* K n))) m)) (* 1/2 K))))>
#<alt (* -1 (* m (+ (* -1 (/ (+ M (* -1/2 (* K n))) m)) (* 1/2 K))))>
#<alt (+ M (* -1/2 (* K m)))>
#<alt (+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))>
#<alt (+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))>
#<alt (+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))>
#<alt (* -1/2 (* K n))>
#<alt (* n (+ (* -1/2 K) (+ (* -1/2 (/ (* K m) n)) (/ M n))))>
#<alt (* n (+ (* -1/2 K) (+ (* -1/2 (/ (* K m) n)) (/ M n))))>
#<alt (* n (+ (* -1/2 K) (+ (* -1/2 (/ (* K m) n)) (/ M n))))>
#<alt (* -1/2 (* K n))>
#<alt (* -1 (* n (+ (* -1 (/ (+ M (* -1/2 (* K m))) n)) (* 1/2 K))))>
#<alt (* -1 (* n (+ (* -1 (/ (+ M (* -1/2 (* K m))) n)) (* 1/2 K))))>
#<alt (* -1 (* n (+ (* -1 (/ (+ M (* -1/2 (* K m))) n)) (* 1/2 K))))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K n))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (* -1/2 (* K m))>
#<alt (* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))>
#<alt (* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))>
#<alt (* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))>
#<alt (* -1/2 (* K m))>
#<alt (* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))>
#<alt (* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))>
#<alt (* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))>
#<alt (* -1/2 (* K m))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (* -1/2 (* K n))>
#<alt (* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))>
#<alt (* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))>
#<alt (* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))>
#<alt (* -1/2 (* K n))>
#<alt (* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))>
#<alt (* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))>
#<alt (* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (+ (* M (- (* -1 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* -1 (/ (* n (cos (* -1/2 (* K n)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))) (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))>
#<alt (+ (* M (- (+ (* -1 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* M (- (* -1/2 (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (+ (* -1 (* n (- (* -1 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* -1 (/ (* n (cos (* -1/2 (* K n)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (/ (* (cos (* -1/2 (* K n))) (+ 1 (* 1/2 (pow n 2)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (* -1 (/ (* n (cos (* -1/2 (* K n)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))) (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))>
#<alt (+ (* M (- (+ (* -1 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* M (- (+ (* -1/2 (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* M (- (* 1/6 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (+ (* -1 (* n (- (* -1/2 (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (+ (* -1 (* n (- (* -1 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* -1 (/ (* n (cos (* -1/2 (* K n)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (/ (* (cos (* -1/2 (* K n))) (+ 1 (* 1/2 (pow n 2)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (+ (* (+ 1 (* 1/2 (pow n 2))) (- (* -1 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* -1 (/ (* n (cos (* -1/2 (* K n)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))) (/ (* (cos (* -1/2 (* K n))) (+ (* -1 n) (* -1/6 (pow n 3)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))))) (+ (* -1 (* n (- (* -1 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* -1 (/ (* n (cos (* -1/2 (* K n)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (/ (* (cos (* -1/2 (* K n))) (+ 1 (* 1/2 (pow n 2)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (* -1 (/ (* n (cos (* -1/2 (* K n)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))) (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (- (* -1/2 (* K n)) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m)))))>
#<alt (/ (cos (- (* -1/2 (* K n)) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m)))))>
#<alt (/ (cos (- (* -1/2 (* K n)) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m)))))>
#<alt (/ (cos (- (* -1/2 (* K n)) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m)))))>
#<alt (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- n m)))))>
#<alt (+ (* n (- (* 1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* -1 (/ (* M (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- n m))))))>
#<alt (+ (* n (- (+ (* 1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* n (- (* -1/8 (/ (* (pow K 2) (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (+ (* -1 (* M (- (* 1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* -1 (/ (* M (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m))))))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow M 2)))) (exp (- (+ l (pow M 2)) (fabs (- n m))))))))) (* -1 (/ (* M (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- n m))))))>
#<alt (+ (* n (- (+ (* 1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* n (- (+ (* -1/8 (/ (* (pow K 2) (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* n (- (* -1/48 (/ (* (pow K 3) (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (+ (* -1 (* M (- (* -1/8 (/ (* (pow K 2) (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (+ (* -1 (* M (- (* 1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* -1 (/ (* M (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m))))))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow M 2)))) (exp (- (+ l (pow M 2)) (fabs (- n m))))))))) (+ (* (+ 1/4 (* 1/2 (pow M 2))) (- (* 1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* -1 (/ (* M (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))))) (/ (* (cos M) (+ (* -1/4 M) (* -1/6 (pow M 3)))) (exp (- (+ l (pow M 2)) (fabs (- n m)))))))))) (+ (* -1 (* M (- (* 1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* -1 (/ (* M (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m))))))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow M 2)))) (exp (- (+ l (pow M 2)) (fabs (- n m))))))))) (* -1 (/ (* M (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- n m))))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n)))))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n)))))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n)))))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n)))))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (+ (* 1/2 (/ (* K (* n (sin M))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))))>
#<alt (+ (* K (+ (* -1/8 (/ (* K (* (pow n 2) (cos M))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))) (* 1/2 (/ (* n (sin M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))))>
#<alt (+ (* K (+ (* 1/2 (/ (* n (sin M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))) (* K (+ (* -1/8 (/ (* (pow n 2) (cos M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))) (* -1/48 (/ (* K (* (pow n 3) (sin M))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))>
#<alt (+ (* -1 (/ (* l (cos (+ M (* -1/2 (* K n))))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))>
#<alt (+ (* l (- (* -1 (* l (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))>
#<alt (+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))))) (+ (* -1/2 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))) (* 1/6 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))))))) (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m))))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m))))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m))))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m))))))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (+ (cos (* -1/2 (* K n))) (* -1 (* M (sin (* -1/2 (* K n))))))>
#<alt (+ (cos (* -1/2 (* K n))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K n))))) (sin (* -1/2 (* K n))))))>
#<alt (+ (cos (* -1/2 (* K n))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K n)))) (* 1/6 (* M (sin (* -1/2 (* K n))))))) (sin (* -1/2 (* K n))))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (- (* -1/2 (* K n)) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K n)) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K n)) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K n)) (* -1 M)))>
#<alt (cos M)>
#<alt (+ (cos M) (* 1/2 (* K (* n (sin M)))))>
#<alt (+ (cos M) (* n (- (* -1/8 (* (pow K 2) (* n (cos M)))) (* -1/2 (* K (sin M))))))>
#<alt (+ (cos M) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos M))) (* -1/48 (* (pow K 3) (* n (sin M)))))) (* -1/2 (* K (sin M))))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos M)>
#<alt (+ (cos M) (* 1/2 (* K (* n (sin M)))))>
#<alt (+ (cos M) (* K (- (* -1/8 (* K (* (pow n 2) (cos M)))) (* -1/2 (* n (sin M))))))>
#<alt (+ (cos M) (* K (- (* K (+ (* -1/8 (* (pow n 2) (cos M))) (* -1/48 (* K (* (pow n 3) (sin M)))))) (* -1/2 (* n (sin M))))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (* -1/2 (* K n))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt M>
#<alt (* M (+ 1 (* -1/2 (/ (* K n) M))))>
#<alt (* M (+ 1 (* -1/2 (/ (* K n) M))))>
#<alt (* M (+ 1 (* -1/2 (/ (* K n) M))))>
#<alt M>
#<alt (* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))>
#<alt (* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))>
#<alt (* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))>
#<alt M>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (* -1/2 (* K n))>
#<alt (* n (+ (* -1/2 K) (/ M n)))>
#<alt (* n (+ (* -1/2 K) (/ M n)))>
#<alt (* n (+ (* -1/2 K) (/ M n)))>
#<alt (* -1/2 (* K n))>
#<alt (* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))>
#<alt (* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))>
#<alt (* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))>
#<alt M>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (* -1/2 (* K n))>
#<alt (* K (+ (* -1/2 n) (/ M K)))>
#<alt (* K (+ (* -1/2 n) (/ M K)))>
#<alt (* K (+ (* -1/2 n) (/ M K)))>
#<alt (* -1/2 (* K n))>
#<alt (* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))>
#<alt (* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))>
#<alt (* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))>
#<alt (+ (* -1 (/ (* l (cos (+ M (* -1/2 (* K (+ m n)))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))>
#<alt (+ (* l (- (* -1 (* l (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))>
#<alt (+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))) (+ (* -1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (* 1/6 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))))) (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))>
#<alt (+ (* m (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K n)))) (+ M (* -1/2 n))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))>
#<alt (+ (* m (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* m (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (+ (* -1 (* (+ M (* -1/2 n)) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K n)))) (+ M (* -1/2 n))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K n)))) (+ M (* -1/2 n))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))>
#<alt (+ (* m (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* m (- (+ (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* m (- (* -1/48 (/ (* (pow K 3) (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (+ (* -1 (* (+ M (* -1/2 n)) (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (+ (* -1 (* (+ M (* -1/2 n)) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K n)))) (+ M (* -1/2 n))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))))) (+ (* (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2))) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K n)))) (+ M (* -1/2 n))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ (* -1/4 (+ M (* -1/2 n))) (* -1/6 (pow (+ M (* -1/2 n)) 3)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))))) (+ (* -1 (* (+ M (* -1/2 n)) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K n)))) (+ M (* -1/2 n))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K n)))) (+ M (* -1/2 n))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))>
#<alt (+ (* n (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K m)))) (+ M (* -1/2 m))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))>
#<alt (+ (* n (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* n (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (+ (* -1 (* (+ M (* -1/2 m)) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K m)))) (+ M (* -1/2 m))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K m)))) (+ M (* -1/2 m))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))>
#<alt (+ (* n (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* n (- (+ (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* n (- (* -1/48 (/ (* (pow K 3) (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (+ (* -1 (* (+ M (* -1/2 m)) (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (+ (* -1 (* (+ M (* -1/2 m)) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K m)))) (+ M (* -1/2 m))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))))) (+ (* (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2))) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K m)))) (+ M (* -1/2 m))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ (* -1/4 (+ M (* -1/2 m))) (* -1/6 (pow (+ M (* -1/2 m)) 3)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))))) (+ (* -1 (* (+ M (* -1/2 m)) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K m)))) (+ M (* -1/2 m))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K m)))) (+ M (* -1/2 m))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))>
#<alt (+ (* M (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))>
#<alt (+ (* M (- (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1 (* (+ m n) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))>
#<alt (+ (* M (- (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (+ (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (* 1/6 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1 (* (+ m n) (- (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1 (* (+ m n) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (+ (* (+ 1 (* 1/2 (pow (+ m n) 2))) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ (* -1 (+ m n)) (* -1/6 (pow (+ m n) 3)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))))) (+ (* -1 (* (+ m n) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))>
#<alt (/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))>
#<alt (/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))>
#<alt (/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (+ (* 1/2 (/ (* K (* (sin M) (+ m n))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))) (/ (cos M) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (+ (* K (+ (* -1/8 (/ (* K (* (cos M) (pow (+ m n) 2))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))) (* 1/2 (/ (* (sin M) (+ m n)) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (+ (* K (+ (* 1/2 (/ (* (sin M) (+ m n)) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))) (* K (+ (* -1/8 (/ (* (cos M) (pow (+ m n) 2)) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))) (* -1/48 (/ (* K (* (sin M) (pow (+ m n) 3))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))))))) (/ (cos M) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (+ (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n)))))) (/ (* l (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))) (cos (+ M (* -1/2 (* K (+ m n)))))))>
#<alt (+ (* l (+ (* 1/2 (/ (* l (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))) (cos (+ M (* -1/2 (* K (+ m n))))))) (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n)))))))) (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n)))))))>
#<alt (+ (* l (+ (* l (+ (* 1/6 (/ (* l (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))) (cos (+ M (* -1/2 (* K (+ m n))))))) (* 1/2 (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))))) (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n)))))))) (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n)))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K n)))))>
#<alt (+ (* m (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K n))))))>
#<alt (+ (* m (- (+ (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))) (cos (+ M (* -1/2 (* K n)))))) (* m (- (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2)))) (cos (+ M (* -1/2 (* K n))))) (+ (* -1/8 (/ (* (pow K 2) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K n)))) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2)))))) (cos (+ M (* -1/2 (* K n)))))))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K n))))))>
#<alt (+ (* m (- (+ (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))) (cos (+ M (* -1/2 (* K n)))))) (* m (- (+ (* m (- (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ (* -1/4 (+ M (* -1/2 n))) (* -1/6 (pow (+ M (* -1/2 n)) 3)))) (cos (+ M (* -1/2 (* K n))))) (+ (* -1/8 (* (pow K 2) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2)))))) (+ (* -1/48 (/ (* (pow K 3) (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K n)))) (- (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2)))) (cos (+ M (* -1/2 (* K n))))) (+ (* -1/8 (/ (* (pow K 2) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K n)))) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2)))))) (cos (+ M (* -1/2 (* K n)))))))))) (cos (+ M (* -1/2 (* K n)))))))))) (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2)))) (cos (+ M (* -1/2 (* K n)))))) (+ (* -1/8 (/ (* (pow K 2) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K n)))) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2)))))) (cos (+ M (* -1/2 (* K n)))))))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K m)))))>
#<alt (+ (* n (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K m))))))>
#<alt (+ (* n (- (+ (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))) (cos (+ M (* -1/2 (* K m)))))) (* n (- (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2)))) (cos (+ M (* -1/2 (* K m))))) (+ (* -1/8 (/ (* (pow K 2) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K m)))) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2)))))) (cos (+ M (* -1/2 (* K m)))))))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K m))))))>
#<alt (+ (* n (- (+ (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))) (cos (+ M (* -1/2 (* K m)))))) (* n (- (+ (* n (- (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ (* -1/4 (+ M (* -1/2 m))) (* -1/6 (pow (+ M (* -1/2 m)) 3)))) (cos (+ M (* -1/2 (* K m))))) (+ (* -1/8 (* (pow K 2) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2)))))) (+ (* -1/48 (/ (* (pow K 3) (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K m)))) (- (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2)))) (cos (+ M (* -1/2 (* K m))))) (+ (* -1/8 (/ (* (pow K 2) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K m)))) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2)))))) (cos (+ M (* -1/2 (* K m)))))))))) (cos (+ M (* -1/2 (* K m)))))))))) (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2)))) (cos (+ M (* -1/2 (* K m)))))) (+ (* -1/8 (/ (* (pow K 2) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K m)))) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2)))))) (cos (+ M (* -1/2 (* K m)))))))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K m))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (cos (* -1/2 (* K (+ m n)))))>
#<alt (+ (* M (- (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)) (cos (* -1/2 (* K (+ m n)))))) (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (/ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (cos (* -1/2 (* K (+ m n))))))>
#<alt (+ (* M (- (+ (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)) (cos (* -1/2 (* K (+ m n)))))) (* M (- (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (cos (* -1/2 (* K (+ m n))))) (+ (* -1 (/ (* (sin (* -1/2 (* K (+ m n)))) (- (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)) (cos (* -1/2 (* K (+ m n)))))) (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (cos (* -1/2 (* K (+ m n)))))) (* -1/2 (/ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (cos (* -1/2 (* K (+ m n)))))))))) (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (/ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (cos (* -1/2 (* K (+ m n))))))>
#<alt (+ (* M (- (+ (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)) (cos (* -1/2 (* K (+ m n)))))) (* M (- (+ (* M (- (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ (* -1 (+ m n)) (* -1/6 (pow (+ m n) 3)))) (cos (* -1/2 (* K (+ m n))))) (+ (* -1 (/ (* (sin (* -1/2 (* K (+ m n)))) (- (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (cos (* -1/2 (* K (+ m n))))) (+ (* -1 (/ (* (sin (* -1/2 (* K (+ m n)))) (- (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)) (cos (* -1/2 (* K (+ m n)))))) (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (cos (* -1/2 (* K (+ m n)))))) (* -1/2 (/ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (cos (* -1/2 (* K (+ m n))))))))) (cos (* -1/2 (* K (+ m n)))))) (+ (* -1/2 (- (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)) (cos (* -1/2 (* K (+ m n)))))) (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (* 1/6 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))))) (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (cos (* -1/2 (* K (+ m n)))))) (+ (* -1 (/ (* (sin (* -1/2 (* K (+ m n)))) (- (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)) (cos (* -1/2 (* K (+ m n)))))) (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (cos (* -1/2 (* K (+ m n)))))) (* -1/2 (/ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (cos (* -1/2 (* K (+ m n)))))))))) (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (/ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (cos (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))>
#<alt (/ (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))>
#<alt (/ (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))>
#<alt (/ (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos M))>
#<alt (+ (* -1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (sin M) (+ m n)))) (pow (cos M) 2))) (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos M)))>
#<alt (+ (* K (- (* -1 (* K (+ (* -1/4 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (pow (sin M) 2) (pow (+ m n) 2))) (pow (cos M) 3))) (* -1/8 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (pow (+ m n) 2)) (cos M)))))) (* 1/2 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (sin M) (+ m n))) (pow (cos M) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos M)))>
#<alt (+ (* K (- (* K (- (* -1 (* K (+ (* -1/2 (/ (* (sin M) (* (+ m n) (+ (* -1/4 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (pow (sin M) 2) (pow (+ m n) 2))) (pow (cos M) 3))) (* -1/8 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (pow (+ m n) 2)) (cos M)))))) (cos M))) (+ (* -1/48 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (sin M) (pow (+ m n) 3))) (pow (cos M) 2))) (* 1/16 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (sin M) (pow (+ m n) 3))) (pow (cos M) 2))))))) (+ (* -1/4 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (pow (sin M) 2) (pow (+ m n) 2))) (pow (cos M) 3))) (* -1/8 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (pow (+ m n) 2)) (cos M)))))) (* 1/2 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (sin M) (+ m n))) (pow (cos M) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos M)))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))>
#<alt (+ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (* l (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))>
#<alt (+ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (* l (+ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (* 1/2 (* l (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))))>
#<alt (+ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (* l (+ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (* l (+ (* 1/6 (* l (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (* 1/2 (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))>
#<alt (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))>
#<alt (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))>
#<alt (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))>
#<alt (+ (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (* -1 (* m (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))))))>
#<alt (+ (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (* m (+ (* -1 (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n)))) (* m (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2))))))))>
#<alt (+ (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (* m (+ (* -1 (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n)))) (* m (+ (* m (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ (* -1/4 (+ M (* -1/2 n))) (* -1/6 (pow (+ M (* -1/2 n)) 3))))) (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2)))))))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))>
#<alt (+ (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (* -1 (* n (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))))))>
#<alt (+ (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (* n (+ (* -1 (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m)))) (* n (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2))))))))>
#<alt (+ (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (* n (+ (* -1 (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m)))) (* n (+ (* n (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ (* -1/4 (+ M (* -1/2 m))) (* -1/6 (pow (+ M (* -1/2 m)) 3))))) (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2)))))))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))>
#<alt (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))>
#<alt (+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* -1 (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)))))>
#<alt (+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* M (+ (* -1 (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n))) (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2))))))))>
#<alt (+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* M (+ (* -1 (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n))) (* M (+ (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ (* -1 (+ m n)) (* -1/6 (pow (+ m n) 3))))) (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))))))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))>
#<alt (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))>
#<alt (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))>
#<alt (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))>
#<alt (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))>
#<alt l>
#<alt (* l (- (+ 1 (/ (pow (+ M (* -1/2 (+ m n))) 2) l)) (/ (fabs (- m n)) l)))>
#<alt (* l (- (+ 1 (/ (pow (+ M (* -1/2 (+ m n))) 2) l)) (/ (fabs (- m n)) l)))>
#<alt (* l (- (+ 1 (/ (pow (+ M (* -1/2 (+ m n))) 2) l)) (/ (fabs (- m n)) l)))>
#<alt l>
#<alt (* -1 (* l (- (* -1 (/ (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))) l)) 1)))>
#<alt (* -1 (* l (- (* -1 (/ (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))) l)) 1)))>
#<alt (* -1 (* l (- (* -1 (/ (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))) l)) 1)))>
#<alt (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))>
#<alt (- (+ l (+ (* -1 (* m (+ M (* -1/2 n)))) (pow (+ M (* -1/2 n)) 2))) (fabs (- m n)))>
#<alt (- (+ l (+ (* m (+ (* -1 (+ M (* -1/2 n))) (* 1/4 m))) (pow (+ M (* -1/2 n)) 2))) (fabs (- m n)))>
#<alt (- (+ l (+ (* m (+ (* -1 (+ M (* -1/2 n))) (* 1/4 m))) (pow (+ M (* -1/2 n)) 2))) (fabs (- m n)))>
#<alt (* 1/4 (pow m 2))>
#<alt (* (pow m 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 n)) m))))>
#<alt (* (pow m 2) (- (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 n)) m)) (+ (/ l (pow m 2)) (/ (pow (+ M (* -1/2 n)) 2) (pow m 2))))) (/ (fabs (- m n)) (pow m 2))))>
#<alt (* (pow m 2) (- (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 n)) m)) (+ (/ l (pow m 2)) (/ (pow (+ M (* -1/2 n)) 2) (pow m 2))))) (/ (fabs (- m n)) (pow m 2))))>
#<alt (* 1/4 (pow m 2))>
#<alt (* (pow m 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 n)) m))))>
#<alt (* (pow m 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ n (* -1 m))))) m)) (* -1/2 n))) m))))>
#<alt (* (pow m 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ n (* -1 m))))) m)) (* -1/2 n))) m))))>
#<alt (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))>
#<alt (- (+ l (+ (* -1 (* n (+ M (* -1/2 m)))) (pow (+ M (* -1/2 m)) 2))) (fabs (- m n)))>
#<alt (- (+ l (+ (* n (+ (* -1 (+ M (* -1/2 m))) (* 1/4 n))) (pow (+ M (* -1/2 m)) 2))) (fabs (- m n)))>
#<alt (- (+ l (+ (* n (+ (* -1 (+ M (* -1/2 m))) (* 1/4 n))) (pow (+ M (* -1/2 m)) 2))) (fabs (- m n)))>
#<alt (* 1/4 (pow n 2))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 m)) n))))>
#<alt (* (pow n 2) (- (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 m)) n)) (+ (/ l (pow n 2)) (/ (pow (+ M (* -1/2 m)) 2) (pow n 2))))) (/ (fabs (- m n)) (pow n 2))))>
#<alt (* (pow n 2) (- (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 m)) n)) (+ (/ l (pow n 2)) (/ (pow (+ M (* -1/2 m)) 2) (pow n 2))))) (/ (fabs (- m n)) (pow n 2))))>
#<alt (* 1/4 (pow n 2))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 m)) n))))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (+ m (* -1 n)))) n)) (* -1/2 m))) n))))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (+ m (* -1 n)))) n)) (* -1/2 m))) n))))>
#<alt (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))>
#<alt (- (+ l (+ (* -1 (* M (+ m n))) (* 1/4 (pow (+ m n) 2)))) (fabs (- m n)))>
#<alt (- (+ l (+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))) (fabs (- m n)))>
#<alt (- (+ l (+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))) (fabs (- m n)))>
#<alt (pow M 2)>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))>
#<alt (* (pow M 2) (- (+ 1 (+ (* -1 (/ (+ m n) M)) (+ (* 1/4 (/ (pow (+ m n) 2) (pow M 2))) (/ l (pow M 2))))) (/ (fabs (- m n)) (pow M 2))))>
#<alt (* (pow M 2) (- (+ 1 (+ (* -1 (/ (+ m n) M)) (+ (* 1/4 (/ (pow (+ m n) 2) (pow M 2))) (/ l (pow M 2))))) (/ (fabs (- m n)) (pow M 2))))>
#<alt (pow M 2)>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1 (/ (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))) M)))) M))))>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1 (/ (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))) M)))) M))))>
#<alt (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))>
#<alt (+ (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))) (* -1 (* l (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))))>
#<alt (+ (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))) (* l (+ (* -1 (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (* 1/2 (* l (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))))))>
#<alt (+ (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))) (* l (+ (* -1 (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (* l (+ (* -1/6 (* l (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))) (* 1/2 (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))>
#<alt (+ (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (* m (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ M (* -1/2 n)))))>
#<alt (+ (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (* m (+ (* m (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 n)) 2)) 1/4))) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ M (* -1/2 n))))))>
#<alt (+ (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (* m (+ (* m (+ (* m (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ (* -1/4 (+ M (* -1/2 n))) (* 1/6 (pow (+ M (* -1/2 n)) 3))))) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 n)) 2)) 1/4)))) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ M (* -1/2 n))))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))>
#<alt (+ (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (* n (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ M (* -1/2 m)))))>
#<alt (+ (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (* n (+ (* n (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 m)) 2)) 1/4))) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ M (* -1/2 m))))))>
#<alt (+ (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (* n (+ (* n (+ (* n (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ (* -1/4 (+ M (* -1/2 m))) (* 1/6 (pow (+ M (* -1/2 m)) 3))))) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 m)) 2)) 1/4)))) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ M (* -1/2 m))))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))>
#<alt (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))>
#<alt (+ (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (* M (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ m n))))>
#<alt (+ (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (* M (+ (* M (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (- (* 1/2 (pow (+ m n) 2)) 1))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ m n)))))>
#<alt (+ (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (* M (+ (* M (+ (* M (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ (* -1 (+ m n)) (* 1/6 (pow (+ m n) 3))))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (- (* 1/2 (pow (+ m n) 2)) 1)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ m n)))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))>
#<alt (exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))>
#<alt (exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))>
#<alt (exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))>
#<alt (* (cos (neg M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))) (* (sin (neg M)) (+ m n))))) (* (cos (neg M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))))>
#<alt (+ (* K (+ (* -1/2 (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))) (* (sin (neg M)) (+ m n)))) (* -1/8 (* K (* (cos (neg M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))) (pow (+ m n) 2))))))) (* (cos (neg M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))))>
#<alt (+ (* K (+ (* -1/2 (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))) (* (sin (neg M)) (+ m n)))) (* K (+ (* -1/8 (* (cos (neg M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))) (pow (+ m n) 2)))) (* 1/48 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))) (* (sin (neg M)) (pow (+ m n) 3))))))))) (* (cos (neg M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K n)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))>
#<alt (+ (* m (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K n)) M))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ M (* -1/2 n)))))) (* (cos (- (* 1/2 (* K n)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))>
#<alt (+ (* m (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K n)) M))))) (+ (* m (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (* (sin (- (* 1/2 (* K n)) M)) (+ M (* -1/2 n)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K n)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 n)) 2)) 1/4)))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ M (* -1/2 n))))))) (* (cos (- (* 1/2 (* K n)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))>
#<alt (+ (* m (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K n)) M))))) (+ (* m (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (* (sin (- (* 1/2 (* K n)) M)) (+ M (* -1/2 n)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K n)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))) (+ (* m (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (* (sin (- (* 1/2 (* K n)) M)) (- (* 1/2 (pow (+ M (* -1/2 n)) 2)) 1/4))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ M (* -1/2 n)))))) (+ (* 1/48 (* (pow K 3) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K n)) M))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ (* -1/4 (+ M (* -1/2 n))) (* 1/6 (pow (+ M (* -1/2 n)) 3))))))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 n)) 2)) 1/4))))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ M (* -1/2 n))))))) (* (cos (- (* 1/2 (* K n)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))))>
#<alt (* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))))>
#<alt (* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))))>
#<alt (* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))))>
#<alt (* (cos (- (* 1/2 (* K m)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))>
#<alt (+ (* n (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K m)) M))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ M (* -1/2 m)))))) (* (cos (- (* 1/2 (* K m)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))>
#<alt (+ (* n (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K m)) M))))) (+ (* n (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (* (sin (- (* 1/2 (* K m)) M)) (+ M (* -1/2 m)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K m)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 m)) 2)) 1/4)))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ M (* -1/2 m))))))) (* (cos (- (* 1/2 (* K m)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))>
#<alt (+ (* n (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K m)) M))))) (+ (* n (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (* (sin (- (* 1/2 (* K m)) M)) (+ M (* -1/2 m)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K m)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))) (+ (* n (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (* (sin (- (* 1/2 (* K m)) M)) (- (* 1/2 (pow (+ M (* -1/2 m)) 2)) 1/4))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ M (* -1/2 m)))))) (+ (* 1/48 (* (pow K 3) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K m)) M))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ (* -1/4 (+ M (* -1/2 m))) (* 1/6 (pow (+ M (* -1/2 m)) 3))))))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 m)) 2)) 1/4))))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ M (* -1/2 m))))))) (* (cos (- (* 1/2 (* K m)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))))>
#<alt (* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))))>
#<alt (* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))))>
#<alt (* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))))>
#<alt (* (cos (* 1/2 (* K (+ m n)))) (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))>
#<alt (+ (* M (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ m n))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (sin (* 1/2 (* K (+ m n))))))) (* (cos (* 1/2 (* K (+ m n)))) (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))>
#<alt (+ (* M (+ (* M (+ (* -1/2 (* (cos (* 1/2 (* K (+ m n)))) (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (- (* 1/2 (pow (+ m n) 2)) 1))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (* (sin (* 1/2 (* K (+ m n)))) (+ m n)))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ m n))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (sin (* 1/2 (* K (+ m n)))))))) (* (cos (* 1/2 (* K (+ m n)))) (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))>
#<alt (+ (* M (+ (* M (+ (* -1/2 (* (cos (* 1/2 (* K (+ m n)))) (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))) (+ (* M (+ (* -1/2 (* (cos (* 1/2 (* K (+ m n)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ m n)))) (+ (* -1/6 (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (sin (* 1/2 (* K (+ m n)))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ (* -1 (+ m n)) (* 1/6 (pow (+ m n) 3))))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (* (sin (* 1/2 (* K (+ m n)))) (- (* 1/2 (pow (+ m n) 2)) 1))))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (- (* 1/2 (pow (+ m n) 2)) 1))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (* (sin (* 1/2 (* K (+ m n)))) (+ m n))))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ m n))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (sin (* 1/2 (* K (+ m n)))))))) (* (cos (* 1/2 (* K (+ m n)))) (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))))>
#<alt (* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))))>
#<alt (* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))))>
#<alt (* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))>
#<alt (+ (* -1 (* l (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))) (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))>
#<alt (+ (* l (+ (* -1 (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))) (* 1/2 (* l (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))))) (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))>
#<alt (+ (* l (+ (* -1 (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))) (* l (+ (* -1/6 (* l (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))) (* 1/2 (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))))))) (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))))>
#<alt (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))))>
#<alt (cos (neg M))>
#<alt (+ (cos (neg M)) (* -1/2 (* K (* (sin (neg M)) (+ m n)))))>
#<alt (+ (cos (neg M)) (* K (- (* -1/8 (* K (* (cos (neg M)) (pow (+ m n) 2)))) (* 1/2 (* (sin (neg M)) (+ m n))))))>
#<alt (+ (cos (neg M)) (* K (- (* K (+ (* -1/8 (* (cos (neg M)) (pow (+ m n) 2))) (* 1/48 (* K (* (sin (neg M)) (pow (+ m n) 3)))))) (* 1/2 (* (sin (neg M)) (+ m n))))))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K n)) M))>
#<alt (+ (cos (- (* 1/2 (* K n)) M)) (* -1/2 (* K (* m (sin (- (* 1/2 (* K n)) M))))))>
#<alt (+ (cos (- (* 1/2 (* K n)) M)) (* m (- (* -1/8 (* (pow K 2) (* m (cos (- (* 1/2 (* K n)) M))))) (* 1/2 (* K (sin (- (* 1/2 (* K n)) M)))))))>
#<alt (+ (cos (- (* 1/2 (* K n)) M)) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (- (* 1/2 (* K n)) M)))) (* 1/48 (* (pow K 3) (* m (sin (- (* 1/2 (* K n)) M))))))) (* 1/2 (* K (sin (- (* 1/2 (* K n)) M)))))))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (- n (* -1 m)))) M))>
#<alt (cos (- (* 1/2 (* K (- n (* -1 m)))) M))>
#<alt (cos (- (* 1/2 (* K (- n (* -1 m)))) M))>
#<alt (cos (- (* 1/2 (* K (- n (* -1 m)))) M))>
#<alt (cos (- (* 1/2 (* K m)) M))>
#<alt (+ (cos (- (* 1/2 (* K m)) M)) (* -1/2 (* K (* n (sin (- (* 1/2 (* K m)) M))))))>
#<alt (+ (cos (- (* 1/2 (* K m)) M)) (* n (- (* -1/8 (* (pow K 2) (* n (cos (- (* 1/2 (* K m)) M))))) (* 1/2 (* K (sin (- (* 1/2 (* K m)) M)))))))>
#<alt (+ (cos (- (* 1/2 (* K m)) M)) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (- (* 1/2 (* K m)) M)))) (* 1/48 (* (pow K 3) (* n (sin (- (* 1/2 (* K m)) M))))))) (* 1/2 (* K (sin (- (* 1/2 (* K m)) M)))))))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (- m (* -1 n)))) M))>
#<alt (cos (- (* 1/2 (* K (- m (* -1 n)))) M))>
#<alt (cos (- (* 1/2 (* K (- m (* -1 n)))) M))>
#<alt (cos (- (* 1/2 (* K (- m (* -1 n)))) M))>
#<alt (cos (* 1/2 (* K (+ m n))))>
#<alt (+ (cos (* 1/2 (* K (+ m n)))) (* M (sin (* 1/2 (* K (+ m n))))))>
#<alt (+ (cos (* 1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* 1/2 (* K (+ m n)))))) (* -1 (sin (* 1/2 (* K (+ m n))))))))>
#<alt (+ (cos (* 1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* 1/2 (* K (+ m n))))) (* -1/6 (* M (sin (* 1/2 (* K (+ m n)))))))) (* -1 (sin (* 1/2 (* K (+ m n))))))))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (- (* 1/2 (* K (+ m n))) M))>
#<alt (cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))>
#<alt (* -1 M)>
#<alt (- (* 1/2 (* K (+ m n))) M)>
#<alt (- (* 1/2 (* K (+ m n))) M)>
#<alt (- (* 1/2 (* K (+ m n))) M)>
#<alt (* 1/2 (* K (+ m n)))>
#<alt (* K (+ (* -1 (/ M K)) (* 1/2 (+ m n))))>
#<alt (* K (+ (* -1 (/ M K)) (* 1/2 (+ m n))))>
#<alt (* K (+ (* -1 (/ M K)) (* 1/2 (+ m n))))>
#<alt (* 1/2 (* K (+ m n)))>
#<alt (* -1 (* K (+ (* -1/2 (+ m n)) (/ M K))))>
#<alt (* -1 (* K (+ (* -1/2 (+ m n)) (/ M K))))>
#<alt (* -1 (* K (+ (* -1/2 (+ m n)) (/ M K))))>
#<alt (- (* 1/2 (* K n)) M)>
#<alt (- (+ (* 1/2 (* K m)) (* 1/2 (* K n))) M)>
#<alt (- (+ (* 1/2 (* K m)) (* 1/2 (* K n))) M)>
#<alt (- (+ (* 1/2 (* K m)) (* 1/2 (* K n))) M)>
#<alt (* 1/2 (* K m))>
#<alt (* m (- (+ (* 1/2 K) (* 1/2 (/ (* K n) m))) (/ M m)))>
#<alt (* m (- (+ (* 1/2 K) (* 1/2 (/ (* K n) m))) (/ M m)))>
#<alt (* m (- (+ (* 1/2 K) (* 1/2 (/ (* K n) m))) (/ M m)))>
#<alt (* 1/2 (* K m))>
#<alt (* -1 (* m (+ (* -1 (/ (- (* 1/2 (* K n)) M) m)) (* -1/2 K))))>
#<alt (* -1 (* m (+ (* -1 (/ (- (* 1/2 (* K n)) M) m)) (* -1/2 K))))>
#<alt (* -1 (* m (+ (* -1 (/ (- (* 1/2 (* K n)) M) m)) (* -1/2 K))))>
#<alt (- (* 1/2 (* K m)) M)>
#<alt (- (+ (* 1/2 (* K m)) (* 1/2 (* K n))) M)>
#<alt (- (+ (* 1/2 (* K m)) (* 1/2 (* K n))) M)>
#<alt (- (+ (* 1/2 (* K m)) (* 1/2 (* K n))) M)>
#<alt (* 1/2 (* K n))>
#<alt (* n (- (+ (* 1/2 K) (* 1/2 (/ (* K m) n))) (/ M n)))>
#<alt (* n (- (+ (* 1/2 K) (* 1/2 (/ (* K m) n))) (/ M n)))>
#<alt (* n (- (+ (* 1/2 K) (* 1/2 (/ (* K m) n))) (/ M n)))>
#<alt (* 1/2 (* K n))>
#<alt (* -1 (* n (+ (* -1 (/ (- (* 1/2 (* K m)) M) n)) (* -1/2 K))))>
#<alt (* -1 (* n (+ (* -1 (/ (- (* 1/2 (* K m)) M) n)) (* -1/2 K))))>
#<alt (* -1 (* n (+ (* -1 (/ (- (* 1/2 (* K m)) M) n)) (* -1/2 K))))>
#<alt (* 1/2 (* K (+ m n)))>
#<alt (+ (* -1 M) (* 1/2 (* K (+ m n))))>
#<alt (+ (* -1 M) (* 1/2 (* K (+ m n))))>
#<alt (+ (* -1 M) (* 1/2 (* K (+ m n))))>
#<alt (* -1 M)>
#<alt (* M (- (* 1/2 (/ (* K (+ m n)) M)) 1))>
#<alt (* M (- (* 1/2 (/ (* K (+ m n)) M)) 1))>
#<alt (* M (- (* 1/2 (/ (* K (+ m n)) M)) 1))>
#<alt (* -1 M)>
#<alt (* -1 (* M (+ 1 (* -1/2 (/ (* K (+ m n)) M)))))>
#<alt (* -1 (* M (+ 1 (* -1/2 (/ (* K (+ m n)) M)))))>
#<alt (* -1 (* M (+ 1 (* -1/2 (/ (* K (+ m n)) M)))))>
#<alt (pow (- (* 1/2 n) M) 2)>
#<alt (+ (* m (- (* 1/2 n) M)) (pow (- (* 1/2 n) M) 2))>
#<alt (+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))>
#<alt (+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))>
#<alt (* 1/4 (pow m 2))>
#<alt (* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))>
#<alt (* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2)))) (/ M m)))>
#<alt (* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2)))) (/ M m)))>
#<alt (* 1/4 (pow m 2))>
#<alt (* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))>
#<alt (* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (pow (- (* 1/2 n) M) 2) m))) m))))>
#<alt (* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (pow (- (* 1/2 n) M) 2) m))) m))))>
#<alt (pow (- (* 1/2 m) M) 2)>
#<alt (+ (* n (- (* 1/2 m) M)) (pow (- (* 1/2 m) M) 2))>
#<alt (+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))>
#<alt (+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))>
#<alt (* 1/4 (pow n 2))>
#<alt (* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))>
#<alt (* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2)))) (/ M n)))>
#<alt (* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2)))) (/ M n)))>
#<alt (* 1/4 (pow n 2))>
#<alt (* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (pow (- (* 1/2 m) M) 2) n))) n))))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (pow (- (* 1/2 m) M) 2) n))) n))))>
#<alt (* 1/4 (pow (+ m n) 2))>
#<alt (+ (* -1 (* M (+ m n))) (* 1/4 (pow (+ m n) 2)))>
#<alt (+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))>
#<alt (+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))>
#<alt (pow M 2)>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))>
#<alt (* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))>
#<alt (* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))>
#<alt (pow M 2)>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))>
#<alt (exp (- l (fabs (- m n))))>
#<alt (+ (exp (- l (fabs (- m n)))) (* (pow M 2) (exp (- l (fabs (- m n))))))>
#<alt (+ (exp (- l (fabs (- m n)))) (* (pow M 2) (+ (exp (- l (fabs (- m n)))) (* 1/2 (* (pow M 2) (exp (- l (fabs (- m n)))))))))>
#<alt (+ (exp (- l (fabs (- m n)))) (* (pow M 2) (+ (exp (- l (fabs (- m n)))) (* (pow M 2) (+ (* 1/6 (* (pow M 2) (exp (- l (fabs (- m n)))))) (* 1/2 (exp (- l (fabs (- m n))))))))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (pow M 2) (fabs (- m n))))>
#<alt (+ (exp (- (pow M 2) (fabs (- m n)))) (* l (exp (- (pow M 2) (fabs (- m n))))))>
#<alt (+ (exp (- (pow M 2) (fabs (- m n)))) (* l (+ (exp (- (pow M 2) (fabs (- m n)))) (* 1/2 (* l (exp (- (pow M 2) (fabs (- m n)))))))))>
#<alt (+ (exp (- (pow M 2) (fabs (- m n)))) (* l (+ (exp (- (pow M 2) (fabs (- m n)))) (* l (+ (* 1/6 (* l (exp (- (pow M 2) (fabs (- m n)))))) (* 1/2 (exp (- (pow M 2) (fabs (- m n))))))))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l))))>
#<alt (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l))))>
#<alt (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l))))>
#<alt (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- m n))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n)))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n)))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n)))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n)))))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K (+ m n))>
#<alt (* K n)>
#<alt (+ (* K m) (* K n))>
#<alt (+ (* K m) (* K n))>
#<alt (+ (* K m) (* K n))>
#<alt (* K m)>
#<alt (* m (+ K (/ (* K n) m)))>
#<alt (* m (+ K (/ (* K n) m)))>
#<alt (* m (+ K (/ (* K n) m)))>
#<alt (* K m)>
#<alt (* -1 (* m (+ (* -1 K) (* -1 (/ (* K n) m)))))>
#<alt (* -1 (* m (+ (* -1 K) (* -1 (/ (* K n) m)))))>
#<alt (* -1 (* m (+ (* -1 K) (* -1 (/ (* K n) m)))))>
#<alt (* K m)>
#<alt (+ (* K m) (* K n))>
#<alt (+ (* K m) (* K n))>
#<alt (+ (* K m) (* K n))>
#<alt (* K n)>
#<alt (* n (+ K (/ (* K m) n)))>
#<alt (* n (+ K (/ (* K m) n)))>
#<alt (* n (+ K (/ (* K m) n)))>
#<alt (* K n)>
#<alt (* -1 (* n (+ (* -1 K) (* -1 (/ (* K m) n)))))>
#<alt (* -1 (* n (+ (* -1 K) (* -1 (/ (* K m) n)))))>
#<alt (* -1 (* n (+ (* -1 K) (* -1 (/ (* K m) n)))))>
#<alt (pow M 2)>
#<alt (+ (* -1 (* M n)) (pow M 2))>
#<alt (+ (* n (+ (* -1 M) (* 1/4 n))) (pow M 2))>
#<alt (+ (* n (+ (* -1 M) (* 1/4 n))) (pow M 2))>
#<alt (* 1/4 (pow n 2))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ M n))))>
#<alt (* (pow n 2) (+ 1/4 (+ (* -1 (/ M n)) (/ (pow M 2) (pow n 2)))))>
#<alt (* (pow n 2) (+ 1/4 (+ (* -1 (/ M n)) (/ (pow M 2) (pow n 2)))))>
#<alt (* 1/4 (pow n 2))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ M n))))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ M (* -1 (/ (pow M 2) n))) n))))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ M (* -1 (/ (pow M 2) n))) n))))>
#<alt (* 1/4 (pow n 2))>
#<alt (+ (* -1 (* M n)) (* 1/4 (pow n 2)))>
#<alt (+ (* 1/4 (pow n 2)) (* M (+ M (* -1 n))))>
#<alt (+ (* 1/4 (pow n 2)) (* M (+ M (* -1 n))))>
#<alt (pow M 2)>
#<alt (* (pow M 2) (+ 1 (* -1 (/ n M))))>
#<alt (* (pow M 2) (+ 1 (+ (* -1 (/ n M)) (* 1/4 (/ (pow n 2) (pow M 2))))))>
#<alt (* (pow M 2) (+ 1 (+ (* -1 (/ n M)) (* 1/4 (/ (pow n 2) (pow M 2))))))>
#<alt (pow M 2)>
#<alt (* (pow M 2) (+ 1 (* -1 (/ n M))))>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ n (* -1/4 (/ (pow n 2) M))) M))))>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ n (* -1/4 (/ (pow n 2) M))) M))))>
#<alt (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))>
#<alt (+ (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))) (* l (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))>
#<alt (+ (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))) (* l (+ (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))) (* 1/2 (* l (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))))))>
#<alt (+ (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))) (* l (+ (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))) (* l (+ (* 1/6 (* l (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))) (* 1/2 (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))>
#<alt (exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l))))>
#<alt (exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l))))>
#<alt (exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l))))>
#<alt (exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l))))>
#<alt (exp (- (+ l (pow M 2)) (fabs (- n m))))>
#<alt (+ (exp (- (+ l (pow M 2)) (fabs (- n m)))) (* -1 (* M (* n (exp (- (+ l (pow M 2)) (fabs (- n m))))))))>
#<alt (+ (exp (- (+ l (pow M 2)) (fabs (- n m)))) (* n (+ (* -1 (* M (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* n (* (exp (- (+ l (pow M 2)) (fabs (- n m)))) (+ 1/4 (* 1/2 (pow M 2))))))))>
#<alt (+ (exp (- (+ l (pow M 2)) (fabs (- n m)))) (* n (+ (* -1 (* M (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* n (+ (* n (* (exp (- (+ l (pow M 2)) (fabs (- n m)))) (+ (* -1/4 M) (* -1/6 (pow M 3))))) (* (exp (- (+ l (pow M 2)) (fabs (- n m)))) (+ 1/4 (* 1/2 (pow M 2)))))))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n))))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n))))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n))))))>
#<alt (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n))))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (+ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (* -1 (* M (* n (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))>
#<alt (+ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (* M (+ (* -1 (* n (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* M (* (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (+ 1 (* 1/2 (pow n 2))))))))>
#<alt (+ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (* M (+ (* -1 (* n (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* M (+ (* M (* (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (+ (* -1 n) (* -1/6 (pow n 3))))) (* (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (+ 1 (* 1/2 (pow n 2)))))))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m)))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m)))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m)))))>
#<alt (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m)))))>
#<alt (cos (* -1/2 (* K (+ m n))))>
#<alt (+ (cos (* -1/2 (* K (+ m n)))) (* -1 (* M (sin (* -1/2 (* K (+ m n)))))))>
#<alt (+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K (+ m n)))))) (sin (* -1/2 (* K (+ m n)))))))>
#<alt (+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* 1/6 (* M (sin (* -1/2 (* K (+ m n)))))))) (sin (* -1/2 (* K (+ m n)))))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (- (* -1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos M)>
#<alt (+ (cos M) (* 1/2 (* K (* (sin M) (+ m n)))))>
#<alt (+ (cos M) (* K (- (* -1/8 (* K (* (cos M) (pow (+ m n) 2)))) (* -1/2 (* (sin M) (+ m n))))))>
#<alt (+ (cos M) (* K (- (* K (+ (* -1/8 (* (cos M) (pow (+ m n) 2))) (* -1/48 (* K (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n))))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* -1/8 (* (pow K 2) (* m (cos (+ M (* -1/2 (* K n))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/48 (* (pow K 3) (* m (sin (+ M (* -1/2 (* K n))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* -1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* -1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* -1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* -1/2 (* K m))))>
#<alt (+ (cos (+ M (* -1/2 (* K m)))) (* 1/2 (* K (* n (sin (+ M (* -1/2 (* K m))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* -1/8 (* (pow K 2) (* n (cos (+ M (* -1/2 (* K m))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/48 (* (pow K 3) (* n (sin (+ M (* -1/2 (* K m))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (- m (* -1 n))))))>
#<alt (cos (+ M (* -1/2 (* K (- m (* -1 n))))))>
#<alt (cos (+ M (* -1/2 (* K (- m (* -1 n))))))>
#<alt (cos (+ M (* -1/2 (* K (- m (* -1 n))))))>
#<alt (pow (+ M (* -1/2 n)) 2)>
#<alt (+ (* -1 (* m (+ M (* -1/2 n)))) (pow (+ M (* -1/2 n)) 2))>
#<alt (+ (* m (+ (* -1 (+ M (* -1/2 n))) (* 1/4 m))) (pow (+ M (* -1/2 n)) 2))>
#<alt (+ (* m (+ (* -1 (+ M (* -1/2 n))) (* 1/4 m))) (pow (+ M (* -1/2 n)) 2))>
#<alt (* 1/4 (pow m 2))>
#<alt (* (pow m 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 n)) m))))>
#<alt (* (pow m 2) (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 n)) m)) (/ (pow (+ M (* -1/2 n)) 2) (pow m 2)))))>
#<alt (* (pow m 2) (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 n)) m)) (/ (pow (+ M (* -1/2 n)) 2) (pow m 2)))))>
#<alt (* 1/4 (pow m 2))>
#<alt (* (pow m 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 n)) m))))>
#<alt (* (pow m 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (pow (+ M (* -1/2 n)) 2) m)) (* -1/2 n))) m))))>
#<alt (* (pow m 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (pow (+ M (* -1/2 n)) 2) m)) (* -1/2 n))) m))))>
#<alt (pow (+ M (* -1/2 m)) 2)>
#<alt (+ (* -1 (* n (+ M (* -1/2 m)))) (pow (+ M (* -1/2 m)) 2))>
#<alt (+ (* n (+ (* -1 (+ M (* -1/2 m))) (* 1/4 n))) (pow (+ M (* -1/2 m)) 2))>
#<alt (+ (* n (+ (* -1 (+ M (* -1/2 m))) (* 1/4 n))) (pow (+ M (* -1/2 m)) 2))>
#<alt (* 1/4 (pow n 2))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 m)) n))))>
#<alt (* (pow n 2) (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 m)) n)) (/ (pow (+ M (* -1/2 m)) 2) (pow n 2)))))>
#<alt (* (pow n 2) (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 m)) n)) (/ (pow (+ M (* -1/2 m)) 2) (pow n 2)))))>
#<alt (* 1/4 (pow n 2))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 m)) n))))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (pow (+ M (* -1/2 m)) 2) n)) (* -1/2 m))) n))))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (pow (+ M (* -1/2 m)) 2) n)) (* -1/2 m))) n))))>
#<alt (* 1/4 (pow (+ m n) 2))>
#<alt (+ (* -1 (* M (+ m n))) (* 1/4 (pow (+ m n) 2)))>
#<alt (+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))>
#<alt (+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))>
#<alt (pow M 2)>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))>
#<alt (* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))>
#<alt (* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))>
#<alt (pow M 2)>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))>
#<alt (* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K n))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (* -1/2 (* K m))>
#<alt (* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))>
#<alt (* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))>
#<alt (* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))>
#<alt (* -1/2 (* K m))>
#<alt (* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))>
#<alt (* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))>
#<alt (* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))>
#<alt (* -1/2 (* K m))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (* -1/2 (* K n))>
#<alt (* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))>
#<alt (* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))>
#<alt (* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))>
#<alt (* -1/2 (* K n))>
#<alt (* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))>
#<alt (* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))>
#<alt (* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))>
Calls

309 calls:

TimeVariablePointExpression
49.0ms
n
@0
(/ (cos (+ M (* -1/2 (* n K)))) (exp (+ l (- (* (- (* 1/2 n) M) (- (* 1/2 n) M)) (fabs (- n m))))))
35.0ms
m
@0
(* (cos (- (/ (* K (+ m n)) 2) M)) (pow (exp -1) (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M)))))
33.0ms
n
@0
(* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M))
25.0ms
n
@0
(/ (exp (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M)))) (cos (+ M (* K (/ (+ m n) -2)))))
25.0ms
K
@inf
(* (cos (- (/ (* K (+ m n)) 2) M)) (pow (exp -1) (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M)))))

rewrite551.0ms (3.1%)

Algorithm
1×batch-egg-rewrite
Rules
2496×*-lowering-*.f32
2496×*-lowering-*.f64
1808×/-lowering-/.f32
1808×/-lowering-/.f64
1572×sum4-define
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
059358
1234332
2880332
34707332
08131332
Stop Event
1×iter limit
1×node limit
Counts
28 → 1209
Calls
Call 1
Inputs
(/ (cos M) (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))))
(cos M)
(exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n)))))
(+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))
(/ (cos (+ M (/ (* K (+ m n)) -2))) (exp (+ (* M M) (- l (fabs (- m n))))))
(cos (+ M (/ (* K (+ m n)) -2)))
(+ M (/ (* K (+ m n)) -2))
(/ (* K (+ m n)) -2)
(/ (cos (+ M (* -1/2 (* n K)))) (exp (+ l (- (* (- (* 1/2 n) M) (- (* 1/2 n) M)) (fabs (- n m))))))
(cos (+ M (* -1/2 (* n K))))
(+ M (* -1/2 (* n K)))
(* -1/2 (* n K))
(/ 1 (/ (exp (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M)))) (cos (+ M (* K (/ (+ m n) -2))))))
(/ (exp (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M)))) (cos (+ M (* K (/ (+ m n) -2)))))
(exp (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M))))
(+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M)))
(pow (exp -1) (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M))))
(* (cos (- (/ (* K (+ m n)) 2) M)) (pow (exp -1) (+ (- l (fabs (- m n))) (* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M)))))
(cos (- (/ (* K (+ m n)) 2) M))
(- (/ (* K (+ m n)) 2) M)
(* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M))
(exp (+ (* M M) (- l (fabs (- m n)))))
(* K (+ m n))
(* (- (* 1/2 n) M) (- (* 1/2 n) M))
(exp (+ l (- (* (- (* 1/2 n) M) (- (* 1/2 n) M)) (fabs (- n m)))))
(cos (+ M (* K (/ (+ m n) -2))))
(* (+ (/ (+ m n) -2) M) (+ (/ (+ m n) -2) M))
(* K (/ (+ m n) -2))
Outputs
(exp.f64 (*.f64 (log.f64 (/.f64 (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 M))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 M)) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 M)) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 M)) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 M)) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 M))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 M)))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))))
(/.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))) (-.f64 #s(literal 0 binary64) (cos.f64 M))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 M)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 #s(literal 1 binary64) (cos.f64 M)))
(/.f64 (exp.f64 (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))) (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (cos.f64 M)))
(/.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 (neg.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 M))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 M)) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))) (cos.f64 M)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 M)) #s(literal -1 binary64)) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 M)) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (/.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))) (exp.f64 l)) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(pow.f64 (/.f64 (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 M)) #s(literal -1 binary64))
(*.f64 (cos.f64 M) (exp.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(*.f64 (/.f64 (cos.f64 M) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 M) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 M)) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 M)) (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))) (cos.f64 M))
(*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 M)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))) (-.f64 #s(literal 0 binary64) (cos.f64 M)))
(*.f64 (exp.f64 (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))) (pow.f64 (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (cos.f64 M)) #s(literal -1 binary64)))
(*.f64 (exp.f64 (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))) (/.f64 (cos.f64 M) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 M))) (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(*.f64 (/.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))) (exp.f64 l)) (exp.f64 (fabs.f64 (-.f64 m n))))
(*.f64 (/.f64 (cos.f64 M) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) l))) (exp.f64 (fabs.f64 (-.f64 m n))))
(+.f64 (*.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 M)) (*.f64 (sin.f64 #s(literal 0 binary64)) (sin.f64 M)))
(cos.f64 M)
(cos.f64 (-.f64 #s(literal 0 binary64) M))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 M)))
(neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 M)))
(*.f64 (cos.f64 M) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 M))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 M)))
(exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (exp.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) l))))
(/.f64 (exp.f64 l) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))) #s(literal -1 binary64))
(/.f64 (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) l)) (exp.f64 (fabs.f64 (-.f64 m n))))
(/.f64 (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) l)) (*.f64 #s(literal 1 binary64) (exp.f64 (fabs.f64 (-.f64 m n)))))
(/.f64 (neg.f64 (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) l))) (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))))
(*.f64 (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(*.f64 (exp.f64 l) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 l) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))))
(*.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(*.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))) (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64)))
(*.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))) #s(literal 1 binary64)))
(*.f64 (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) l)) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))
(+.f64 l (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(+.f64 l (neg.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))))
(+.f64 l (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (fabs.f64 (-.f64 m n))))
(+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))
(+.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))) (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) l))
(+.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))) (+.f64 (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))) (-.f64 l (fabs.f64 (-.f64 m n)))))
(+.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) l) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))
(+.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(+.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))) l)
(-.f64 l (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) l) (fabs.f64 (-.f64 m n)))
(-.f64 (+.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) l) #s(literal 0 binary64)) (fabs.f64 (-.f64 m n)))
(fma.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 l (fabs.f64 (-.f64 m n))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 M M)))) (/.f64 (sin.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (*.f64 M M)))) (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 M M))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 (sin.f64 M) (exp.f64 (*.f64 M M))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
(+.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 M M))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 M M))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 M M))) (neg.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 M M))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M))) (neg.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 M M))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 M M))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 M M))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 M M))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))))))
(exp.f64 (*.f64 (log.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (neg.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
(-.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))) (neg.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 M M))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 M M))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
(neg.f64 (neg.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
(neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 M M)))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))))
(/.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (exp.f64 (neg.f64 (*.f64 M M))) (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (*.f64 M M)))
(/.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 M M))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))))
(/.f64 (neg.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 M M)))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 M M)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 M M))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (*.f64 M M))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (/.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 M M))) (exp.f64 l)) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(pow.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64))
(*.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))))
(*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))))
(*.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (exp.f64 (neg.f64 (*.f64 M M))) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 (neg.f64 (*.f64 M M))) (pow.f64 (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64)))
(*.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (neg.f64 (*.f64 M M))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 M M))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 M M))) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(*.f64 (/.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 M M))) (exp.f64 l)) (exp.f64 (fabs.f64 (-.f64 m n))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (+.f64 l (*.f64 M M)))) (exp.f64 (fabs.f64 (-.f64 m n))))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 M)) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (fma.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 M))) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (fma.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M)) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (neg.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))))
(+.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)))
(+.f64 (fma.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (cos.f64 M) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) #s(literal -1 binary64)))
(cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(-.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (cos.f64 M) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (cos.f64 M) (neg.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (cos.f64 M) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(fma.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(fma.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (sin.f64 M) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1/2 binary64) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) #s(literal 4 binary64))
(pow.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))
(+.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)) M)
(-.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(fma.f64 (+.f64 m n) (/.f64 K #s(literal -2 binary64)) M)
(fma.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)
(fma.f64 (*.f64 (+.f64 m n) K) #s(literal -1/2 binary64) M)
(fma.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K) M)
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)) M)
(fma.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) K M)
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)) #s(literal 1/2 binary64) M)
(+.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))
(+.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 m K) #s(literal -1/2 binary64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 m K)) (*.f64 n (/.f64 K #s(literal -2 binary64))))
(+.f64 (*.f64 (*.f64 m K) #s(literal -1/2 binary64)) (*.f64 n (/.f64 K #s(literal -2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(neg.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))
(/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))
(/.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 m n) K)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K)))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 m n) K)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) K) (/.f64 #s(literal 2 binary64) (+.f64 m n)))
(/.f64 (/.f64 K #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 m n)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K))) #s(literal 2 binary64))
(/.f64 (*.f64 K #s(literal -1 binary64)) (/.f64 #s(literal 2 binary64) (+.f64 m n)))
(pow.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K)) #s(literal -1 binary64))
(*.f64 (+.f64 m n) (/.f64 K #s(literal -2 binary64)))
(*.f64 (+.f64 m n) (neg.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 (+.f64 m n) (*.f64 (-.f64 #s(literal 0 binary64) K) #s(literal 1/2 binary64)))
(*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) K))
(*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))
(*.f64 (*.f64 (+.f64 m n) K) #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 m n) K)) #s(literal -1 binary64)))
(*.f64 #s(literal -1/2 binary64) (/.f64 K (/.f64 #s(literal 1 binary64) (+.f64 m n))))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))
(*.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) K)
(*.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 m n)) (/.f64 K #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)) #s(literal 1/2 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) K) (/.f64 (+.f64 m n) #s(literal 2 binary64)))
(*.f64 (/.f64 K #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 m n)))
(*.f64 (/.f64 K #s(literal -2 binary64)) (+.f64 m n))
(*.f64 (/.f64 K #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 m n))))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K))) #s(literal 1/2 binary64))
(*.f64 (/.f64 K #s(literal 1 binary64)) (/.f64 (+.f64 m n) #s(literal -2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n)))))) (/.f64 (sin.f64 M) (exp.f64 l)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 l))) (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 l))) (/.f64 (sin.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n)))))) (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 l)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))))
(+.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))))))
(+.f64 (fma.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 l)) (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 l)) (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 l)) (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 l)) (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 l)) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 l)) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 l)) (neg.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 l)) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 l)) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 l)) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 l)) (neg.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 l)) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 l)) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 l)) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 l)) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 l)) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))) (fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))))))) (fma.f64 (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))))))
(exp.f64 (*.f64 (log.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))))
(-.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))))
(fma.f64 (cos.f64 M) (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (/.f64 (cos.f64 M) (exp.f64 l)) (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 l)) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 l)) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (/.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (exp.f64 l)) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n)))) (/.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 l))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))))
(/.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))))
(/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 l)) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n)))))
(/.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (/.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))) (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))))
(/.f64 (neg.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 l))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))))
(/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (exp.f64 l))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 l))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n)))))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (exp.f64 l)) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) #s(literal -1 binary64)) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))
(/.f64 (/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 l)) (exp.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(pow.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) #s(literal -1 binary64))
(*.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))))
(*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))))
(*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 l)) (/.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (pow.f64 (/.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (/.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 l)) (/.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n)))))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))) (/.f64 #s(literal 1 binary64) (exp.f64 l)))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))))) (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))))
(*.f64 (/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 l)) (exp.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))) (exp.f64 (fabs.f64 (-.f64 m n))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))) (exp.f64 (fabs.f64 (-.f64 m n))))
(+.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 M)) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))))
(+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))))
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))
(+.f64 (fma.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))))))
(+.f64 (fma.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (cos.f64 M) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))))))
(+.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (cos.f64 (-.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))))))
(cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))))
(fma.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))
(fma.f64 (cos.f64 M) (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))))
(fma.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (cos.f64 M) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))
(fma.f64 (cos.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))) (cos.f64 M) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (cos.f64 (-.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (cos.f64 (-.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (/.f64 K #s(literal -2 binary64)))))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (cos.f64 (-.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) (-.f64 (cos.f64 (-.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (cos.f64 (-.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))))) #s(literal 4 binary64))
(*.f64 (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64)))))))
(+.f64 M (*.f64 n (/.f64 K #s(literal -2 binary64))))
(+.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))) M)
(fma.f64 n (/.f64 K #s(literal -2 binary64)) M)
(fma.f64 K (*.f64 n #s(literal -1/2 binary64)) M)
(fma.f64 #s(literal -1/2 binary64) (*.f64 n K) M)
(fma.f64 (*.f64 n K) #s(literal -1/2 binary64) M)
(fma.f64 (*.f64 n #s(literal -1/2 binary64)) K M)
(fma.f64 (/.f64 K #s(literal -2 binary64)) n M)
(*.f64 n (/.f64 K #s(literal -2 binary64)))
(*.f64 K (*.f64 n #s(literal -1/2 binary64)))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(*.f64 (*.f64 n K) #s(literal -1/2 binary64))
(*.f64 (*.f64 n #s(literal -1/2 binary64)) K)
(*.f64 (/.f64 K #s(literal -2 binary64)) n)
(+.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (sin.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 (sin.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(+.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(+.f64 (fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 M)) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 M)) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 M)) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 M)) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 M) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 M) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 M) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 M) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(-.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (-.f64 #s(literal 0 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(-.f64 (/.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64)) (/.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64)))
(fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(fma.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 M)) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 M) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(/.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(/.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64))
(/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) l)) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (+.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) #s(literal -1 binary64))
(/.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(/.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(/.f64 (neg.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 (*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 #s(literal -1 binary64) l))) (exp.f64 (+.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) l)) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (+.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))))
(/.f64 (*.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) l)) (*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(/.f64 (/.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (/.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(pow.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (/.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64)))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(*.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (/.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64))
(*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) l)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) #s(literal -1 binary64))
(*.f64 (*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (pow.f64 (/.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64)))
(*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (pow.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64)))
(*.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(*.f64 (/.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64)) (/.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(*.f64 (/.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64)) (/.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (*.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) #s(literal -1 binary64)) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(*.f64 (*.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (/.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64)) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (/.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(exp.f64 (*.f64 (log.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) #s(literal -1 binary64)))
(exp.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (-.f64 #s(literal 0 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(/.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(/.f64 (exp.f64 l) (*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 l)) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (*.f64 (exp.f64 l) #s(literal 1 binary64)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (*.f64 (exp.f64 l) #s(literal -1 binary64)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(/.f64 (*.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (*.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) #s(literal 1 binary64)))
(/.f64 (*.f64 (exp.f64 l) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (*.f64 #s(literal 1 binary64) (exp.f64 l)) (*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 l)) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (*.f64 (exp.f64 l) (/.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (exp.f64 (fabs.f64 (-.f64 m n))))
(/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(pow.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64))
(pow.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(*.f64 (exp.f64 l) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))) (/.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 (/.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (/.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(*.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) #s(literal -1 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (*.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (/.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (pow.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(*.f64 (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(*.f64 (/.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(*.f64 (pow.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (pow.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64)) (/.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (/.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64)) (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal -1 binary64)) (/.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64)) (/.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(*.f64 (*.f64 #s(literal 1 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(/.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 l)))
(/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64))
(/.f64 (exp.f64 l) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (exp.f64 l) (*.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 l)) (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(/.f64 (exp.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (fabs.f64 (-.f64 m n))))
(/.f64 (*.f64 (exp.f64 l) #s(literal 1 binary64)) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (*.f64 (exp.f64 l) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (fabs.f64 (-.f64 m n))))
(/.f64 (*.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 l)) (exp.f64 (fabs.f64 (-.f64 m n))))
(*.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))
(*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 l) (exp.f64 (+.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(*.f64 (exp.f64 l) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (*.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(*.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(*.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64)))
(*.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64)))
(*.f64 (exp.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (exp.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (exp.f64 (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(*.f64 (exp.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(*.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (exp.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(*.f64 (*.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 l)) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(+.f64 l (+.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))
(+.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))
(+.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))) (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(+.f64 (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n)))))
(+.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))) (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(+.f64 (+.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))) l)
(+.f64 (/.f64 M (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (/.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 4 binary64)) (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (/.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 4 binary64)) (+.f64 (/.f64 M (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))
(+.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))
(+.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(+.f64 (+.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 M M)) (/.f64 M (/.f64 #s(literal -2 binary64) (+.f64 m n))))
(+.f64 (+.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (/.f64 M (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (*.f64 M M))
(-.f64 l (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(-.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))
(-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))
(-.f64 (+.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 0 binary64)) (fabs.f64 (-.f64 m n)))
(fma.f64 (+.f64 m n) (*.f64 #s(literal -1/2 binary64) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(fma.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(fma.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (/.f64 (+.f64 m n) #s(literal -2 binary64)) (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(fma.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (-.f64 l (fabs.f64 (-.f64 m n))))
(fma.f64 (*.f64 (+.f64 m n) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) #s(literal -1/2 binary64) (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))
(exp.f64 (*.f64 (log.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) #s(literal -1 binary64)))
(neg.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (+.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))) (exp.f64 (*.f64 #s(literal -1 binary64) l))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) l)) (exp.f64 (+.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))))
(/.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(/.f64 (neg.f64 (exp.f64 (*.f64 #s(literal -1 binary64) l))) (neg.f64 (exp.f64 (+.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))))
(/.f64 (neg.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 (*.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 #s(literal -1 binary64) l))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(/.f64 (*.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -1 binary64) l))) (exp.f64 (+.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))))
(/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) l)) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(/.f64 (/.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(pow.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) #s(literal -1 binary64))
(pow.f64 (exp.f64 #s(literal -1 binary64)) (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))
(*.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 #s(literal -1 binary64) (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64))
(*.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) l)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (+.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) l)) (/.f64 #s(literal 1 binary64) (exp.f64 (+.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))))
(*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) l)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (pow.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal -1 binary64)))
(*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))))
(*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (pow.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal -1 binary64)) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (*.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (*.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (*.f64 #s(literal -1 binary64) l))) (exp.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (sin.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 (sin.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(+.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(+.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(+.f64 (fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 M)) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 M)) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 M)) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 M)) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 M) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 M) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 M) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 M) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 M))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l))))) (fma.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)))))
(exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(-.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) (-.f64 #s(literal 0 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(-.f64 (/.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64)) (/.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64)))
(fma.f64 (cos.f64 M) (*.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (cos.f64 M) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(fma.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (/.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 M)) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 M) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(fma.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (neg.f64 (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(/.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(/.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64))
(/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) l)) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (+.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) #s(literal -1 binary64))
(/.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(/.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(/.f64 (neg.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 (*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 #s(literal -1 binary64) l))) (exp.f64 (+.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) l)) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (+.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))))
(/.f64 (*.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64)) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) l)) (*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(/.f64 (/.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (/.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(pow.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))))
(*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (/.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64)))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(*.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (/.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64))
(*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) l)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (fabs.f64 (-.f64 m n)))))) #s(literal -1 binary64))
(*.f64 (*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (pow.f64 (/.f64 (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64)))
(*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (pow.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64)))
(*.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(*.f64 (/.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64)) (/.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(*.f64 (/.f64 (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 1 binary64)) (/.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (*.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n)))))) #s(literal -1 binary64)) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(*.f64 (*.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (/.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal 1 binary64)) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 l)) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(*.f64 (/.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 M)) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (fma.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 M))) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (fma.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M)) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (neg.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))))
(+.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)))
(+.f64 (fma.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (cos.f64 M) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) #s(literal -1 binary64)))
(cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(-.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (cos.f64 M) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (cos.f64 M) (neg.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (cos.f64 M) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(fma.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(fma.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (sin.f64 M) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1/2 binary64) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) #s(literal 4 binary64))
(pow.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M))
(+.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M) (fma.f64 (neg.f64 (/.f64 K #s(literal -2 binary64))) (+.f64 m n) (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(+.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M) (fma.f64 (neg.f64 (-.f64 #s(literal 0 binary64) K)) (/.f64 (+.f64 m n) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(+.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M) (fma.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(+.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K) (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(+.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M) (fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)) #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(+.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M) (fma.f64 (*.f64 (+.f64 m n) K) #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(+.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M) (fma.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(+.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M) (fma.f64 (-.f64 #s(literal 0 binary64) K) (/.f64 (+.f64 m n) #s(literal -2 binary64)) (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(+.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)) (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(+.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M) (fma.f64 (neg.f64 (/.f64 K #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 m n)) (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(+.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)) (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(+.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M) (fma.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) K) (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(+.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M) (fma.f64 (+.f64 m n) (/.f64 K #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(+.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M) (fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 m n)) (/.f64 K #s(literal -2 binary64)) (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(+.f64 (-.f64 #s(literal 0 binary64) M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(+.f64 (fma.f64 M #s(literal -1 binary64) (neg.f64 (*.f64 (neg.f64 (/.f64 K #s(literal 2 binary64))) (+.f64 m n)))) (fma.f64 (neg.f64 (neg.f64 (/.f64 K #s(literal 2 binary64)))) (+.f64 m n) (*.f64 (neg.f64 (/.f64 K #s(literal 2 binary64))) (+.f64 m n))))
(+.f64 (fma.f64 M #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) K) #s(literal 1/2 binary64)) (+.f64 m n)))) (fma.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) K) #s(literal 1/2 binary64))) (+.f64 m n) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) K) #s(literal 1/2 binary64)) (+.f64 m n))))
(+.f64 (fma.f64 M #s(literal -1 binary64) (neg.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 m n) K)) #s(literal -1 binary64)) #s(literal -1/2 binary64)))) (fma.f64 (neg.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 m n) K)) #s(literal -1 binary64))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 m n) K)) #s(literal -1 binary64)) #s(literal -1/2 binary64))))
(+.f64 (fma.f64 M #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 K (/.f64 #s(literal 1 binary64) (+.f64 m n))) #s(literal -1/2 binary64)))) (fma.f64 (neg.f64 (/.f64 K (/.f64 #s(literal 1 binary64) (+.f64 m n)))) #s(literal -1/2 binary64) (*.f64 (/.f64 K (/.f64 #s(literal 1 binary64) (+.f64 m n))) #s(literal -1/2 binary64))))
(+.f64 (fma.f64 M #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) #s(literal -1 binary64)))) (fma.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)) #s(literal -1 binary64) (*.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) #s(literal -1 binary64))))
(+.f64 (fma.f64 M #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 m n))) (/.f64 K #s(literal -2 binary64))))) (fma.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 m n)))) (/.f64 K #s(literal -2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 m n))) (/.f64 K #s(literal -2 binary64)))))
(+.f64 (fma.f64 M #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K))))))
(+.f64 (fma.f64 M #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) (/.f64 K #s(literal 1 binary64))))) (fma.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) (/.f64 K #s(literal 1 binary64)) (*.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) (/.f64 K #s(literal 1 binary64)))))
(+.f64 (fma.f64 #s(literal -1 binary64) M (neg.f64 (*.f64 (neg.f64 (/.f64 K #s(literal 2 binary64))) (+.f64 m n)))) (fma.f64 (neg.f64 (neg.f64 (/.f64 K #s(literal 2 binary64)))) (+.f64 m n) (*.f64 (neg.f64 (/.f64 K #s(literal 2 binary64))) (+.f64 m n))))
(+.f64 (fma.f64 #s(literal -1 binary64) M (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) K) #s(literal 1/2 binary64)) (+.f64 m n)))) (fma.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) K) #s(literal 1/2 binary64))) (+.f64 m n) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) K) #s(literal 1/2 binary64)) (+.f64 m n))))
(+.f64 (fma.f64 #s(literal -1 binary64) M (neg.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 m n) K)) #s(literal -1 binary64)) #s(literal -1/2 binary64)))) (fma.f64 (neg.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 m n) K)) #s(literal -1 binary64))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 m n) K)) #s(literal -1 binary64)) #s(literal -1/2 binary64))))
(+.f64 (fma.f64 #s(literal -1 binary64) M (neg.f64 (*.f64 (/.f64 K (/.f64 #s(literal 1 binary64) (+.f64 m n))) #s(literal -1/2 binary64)))) (fma.f64 (neg.f64 (/.f64 K (/.f64 #s(literal 1 binary64) (+.f64 m n)))) #s(literal -1/2 binary64) (*.f64 (/.f64 K (/.f64 #s(literal 1 binary64) (+.f64 m n))) #s(literal -1/2 binary64))))
(+.f64 (fma.f64 #s(literal -1 binary64) M (neg.f64 (*.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) #s(literal -1 binary64)))) (fma.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)) #s(literal -1 binary64) (*.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) #s(literal -1 binary64))))
(+.f64 (fma.f64 #s(literal -1 binary64) M (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 m n))) (/.f64 K #s(literal -2 binary64))))) (fma.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 m n)))) (/.f64 K #s(literal -2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 m n))) (/.f64 K #s(literal -2 binary64)))))
(+.f64 (fma.f64 #s(literal -1 binary64) M (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K))))))
(+.f64 (fma.f64 #s(literal -1 binary64) M (neg.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) (/.f64 K #s(literal 1 binary64))))) (fma.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) (/.f64 K #s(literal 1 binary64)) (*.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) (/.f64 K #s(literal 1 binary64)))))
(-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)
(-.f64 (-.f64 #s(literal 0 binary64) M) (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))
(-.f64 #s(literal 0 binary64) (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(-.f64 (+.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) #s(literal 0 binary64)) M)
(fma.f64 M #s(literal -1 binary64) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(fma.f64 (+.f64 m n) (/.f64 K #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) M))
(fma.f64 (+.f64 m n) (neg.f64 (/.f64 K #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) M))
(fma.f64 (+.f64 m n) (*.f64 (-.f64 #s(literal 0 binary64) K) #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) M))
(fma.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K (-.f64 #s(literal 0 binary64) M))
(fma.f64 K (/.f64 (+.f64 m n) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) M))
(fma.f64 (*.f64 (+.f64 m n) K) #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) M))
(fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)) (-.f64 #s(literal 0 binary64) M))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K) (-.f64 #s(literal 0 binary64) M))
(fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 m n) K)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) M))
(fma.f64 #s(literal 1 binary64) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M))
(fma.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) K) (-.f64 #s(literal 0 binary64) M))
(fma.f64 #s(literal -1 binary64) M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) M))
(fma.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) M))
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 m n)) (/.f64 K #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) M))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)) #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) M))
(fma.f64 (-.f64 #s(literal 0 binary64) K) (/.f64 (+.f64 m n) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) M))
(fma.f64 (/.f64 K #s(literal 2 binary64)) (+.f64 m n) (-.f64 #s(literal 0 binary64) M))
(fma.f64 (/.f64 K #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 m n))) (-.f64 #s(literal 0 binary64) M))
(fma.f64 (/.f64 K #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 m n)) (-.f64 #s(literal 0 binary64) M))
(fma.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) M))
(fma.f64 (/.f64 K #s(literal 1 binary64)) (/.f64 (+.f64 m n) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) M))
(neg.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(+.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(+.f64 (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(-.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))) (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))
(-.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))) (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) M))
(fma.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(fma.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 (+.f64 m n) #s(literal 2 binary64)) (neg.f64 (*.f64 M (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(pow.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))) #s(literal 2 binary64))
(*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))
(*.f64 (exp.f64 (log.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))) (exp.f64 (log.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))))
(/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (exp.f64 (+.f64 l (*.f64 M M)))))
(/.f64 (exp.f64 l) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 M M))))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))) #s(literal -1 binary64))
(/.f64 (exp.f64 (+.f64 l (*.f64 M M))) (exp.f64 (fabs.f64 (-.f64 m n))))
(/.f64 (exp.f64 (+.f64 l (*.f64 M M))) (*.f64 #s(literal 1 binary64) (exp.f64 (fabs.f64 (-.f64 m n)))))
(/.f64 (neg.f64 (exp.f64 (+.f64 l (*.f64 M M)))) (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))))
(*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 l) (exp.f64 (+.f64 (*.f64 M M) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 l) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))) (exp.f64 (*.f64 M M))))
(*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (exp.f64 (*.f64 M M)))
(*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (exp.f64 (*.f64 M M)) #s(literal 1 binary64)))
(*.f64 (exp.f64 (*.f64 M M)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(*.f64 (exp.f64 (*.f64 M M)) (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64)))
(*.f64 (exp.f64 (*.f64 M M)) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(*.f64 (exp.f64 (+.f64 l (*.f64 M M))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 M M))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 M M)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(+.f64 (*.f64 n K) (*.f64 m K))
(+.f64 (*.f64 m K) (*.f64 n K))
(+.f64 (neg.f64 (*.f64 m (-.f64 #s(literal 0 binary64) K))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 n K))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)))
(fma.f64 m K (*.f64 n K))
(fma.f64 n K (*.f64 m K))
(fma.f64 K m (*.f64 n K))
(fma.f64 K n (*.f64 m K))
(neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)))
(*.f64 (+.f64 m n) K)
(*.f64 (+.f64 m n) (neg.f64 (-.f64 #s(literal 0 binary64) K)))
(*.f64 K (+.f64 m n))
(*.f64 #s(literal 1 binary64) (*.f64 (+.f64 m n) K))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 m n)) (-.f64 #s(literal 0 binary64) K))
(*.f64 (-.f64 #s(literal 0 binary64) K) (-.f64 #s(literal 0 binary64) (+.f64 m n)))
(*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) K)) (+.f64 m n))
(+.f64 (neg.f64 (*.f64 M (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (*.f64 n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))
(+.f64 (*.f64 n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (neg.f64 (*.f64 M (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))
(-.f64 (*.f64 n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (*.f64 M (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))
(-.f64 (*.f64 n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) M))
(fma.f64 (*.f64 n #s(literal 1/2 binary64)) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (neg.f64 (*.f64 M (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))
(fma.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (*.f64 n #s(literal 1/2 binary64)) (neg.f64 (*.f64 M (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))
(pow.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) #s(literal 2 binary64))
(*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))
(*.f64 (exp.f64 (log.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (exp.f64 (log.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))))
(/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))) #s(literal -1 binary64))
(/.f64 (exp.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)))
(/.f64 (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))) (exp.f64 (fabs.f64 (-.f64 m n))))
(/.f64 (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))) (*.f64 #s(literal 1 binary64) (exp.f64 (fabs.f64 (-.f64 m n)))))
(/.f64 (neg.f64 (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))) (neg.f64 (exp.f64 (fabs.f64 (-.f64 m n)))))
(*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n)))))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 l) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n)))))
(*.f64 (exp.f64 l) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n)))))))
(*.f64 (exp.f64 l) (/.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64)))
(*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n)))) (exp.f64 l))
(*.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n)))) (/.f64 (exp.f64 l) #s(literal 1 binary64)))
(*.f64 (exp.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(*.f64 (exp.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 l)) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n))))))
(*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 l))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 m n)))))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 M)) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (fma.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 M))) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (fma.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M)) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (neg.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))))
(+.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 1 binary64)))
(+.f64 (fma.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (cos.f64 M) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) #s(literal -1 binary64)))
(cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(-.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (cos.f64 M) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (cos.f64 M) (neg.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (cos.f64 M) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(fma.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(fma.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (sin.f64 M) (*.f64 (cos.f64 M) (cos.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1/2 binary64) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) #s(literal 4 binary64))
(pow.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (*.f64 M M) (+.f64 (/.f64 M (/.f64 #s(literal -2 binary64) (+.f64 m n))) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n)))))
(+.f64 (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(+.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))
(+.f64 (/.f64 M (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (*.f64 M M) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n)))))
(+.f64 (/.f64 M (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (/.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 4 binary64)) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(+.f64 (/.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 4 binary64)) (+.f64 (/.f64 M (/.f64 #s(literal -2 binary64) (+.f64 m n))) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(+.f64 (+.f64 (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (/.f64 M (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (/.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 4 binary64)))
(+.f64 (+.f64 (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (/.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 4 binary64))) (/.f64 M (/.f64 #s(literal -2 binary64) (+.f64 m n))))
(+.f64 (+.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))) (*.f64 M M)) (/.f64 M (/.f64 #s(literal -2 binary64) (+.f64 m n))))
(+.f64 (+.f64 (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))) (/.f64 M (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (*.f64 M M))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(-.f64 (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))
(-.f64 (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))
(-.f64 (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (/.f64 (+.f64 m n) #s(literal 2 binary64))))
(-.f64 (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 (+.f64 m n) #s(literal -2 binary64))))
(fma.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(fma.f64 (+.f64 m n) (*.f64 #s(literal -1/2 binary64) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))
(fma.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))
(fma.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) M (/.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(fma.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (/.f64 (+.f64 m n) #s(literal -2 binary64)) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))
(fma.f64 (*.f64 (+.f64 m n) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))) #s(literal -1/2 binary64) (*.f64 M (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64)))))
(pow.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) #s(literal 2 binary64))
(*.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))) (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))
(*.f64 (exp.f64 (log.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (exp.f64 (log.f64 (+.f64 M (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
(+.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))
(+.f64 (*.f64 n (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 m K) #s(literal -1/2 binary64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 m K)) (*.f64 n (/.f64 K #s(literal -2 binary64))))
(+.f64 (*.f64 (*.f64 m K) #s(literal -1/2 binary64)) (*.f64 n (/.f64 K #s(literal -2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(neg.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))
(/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))
(/.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 m n) K)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K)))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 m n) K)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) K) (/.f64 #s(literal 2 binary64) (+.f64 m n)))
(/.f64 (/.f64 K #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 m n)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K))) #s(literal 2 binary64))
(/.f64 (*.f64 K #s(literal -1 binary64)) (/.f64 #s(literal 2 binary64) (+.f64 m n)))
(pow.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K)) #s(literal -1 binary64))
(*.f64 (+.f64 m n) (/.f64 K #s(literal -2 binary64)))
(*.f64 (+.f64 m n) (neg.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 (+.f64 m n) (*.f64 (-.f64 #s(literal 0 binary64) K) #s(literal 1/2 binary64)))
(*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) K))
(*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))
(*.f64 (*.f64 (+.f64 m n) K) #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 m n) K)) #s(literal -1 binary64)))
(*.f64 #s(literal -1/2 binary64) (/.f64 K (/.f64 #s(literal 1 binary64) (+.f64 m n))))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))
(*.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) K)
(*.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 m n)) (/.f64 K #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)) #s(literal 1/2 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) K) (/.f64 (+.f64 m n) #s(literal 2 binary64)))
(*.f64 (/.f64 K #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 m n)))
(*.f64 (/.f64 K #s(literal -2 binary64)) (+.f64 m n))
(*.f64 (/.f64 K #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 m n))))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K))) #s(literal 1/2 binary64))
(*.f64 (/.f64 K #s(literal 1 binary64)) (/.f64 (+.f64 m n) #s(literal -2 binary64)))

simplify666.0ms (3.7%)

Algorithm
1×egg-herbie
Rules
6358×*-lowering-*.f32
6358×*-lowering-*.f64
3918×+-lowering-+.f64
3918×+-lowering-+.f32
1898×*-commutative
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0201833080
1716831524
0813131524
Stop Event
1×iter limit
1×node limit
Counts
1236 → 1236
Calls
Call 1
Inputs
(/ 1 (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))
(+ (/ 1 (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (/ (* M (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))
(+ (* M (- (* -1 (* M (+ (* -1 (/ (pow (+ m n) 2) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* 1/2 (/ (pow (+ m n) 2) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* 3/2 (/ 1 (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))))) (* -1 (/ (+ m n) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ 1 (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))
(+ (* M (- (* M (- (* -1 (* M (+ (* -1 (/ (+ m n) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1/6 (/ (pow (+ m n) 3) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* (+ m n) (+ (* -1 (/ (pow (+ m n) 2) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* 1/2 (/ (pow (+ m n) 2) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* 3/2 (/ 1 (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (+ 1 (* 1/2 (pow (+ m n) 2))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))))) (+ (* -1 (/ (pow (+ m n) 2) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* 1/2 (/ (pow (+ m n) 2) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* 3/2 (/ 1 (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))))) (* -1 (/ (+ m n) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ 1 (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))
(+ (* -1 (/ (* m (* (cos M) (- (* 1/2 n) M))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))
(+ (* m (- (* -1 (* m (+ (* -1 (/ (* (cos M) (pow (- (* 1/2 n) M) 2)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))) (/ (* (cos M) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))
(+ (* m (- (* m (- (* -1 (* m (+ (* -1 (* (+ (* -1 (/ (* (cos M) (pow (- (* 1/2 n) M) 2)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (- (* 1/2 n) M))) (+ (* -1 (/ (* (cos M) (* (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))) (- (* 1/2 n) M))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ (* 1/6 (pow (- (* 1/2 n) M) 3)) (* 1/4 (- (* 1/2 n) M)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))))) (+ (* -1 (/ (* (cos M) (pow (- (* 1/2 n) M) 2)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))) (/ (* (cos M) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))
(+ (* -1 (/ (* n (* (cos M) (- (* 1/2 m) M))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))
(+ (* n (- (* -1 (* n (+ (* -1 (/ (* (cos M) (pow (- (* 1/2 m) M) 2)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))) (/ (* (cos M) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))
(+ (* n (- (* n (- (* -1 (* n (+ (* -1 (* (+ (* -1 (/ (* (cos M) (pow (- (* 1/2 m) M) 2)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (- (* 1/2 m) M))) (+ (* -1 (/ (* (cos M) (* (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))) (- (* 1/2 m) M))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ (* 1/6 (pow (- (* 1/2 m) M) 3)) (* 1/4 (- (* 1/2 m) M)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))))) (+ (* -1 (/ (* (cos M) (pow (- (* 1/2 m) M) 2)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))) (/ (* (cos M) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))
(+ (* -1 (/ (* l (cos M)) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))
(+ (* l (- (* -1 (* l (+ (* -1 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))) (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))
(+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))) (+ (* -1/2 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/6 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))))) (+ (* -1 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))) (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
1
(+ 1 (* -1/2 (pow M 2)))
(+ 1 (* (pow M 2) (- (* 1/24 (pow M 2)) 1/2)))
(+ 1 (* (pow M 2) (- (* (pow M 2) (+ 1/24 (* -1/720 (pow M 2)))) 1/2)))
(cos M)
(cos M)
(cos M)
(cos M)
(cos M)
(cos M)
(cos M)
(cos M)
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))
(+ (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (* m (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (- (* 1/2 n) M))))
(+ (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (* m (+ (* m (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))))) (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (- (* 1/2 n) M)))))
(+ (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (* m (+ (* m (+ (* m (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (+ (* 1/6 (pow (- (* 1/2 n) M) 3)) (* 1/4 (- (* 1/2 n) M))))) (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))))) (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (- (* 1/2 n) M)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))
(exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))
(exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))
(exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))
(exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))
(+ (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (* n (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (- (* 1/2 m) M))))
(+ (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (* n (+ (* n (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))))) (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (- (* 1/2 m) M)))))
(+ (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (* n (+ (* n (+ (* n (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (+ (* 1/6 (pow (- (* 1/2 m) M) 3)) (* 1/4 (- (* 1/2 m) M))))) (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))))) (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (- (* 1/2 m) M)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))
(exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))
(exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))
(exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))
(exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))
(+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* -1 (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)))))
(+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* M (+ (* -1 (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n))) (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2))))))))
(+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* M (+ (* -1 (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n))) (* M (+ (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ (* -1 (+ m n)) (* -1/6 (pow (+ m n) 3))))) (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))))))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))
(+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))
(+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* 1/2 (* l (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))))
(+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (+ (* 1/6 (* l (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))
(exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))
(exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))
(exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))
(- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))
(- (+ l (+ (* m (- (* 1/2 n) M)) (pow (- (* 1/2 n) M) 2))) (fabs (- m n)))
(- (+ l (+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))) (fabs (- m n)))
(- (+ l (+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))) (fabs (- m n)))
(* 1/4 (pow m 2))
(* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))
(* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (+ (/ l (pow m 2)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2))))) (+ (/ M m) (/ (fabs (- m n)) (pow m 2)))))
(* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (+ (/ l (pow m 2)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2))))) (+ (/ M m) (/ (fabs (- m n)) (pow m 2)))))
(* 1/4 (pow m 2))
(* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (neg (+ n (* -1 m))))) m))) m))))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (neg (+ n (* -1 m))))) m))) m))))
(- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))
(- (+ l (+ (* n (- (* 1/2 m) M)) (pow (- (* 1/2 m) M) 2))) (fabs (- m n)))
(- (+ l (+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))) (fabs (- m n)))
(- (+ l (+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))) (fabs (- m n)))
(* 1/4 (pow n 2))
(* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))
(* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (+ (/ l (pow n 2)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2))))) (+ (/ M n) (/ (fabs (- m n)) (pow n 2)))))
(* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (+ (/ l (pow n 2)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2))))) (+ (/ M n) (/ (fabs (- m n)) (pow n 2)))))
(* 1/4 (pow n 2))
(* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (+ m (* -1 n)))) n))) n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (+ m (* -1 n)))) n))) n))))
(- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))
(- (+ l (+ (* -1 (* M (+ m n))) (* 1/4 (pow (+ m n) 2)))) (fabs (- m n)))
(- (+ l (+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))) (fabs (- m n)))
(- (+ l (+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))) (fabs (- m n)))
(pow M 2)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(* (pow M 2) (- (+ 1 (+ (* -1 (/ (+ m n) M)) (+ (* 1/4 (/ (pow (+ m n) 2) (pow M 2))) (/ l (pow M 2))))) (/ (fabs (- m n)) (pow M 2))))
(* (pow M 2) (- (+ 1 (+ (* -1 (/ (+ m n) M)) (+ (* 1/4 (/ (pow (+ m n) 2) (pow M 2))) (/ l (pow M 2))))) (/ (fabs (- m n)) (pow M 2))))
(pow M 2)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1 (/ (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))) M)))) M))))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1 (/ (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))) M)))) M))))
(- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))
(- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))
(- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))
(- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))
l
(* l (- (+ 1 (/ (pow (- (* 1/2 (+ m n)) M) 2) l)) (/ (fabs (- m n)) l)))
(* l (- (+ 1 (/ (pow (- (* 1/2 (+ m n)) M) 2) l)) (/ (fabs (- m n)) l)))
(* l (- (+ 1 (/ (pow (- (* 1/2 (+ m n)) M) 2) l)) (/ (fabs (- m n)) l)))
l
(* -1 (* l (- (* -1 (/ (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))) l)) 1)))
(* -1 (* l (- (* -1 (/ (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))) l)) 1)))
(* -1 (* l (- (* -1 (/ (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))) l)) 1)))
(/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n)))))
(+ (* -1 (/ (* M (sin (* -1/2 (* K (+ m n))))) (exp (- l (fabs (- m n)))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n))))))
(+ (* M (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n)))))) (* M (- (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n)))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n))))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n))))))
(+ (* M (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n)))))) (* M (- (+ (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n)))))) (* M (- (* 1/6 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n)))))) (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n))))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n))))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(+ (* 1/2 (/ (* K (* (sin M) (+ m n))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+ (* K (+ (* -1/8 (/ (* K (* (cos M) (pow (+ m n) 2))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* 1/2 (/ (* (sin M) (+ m n)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+ (* K (+ (* 1/2 (/ (* (sin M) (+ m n)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* K (+ (* -1/8 (/ (* (cos M) (pow (+ m n) 2)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* -1/48 (/ (* K (* (sin M) (pow (+ m n) 3))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+ (* m (+ (* -1/8 (/ (* (pow K 2) (* m (cos (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+ (* m (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* m (+ (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* -1/48 (/ (* (pow K 3) (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m)))))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m)))))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m)))))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m)))))))
(/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(+ (* 1/2 (/ (* K (* n (sin (+ M (* -1/2 (* K m)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+ (* n (+ (* -1/8 (/ (* (pow K 2) (* n (cos (+ M (* -1/2 (* K m)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+ (* n (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* n (+ (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* -1/48 (/ (* (pow K 3) (* n (sin (+ M (* -1/2 (* K m)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n)))))
(+ (* -1 (/ (* l (cos (+ M (* -1/2 (* K (+ m n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n))))))
(+ (* l (- (* -1 (* l (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n))))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n))))))
(+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n)))))))) (+ (* -1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n)))))) (* 1/6 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n)))))))))) (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n))))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))
(cos (* -1/2 (* K (+ m n))))
(+ (cos (* -1/2 (* K (+ m n)))) (* -1 (* M (sin (* -1/2 (* K (+ m n)))))))
(+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K (+ m n)))))) (sin (* -1/2 (* K (+ m n)))))))
(+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* 1/6 (* M (sin (* -1/2 (* K (+ m n)))))))) (sin (* -1/2 (* K (+ m n)))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos M)
(+ (cos M) (* 1/2 (* K (* (sin M) (+ m n)))))
(+ (cos M) (* K (- (* -1/8 (* K (* (cos M) (pow (+ m n) 2)))) (* -1/2 (* (sin M) (+ m n))))))
(+ (cos M) (* K (- (* K (+ (* -1/8 (* (cos M) (pow (+ m n) 2))) (* -1/48 (* K (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K n))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* -1/8 (* (pow K 2) (* m (cos (+ M (* -1/2 (* K n))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/48 (* (pow K 3) (* m (sin (+ M (* -1/2 (* K n))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos (+ M (* -1/2 (* K m))))
(+ (cos (+ M (* -1/2 (* K m)))) (* 1/2 (* K (* n (sin (+ M (* -1/2 (* K m))))))))
(+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* -1/8 (* (pow K 2) (* n (cos (+ M (* -1/2 (* K m))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))
(+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/48 (* (pow K 3) (* n (sin (+ M (* -1/2 (* K m))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(* -1/2 (* K (+ m n)))
(+ M (* -1/2 (* K (+ m n))))
(+ M (* -1/2 (* K (+ m n))))
(+ M (* -1/2 (* K (+ m n))))
M
(* M (+ 1 (* -1/2 (/ (* K (+ m n)) M))))
(* M (+ 1 (* -1/2 (/ (* K (+ m n)) M))))
(* M (+ 1 (* -1/2 (/ (* K (+ m n)) M))))
M
(* -1 (* M (- (* 1/2 (/ (* K (+ m n)) M)) 1)))
(* -1 (* M (- (* 1/2 (/ (* K (+ m n)) M)) 1)))
(* -1 (* M (- (* 1/2 (/ (* K (+ m n)) M)) 1)))
M
(+ M (* -1/2 (* K (+ m n))))
(+ M (* -1/2 (* K (+ m n))))
(+ M (* -1/2 (* K (+ m n))))
(* -1/2 (* K (+ m n)))
(* K (+ (* -1/2 (+ m n)) (/ M K)))
(* K (+ (* -1/2 (+ m n)) (/ M K)))
(* K (+ (* -1/2 (+ m n)) (/ M K)))
(* -1/2 (* K (+ m n)))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 (+ m n)))))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 (+ m n)))))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 (+ m n)))))
(+ M (* -1/2 (* K n)))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(* -1/2 (* K m))
(* m (+ (* -1/2 K) (+ (* -1/2 (/ (* K n) m)) (/ M m))))
(* m (+ (* -1/2 K) (+ (* -1/2 (/ (* K n) m)) (/ M m))))
(* m (+ (* -1/2 K) (+ (* -1/2 (/ (* K n) m)) (/ M m))))
(* -1/2 (* K m))
(* -1 (* m (+ (* -1 (/ (+ M (* -1/2 (* K n))) m)) (* 1/2 K))))
(* -1 (* m (+ (* -1 (/ (+ M (* -1/2 (* K n))) m)) (* 1/2 K))))
(* -1 (* m (+ (* -1 (/ (+ M (* -1/2 (* K n))) m)) (* 1/2 K))))
(+ M (* -1/2 (* K m)))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(* -1/2 (* K n))
(* n (+ (* -1/2 K) (+ (* -1/2 (/ (* K m) n)) (/ M n))))
(* n (+ (* -1/2 K) (+ (* -1/2 (/ (* K m) n)) (/ M n))))
(* n (+ (* -1/2 K) (+ (* -1/2 (/ (* K m) n)) (/ M n))))
(* -1/2 (* K n))
(* -1 (* n (+ (* -1 (/ (+ M (* -1/2 (* K m))) n)) (* 1/2 K))))
(* -1 (* n (+ (* -1 (/ (+ M (* -1/2 (* K m))) n)) (* 1/2 K))))
(* -1 (* n (+ (* -1 (/ (+ M (* -1/2 (* K m))) n)) (* 1/2 K))))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K n))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(* -1/2 (* K m))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(* -1/2 (* K m))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(* -1/2 (* K m))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(* -1/2 (* K n))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(* -1/2 (* K n))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(+ (* M (- (* -1 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* -1 (/ (* n (cos (* -1/2 (* K n)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))) (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))
(+ (* M (- (+ (* -1 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* M (- (* -1/2 (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (+ (* -1 (* n (- (* -1 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* -1 (/ (* n (cos (* -1/2 (* K n)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (/ (* (cos (* -1/2 (* K n))) (+ 1 (* 1/2 (pow n 2)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (* -1 (/ (* n (cos (* -1/2 (* K n)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))) (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))
(+ (* M (- (+ (* -1 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* M (- (+ (* -1/2 (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* M (- (* 1/6 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (+ (* -1 (* n (- (* -1/2 (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (+ (* -1 (* n (- (* -1 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* -1 (/ (* n (cos (* -1/2 (* K n)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (/ (* (cos (* -1/2 (* K n))) (+ 1 (* 1/2 (pow n 2)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (+ (* (+ 1 (* 1/2 (pow n 2))) (- (* -1 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* -1 (/ (* n (cos (* -1/2 (* K n)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))) (/ (* (cos (* -1/2 (* K n))) (+ (* -1 n) (* -1/6 (pow n 3)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))))) (+ (* -1 (* n (- (* -1 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* -1 (/ (* n (cos (* -1/2 (* K n)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (/ (* (cos (* -1/2 (* K n))) (+ 1 (* 1/2 (pow n 2)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (* -1 (/ (* n (cos (* -1/2 (* K n)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))) (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (- (* -1/2 (* K n)) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m)))))
(/ (cos (- (* -1/2 (* K n)) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m)))))
(/ (cos (- (* -1/2 (* K n)) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m)))))
(/ (cos (- (* -1/2 (* K n)) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m)))))
(/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- n m)))))
(+ (* n (- (* 1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* -1 (/ (* M (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- n m))))))
(+ (* n (- (+ (* 1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* n (- (* -1/8 (/ (* (pow K 2) (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (+ (* -1 (* M (- (* 1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* -1 (/ (* M (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m))))))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow M 2)))) (exp (- (+ l (pow M 2)) (fabs (- n m))))))))) (* -1 (/ (* M (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- n m))))))
(+ (* n (- (+ (* 1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* n (- (+ (* -1/8 (/ (* (pow K 2) (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* n (- (* -1/48 (/ (* (pow K 3) (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (+ (* -1 (* M (- (* -1/8 (/ (* (pow K 2) (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (+ (* -1 (* M (- (* 1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* -1 (/ (* M (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m))))))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow M 2)))) (exp (- (+ l (pow M 2)) (fabs (- n m))))))))) (+ (* (+ 1/4 (* 1/2 (pow M 2))) (- (* 1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* -1 (/ (* M (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))))) (/ (* (cos M) (+ (* -1/4 M) (* -1/6 (pow M 3)))) (exp (- (+ l (pow M 2)) (fabs (- n m)))))))))) (+ (* -1 (* M (- (* 1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* -1 (/ (* M (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m))))))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow M 2)))) (exp (- (+ l (pow M 2)) (fabs (- n m))))))))) (* -1 (/ (* M (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- n m))))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n)))))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n)))))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n)))))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n)))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(+ (* 1/2 (/ (* K (* n (sin M))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))))
(+ (* K (+ (* -1/8 (/ (* K (* (pow n 2) (cos M))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))) (* 1/2 (/ (* n (sin M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))))
(+ (* K (+ (* 1/2 (/ (* n (sin M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))) (* K (+ (* -1/8 (/ (* (pow n 2) (cos M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))) (* -1/48 (/ (* K (* (pow n 3) (sin M))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))
(+ (* -1 (/ (* l (cos (+ M (* -1/2 (* K n))))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))
(+ (* l (- (* -1 (* l (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))
(+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))))) (+ (* -1/2 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))) (* 1/6 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))))))) (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m))))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m))))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m))))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m))))))
(cos (* -1/2 (* K n)))
(+ (cos (* -1/2 (* K n))) (* -1 (* M (sin (* -1/2 (* K n))))))
(+ (cos (* -1/2 (* K n))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K n))))) (sin (* -1/2 (* K n))))))
(+ (cos (* -1/2 (* K n))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K n)))) (* 1/6 (* M (sin (* -1/2 (* K n))))))) (sin (* -1/2 (* K n))))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos M)
(+ (cos M) (* 1/2 (* K (* n (sin M)))))
(+ (cos M) (* n (- (* -1/8 (* (pow K 2) (* n (cos M)))) (* -1/2 (* K (sin M))))))
(+ (cos M) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos M))) (* -1/48 (* (pow K 3) (* n (sin M)))))) (* -1/2 (* K (sin M))))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos M)
(+ (cos M) (* 1/2 (* K (* n (sin M)))))
(+ (cos M) (* K (- (* -1/8 (* K (* (pow n 2) (cos M)))) (* -1/2 (* n (sin M))))))
(+ (cos M) (* K (- (* K (+ (* -1/8 (* (pow n 2) (cos M))) (* -1/48 (* K (* (pow n 3) (sin M)))))) (* -1/2 (* n (sin M))))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(* -1/2 (* K n))
(+ M (* -1/2 (* K n)))
(+ M (* -1/2 (* K n)))
(+ M (* -1/2 (* K n)))
M
(* M (+ 1 (* -1/2 (/ (* K n) M))))
(* M (+ 1 (* -1/2 (/ (* K n) M))))
(* M (+ 1 (* -1/2 (/ (* K n) M))))
M
(* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))
(* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))
(* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))
M
(+ M (* -1/2 (* K n)))
(+ M (* -1/2 (* K n)))
(+ M (* -1/2 (* K n)))
(* -1/2 (* K n))
(* n (+ (* -1/2 K) (/ M n)))
(* n (+ (* -1/2 K) (/ M n)))
(* n (+ (* -1/2 K) (/ M n)))
(* -1/2 (* K n))
(* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))
(* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))
(* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))
M
(+ M (* -1/2 (* K n)))
(+ M (* -1/2 (* K n)))
(+ M (* -1/2 (* K n)))
(* -1/2 (* K n))
(* K (+ (* -1/2 n) (/ M K)))
(* K (+ (* -1/2 n) (/ M K)))
(* K (+ (* -1/2 n) (/ M K)))
(* -1/2 (* K n))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))
(+ (* -1 (/ (* l (cos (+ M (* -1/2 (* K (+ m n)))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))
(+ (* l (- (* -1 (* l (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))
(+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))) (+ (* -1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (* 1/6 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))))) (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))
(+ (* m (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K n)))) (+ M (* -1/2 n))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))
(+ (* m (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* m (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (+ (* -1 (* (+ M (* -1/2 n)) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K n)))) (+ M (* -1/2 n))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K n)))) (+ M (* -1/2 n))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))
(+ (* m (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* m (- (+ (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* m (- (* -1/48 (/ (* (pow K 3) (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (+ (* -1 (* (+ M (* -1/2 n)) (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (+ (* -1 (* (+ M (* -1/2 n)) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K n)))) (+ M (* -1/2 n))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))))) (+ (* (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2))) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K n)))) (+ M (* -1/2 n))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ (* -1/4 (+ M (* -1/2 n))) (* -1/6 (pow (+ M (* -1/2 n)) 3)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))))) (+ (* -1 (* (+ M (* -1/2 n)) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K n)))) (+ M (* -1/2 n))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K n)))) (+ M (* -1/2 n))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))
(/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))
(+ (* n (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K m)))) (+ M (* -1/2 m))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))
(+ (* n (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* n (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (+ (* -1 (* (+ M (* -1/2 m)) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K m)))) (+ M (* -1/2 m))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K m)))) (+ M (* -1/2 m))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))
(+ (* n (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* n (- (+ (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* n (- (* -1/48 (/ (* (pow K 3) (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (+ (* -1 (* (+ M (* -1/2 m)) (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (+ (* -1 (* (+ M (* -1/2 m)) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K m)))) (+ M (* -1/2 m))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))))) (+ (* (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2))) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K m)))) (+ M (* -1/2 m))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ (* -1/4 (+ M (* -1/2 m))) (* -1/6 (pow (+ M (* -1/2 m)) 3)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))))) (+ (* -1 (* (+ M (* -1/2 m)) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K m)))) (+ M (* -1/2 m))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K m)))) (+ M (* -1/2 m))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))
(/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))
(+ (* M (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))
(+ (* M (- (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1 (* (+ m n) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))
(+ (* M (- (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (+ (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (* 1/6 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1 (* (+ m n) (- (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1 (* (+ m n) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (+ (* (+ 1 (* 1/2 (pow (+ m n) 2))) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ (* -1 (+ m n)) (* -1/6 (pow (+ m n) 3)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))))) (+ (* -1 (* (+ m n) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(+ (* 1/2 (/ (* K (* (sin M) (+ m n))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))) (/ (cos M) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(+ (* K (+ (* -1/8 (/ (* K (* (cos M) (pow (+ m n) 2))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))) (* 1/2 (/ (* (sin M) (+ m n)) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(+ (* K (+ (* 1/2 (/ (* (sin M) (+ m n)) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))) (* K (+ (* -1/8 (/ (* (cos M) (pow (+ m n) 2)) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))) (* -1/48 (/ (* K (* (sin M) (pow (+ m n) 3))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))))))) (/ (cos M) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(+ (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n)))))) (/ (* l (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))) (cos (+ M (* -1/2 (* K (+ m n)))))))
(+ (* l (+ (* 1/2 (/ (* l (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))) (cos (+ M (* -1/2 (* K (+ m n))))))) (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n)))))))) (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n)))))))
(+ (* l (+ (* l (+ (* 1/6 (/ (* l (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))) (cos (+ M (* -1/2 (* K (+ m n))))))) (* 1/2 (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))))) (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n)))))))) (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n)))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K n)))))
(+ (* m (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K n))))))
(+ (* m (- (+ (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))) (cos (+ M (* -1/2 (* K n)))))) (* m (- (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2)))) (cos (+ M (* -1/2 (* K n))))) (+ (* -1/8 (/ (* (pow K 2) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K n)))) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2)))))) (cos (+ M (* -1/2 (* K n)))))))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K n))))))
(+ (* m (- (+ (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))) (cos (+ M (* -1/2 (* K n)))))) (* m (- (+ (* m (- (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ (* -1/4 (+ M (* -1/2 n))) (* -1/6 (pow (+ M (* -1/2 n)) 3)))) (cos (+ M (* -1/2 (* K n))))) (+ (* -1/8 (* (pow K 2) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2)))))) (+ (* -1/48 (/ (* (pow K 3) (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K n)))) (- (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2)))) (cos (+ M (* -1/2 (* K n))))) (+ (* -1/8 (/ (* (pow K 2) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K n)))) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2)))))) (cos (+ M (* -1/2 (* K n)))))))))) (cos (+ M (* -1/2 (* K n)))))))))) (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2)))) (cos (+ M (* -1/2 (* K n)))))) (+ (* -1/8 (/ (* (pow K 2) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K n)))) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2)))))) (cos (+ M (* -1/2 (* K n)))))))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K m)))))
(+ (* n (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K m))))))
(+ (* n (- (+ (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))) (cos (+ M (* -1/2 (* K m)))))) (* n (- (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2)))) (cos (+ M (* -1/2 (* K m))))) (+ (* -1/8 (/ (* (pow K 2) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K m)))) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2)))))) (cos (+ M (* -1/2 (* K m)))))))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K m))))))
(+ (* n (- (+ (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))) (cos (+ M (* -1/2 (* K m)))))) (* n (- (+ (* n (- (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ (* -1/4 (+ M (* -1/2 m))) (* -1/6 (pow (+ M (* -1/2 m)) 3)))) (cos (+ M (* -1/2 (* K m))))) (+ (* -1/8 (* (pow K 2) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2)))))) (+ (* -1/48 (/ (* (pow K 3) (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K m)))) (- (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2)))) (cos (+ M (* -1/2 (* K m))))) (+ (* -1/8 (/ (* (pow K 2) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K m)))) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2)))))) (cos (+ M (* -1/2 (* K m)))))))))) (cos (+ M (* -1/2 (* K m)))))))))) (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2)))) (cos (+ M (* -1/2 (* K m)))))) (+ (* -1/8 (/ (* (pow K 2) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K m)))) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2)))))) (cos (+ M (* -1/2 (* K m)))))))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K m))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))
(/ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (cos (* -1/2 (* K (+ m n)))))
(+ (* M (- (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)) (cos (* -1/2 (* K (+ m n)))))) (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (/ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (cos (* -1/2 (* K (+ m n))))))
(+ (* M (- (+ (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)) (cos (* -1/2 (* K (+ m n)))))) (* M (- (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (cos (* -1/2 (* K (+ m n))))) (+ (* -1 (/ (* (sin (* -1/2 (* K (+ m n)))) (- (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)) (cos (* -1/2 (* K (+ m n)))))) (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (cos (* -1/2 (* K (+ m n)))))) (* -1/2 (/ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (cos (* -1/2 (* K (+ m n)))))))))) (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (/ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (cos (* -1/2 (* K (+ m n))))))
(+ (* M (- (+ (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)) (cos (* -1/2 (* K (+ m n)))))) (* M (- (+ (* M (- (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ (* -1 (+ m n)) (* -1/6 (pow (+ m n) 3)))) (cos (* -1/2 (* K (+ m n))))) (+ (* -1 (/ (* (sin (* -1/2 (* K (+ m n)))) (- (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (cos (* -1/2 (* K (+ m n))))) (+ (* -1 (/ (* (sin (* -1/2 (* K (+ m n)))) (- (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)) (cos (* -1/2 (* K (+ m n)))))) (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (cos (* -1/2 (* K (+ m n)))))) (* -1/2 (/ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (cos (* -1/2 (* K (+ m n))))))))) (cos (* -1/2 (* K (+ m n)))))) (+ (* -1/2 (- (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)) (cos (* -1/2 (* K (+ m n)))))) (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (* 1/6 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))))) (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (cos (* -1/2 (* K (+ m n)))))) (+ (* -1 (/ (* (sin (* -1/2 (* K (+ m n)))) (- (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)) (cos (* -1/2 (* K (+ m n)))))) (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (cos (* -1/2 (* K (+ m n)))))) (* -1/2 (/ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (cos (* -1/2 (* K (+ m n)))))))))) (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (/ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (cos (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))
(/ (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))
(/ (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))
(/ (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos M))
(+ (* -1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (sin M) (+ m n)))) (pow (cos M) 2))) (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos M)))
(+ (* K (- (* -1 (* K (+ (* -1/4 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (pow (sin M) 2) (pow (+ m n) 2))) (pow (cos M) 3))) (* -1/8 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (pow (+ m n) 2)) (cos M)))))) (* 1/2 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (sin M) (+ m n))) (pow (cos M) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos M)))
(+ (* K (- (* K (- (* -1 (* K (+ (* -1/2 (/ (* (sin M) (* (+ m n) (+ (* -1/4 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (pow (sin M) 2) (pow (+ m n) 2))) (pow (cos M) 3))) (* -1/8 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (pow (+ m n) 2)) (cos M)))))) (cos M))) (+ (* -1/48 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (sin M) (pow (+ m n) 3))) (pow (cos M) 2))) (* 1/16 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (sin M) (pow (+ m n) 3))) (pow (cos M) 2))))))) (+ (* -1/4 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (pow (sin M) 2) (pow (+ m n) 2))) (pow (cos M) 3))) (* -1/8 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (pow (+ m n) 2)) (cos M)))))) (* 1/2 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (sin M) (+ m n))) (pow (cos M) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos M)))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))
(+ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (* l (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))
(+ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (* l (+ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (* 1/2 (* l (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))))
(+ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (* l (+ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (* l (+ (* 1/6 (* l (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (* 1/2 (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))
(exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))
(exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))
(exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))
(exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))
(+ (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (* -1 (* m (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))))))
(+ (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (* m (+ (* -1 (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n)))) (* m (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2))))))))
(+ (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (* m (+ (* -1 (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n)))) (* m (+ (* m (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ (* -1/4 (+ M (* -1/2 n))) (* -1/6 (pow (+ M (* -1/2 n)) 3))))) (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2)))))))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))
(exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))
(exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))
(exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))
(exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))
(+ (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (* -1 (* n (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))))))
(+ (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (* n (+ (* -1 (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m)))) (* n (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2))))))))
(+ (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (* n (+ (* -1 (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m)))) (* n (+ (* n (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ (* -1/4 (+ M (* -1/2 m))) (* -1/6 (pow (+ M (* -1/2 m)) 3))))) (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2)))))))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))
(exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))
(exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))
(exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))
(exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))
(+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* -1 (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)))))
(+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* M (+ (* -1 (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n))) (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2))))))))
(+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* M (+ (* -1 (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n))) (* M (+ (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ (* -1 (+ m n)) (* -1/6 (pow (+ m n) 3))))) (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))))))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))
(exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))
(- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))
(- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))
(- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))
(- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))
l
(* l (- (+ 1 (/ (pow (+ M (* -1/2 (+ m n))) 2) l)) (/ (fabs (- m n)) l)))
(* l (- (+ 1 (/ (pow (+ M (* -1/2 (+ m n))) 2) l)) (/ (fabs (- m n)) l)))
(* l (- (+ 1 (/ (pow (+ M (* -1/2 (+ m n))) 2) l)) (/ (fabs (- m n)) l)))
l
(* -1 (* l (- (* -1 (/ (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))) l)) 1)))
(* -1 (* l (- (* -1 (/ (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))) l)) 1)))
(* -1 (* l (- (* -1 (/ (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))) l)) 1)))
(- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))
(- (+ l (+ (* -1 (* m (+ M (* -1/2 n)))) (pow (+ M (* -1/2 n)) 2))) (fabs (- m n)))
(- (+ l (+ (* m (+ (* -1 (+ M (* -1/2 n))) (* 1/4 m))) (pow (+ M (* -1/2 n)) 2))) (fabs (- m n)))
(- (+ l (+ (* m (+ (* -1 (+ M (* -1/2 n))) (* 1/4 m))) (pow (+ M (* -1/2 n)) 2))) (fabs (- m n)))
(* 1/4 (pow m 2))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 n)) m))))
(* (pow m 2) (- (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 n)) m)) (+ (/ l (pow m 2)) (/ (pow (+ M (* -1/2 n)) 2) (pow m 2))))) (/ (fabs (- m n)) (pow m 2))))
(* (pow m 2) (- (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 n)) m)) (+ (/ l (pow m 2)) (/ (pow (+ M (* -1/2 n)) 2) (pow m 2))))) (/ (fabs (- m n)) (pow m 2))))
(* 1/4 (pow m 2))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 n)) m))))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ n (* -1 m))))) m)) (* -1/2 n))) m))))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ n (* -1 m))))) m)) (* -1/2 n))) m))))
(- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))
(- (+ l (+ (* -1 (* n (+ M (* -1/2 m)))) (pow (+ M (* -1/2 m)) 2))) (fabs (- m n)))
(- (+ l (+ (* n (+ (* -1 (+ M (* -1/2 m))) (* 1/4 n))) (pow (+ M (* -1/2 m)) 2))) (fabs (- m n)))
(- (+ l (+ (* n (+ (* -1 (+ M (* -1/2 m))) (* 1/4 n))) (pow (+ M (* -1/2 m)) 2))) (fabs (- m n)))
(* 1/4 (pow n 2))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 m)) n))))
(* (pow n 2) (- (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 m)) n)) (+ (/ l (pow n 2)) (/ (pow (+ M (* -1/2 m)) 2) (pow n 2))))) (/ (fabs (- m n)) (pow n 2))))
(* (pow n 2) (- (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 m)) n)) (+ (/ l (pow n 2)) (/ (pow (+ M (* -1/2 m)) 2) (pow n 2))))) (/ (fabs (- m n)) (pow n 2))))
(* 1/4 (pow n 2))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 m)) n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (+ m (* -1 n)))) n)) (* -1/2 m))) n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (+ m (* -1 n)))) n)) (* -1/2 m))) n))))
(- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))
(- (+ l (+ (* -1 (* M (+ m n))) (* 1/4 (pow (+ m n) 2)))) (fabs (- m n)))
(- (+ l (+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))) (fabs (- m n)))
(- (+ l (+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))) (fabs (- m n)))
(pow M 2)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(* (pow M 2) (- (+ 1 (+ (* -1 (/ (+ m n) M)) (+ (* 1/4 (/ (pow (+ m n) 2) (pow M 2))) (/ l (pow M 2))))) (/ (fabs (- m n)) (pow M 2))))
(* (pow M 2) (- (+ 1 (+ (* -1 (/ (+ m n) M)) (+ (* 1/4 (/ (pow (+ m n) 2) (pow M 2))) (/ l (pow M 2))))) (/ (fabs (- m n)) (pow M 2))))
(pow M 2)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1 (/ (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))) M)))) M))))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1 (/ (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))) M)))) M))))
(exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))
(+ (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))) (* -1 (* l (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))))
(+ (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))) (* l (+ (* -1 (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (* 1/2 (* l (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))))))
(+ (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))) (* l (+ (* -1 (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (* l (+ (* -1/6 (* l (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))) (* 1/2 (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))
(exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))
(exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))
(exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))
(+ (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (* m (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ M (* -1/2 n)))))
(+ (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (* m (+ (* m (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 n)) 2)) 1/4))) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ M (* -1/2 n))))))
(+ (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (* m (+ (* m (+ (* m (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ (* -1/4 (+ M (* -1/2 n))) (* 1/6 (pow (+ M (* -1/2 n)) 3))))) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 n)) 2)) 1/4)))) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ M (* -1/2 n))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))
(+ (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (* n (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ M (* -1/2 m)))))
(+ (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (* n (+ (* n (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 m)) 2)) 1/4))) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ M (* -1/2 m))))))
(+ (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (* n (+ (* n (+ (* n (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ (* -1/4 (+ M (* -1/2 m))) (* 1/6 (pow (+ M (* -1/2 m)) 3))))) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 m)) 2)) 1/4)))) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ M (* -1/2 m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))
(exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))
(+ (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (* M (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ m n))))
(+ (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (* M (+ (* M (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (- (* 1/2 (pow (+ m n) 2)) 1))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ m n)))))
(+ (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (* M (+ (* M (+ (* M (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ (* -1 (+ m n)) (* 1/6 (pow (+ m n) 3))))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (- (* 1/2 (pow (+ m n) 2)) 1)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ m n)))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))
(exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))
(exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))
(exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))
(* (cos (neg M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))) (* (sin (neg M)) (+ m n))))) (* (cos (neg M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))))
(+ (* K (+ (* -1/2 (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))) (* (sin (neg M)) (+ m n)))) (* -1/8 (* K (* (cos (neg M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))) (pow (+ m n) 2))))))) (* (cos (neg M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))))
(+ (* K (+ (* -1/2 (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))) (* (sin (neg M)) (+ m n)))) (* K (+ (* -1/8 (* (cos (neg M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))) (pow (+ m n) 2)))) (* 1/48 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))) (* (sin (neg M)) (pow (+ m n) 3))))))))) (* (cos (neg M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K n)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))
(+ (* m (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K n)) M))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ M (* -1/2 n)))))) (* (cos (- (* 1/2 (* K n)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))
(+ (* m (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K n)) M))))) (+ (* m (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (* (sin (- (* 1/2 (* K n)) M)) (+ M (* -1/2 n)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K n)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 n)) 2)) 1/4)))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ M (* -1/2 n))))))) (* (cos (- (* 1/2 (* K n)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))
(+ (* m (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K n)) M))))) (+ (* m (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (* (sin (- (* 1/2 (* K n)) M)) (+ M (* -1/2 n)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K n)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))) (+ (* m (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (* (sin (- (* 1/2 (* K n)) M)) (- (* 1/2 (pow (+ M (* -1/2 n)) 2)) 1/4))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ M (* -1/2 n)))))) (+ (* 1/48 (* (pow K 3) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K n)) M))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ (* -1/4 (+ M (* -1/2 n))) (* 1/6 (pow (+ M (* -1/2 n)) 3))))))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 n)) 2)) 1/4))))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ M (* -1/2 n))))))) (* (cos (- (* 1/2 (* K n)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))))
(* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))))
(* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))))
(* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))))
(* (cos (- (* 1/2 (* K m)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))
(+ (* n (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K m)) M))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ M (* -1/2 m)))))) (* (cos (- (* 1/2 (* K m)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))
(+ (* n (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K m)) M))))) (+ (* n (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (* (sin (- (* 1/2 (* K m)) M)) (+ M (* -1/2 m)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K m)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 m)) 2)) 1/4)))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ M (* -1/2 m))))))) (* (cos (- (* 1/2 (* K m)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))
(+ (* n (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K m)) M))))) (+ (* n (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (* (sin (- (* 1/2 (* K m)) M)) (+ M (* -1/2 m)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K m)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))) (+ (* n (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (* (sin (- (* 1/2 (* K m)) M)) (- (* 1/2 (pow (+ M (* -1/2 m)) 2)) 1/4))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ M (* -1/2 m)))))) (+ (* 1/48 (* (pow K 3) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K m)) M))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ (* -1/4 (+ M (* -1/2 m))) (* 1/6 (pow (+ M (* -1/2 m)) 3))))))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 m)) 2)) 1/4))))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ M (* -1/2 m))))))) (* (cos (- (* 1/2 (* K m)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))))
(* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))))
(* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))))
(* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))))
(* (cos (* 1/2 (* K (+ m n)))) (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))
(+ (* M (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ m n))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (sin (* 1/2 (* K (+ m n))))))) (* (cos (* 1/2 (* K (+ m n)))) (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))
(+ (* M (+ (* M (+ (* -1/2 (* (cos (* 1/2 (* K (+ m n)))) (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (- (* 1/2 (pow (+ m n) 2)) 1))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (* (sin (* 1/2 (* K (+ m n)))) (+ m n)))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ m n))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (sin (* 1/2 (* K (+ m n)))))))) (* (cos (* 1/2 (* K (+ m n)))) (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))
(+ (* M (+ (* M (+ (* -1/2 (* (cos (* 1/2 (* K (+ m n)))) (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))) (+ (* M (+ (* -1/2 (* (cos (* 1/2 (* K (+ m n)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ m n)))) (+ (* -1/6 (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (sin (* 1/2 (* K (+ m n)))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ (* -1 (+ m n)) (* 1/6 (pow (+ m n) 3))))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (* (sin (* 1/2 (* K (+ m n)))) (- (* 1/2 (pow (+ m n) 2)) 1))))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (- (* 1/2 (pow (+ m n) 2)) 1))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (* (sin (* 1/2 (* K (+ m n)))) (+ m n))))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ m n))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (sin (* 1/2 (* K (+ m n)))))))) (* (cos (* 1/2 (* K (+ m n)))) (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))))
(* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))))
(* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))))
(* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))
(+ (* -1 (* l (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))) (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))
(+ (* l (+ (* -1 (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))) (* 1/2 (* l (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))))) (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))
(+ (* l (+ (* -1 (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))) (* l (+ (* -1/6 (* l (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))) (* 1/2 (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))))))) (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))))
(cos (neg M))
(+ (cos (neg M)) (* -1/2 (* K (* (sin (neg M)) (+ m n)))))
(+ (cos (neg M)) (* K (- (* -1/8 (* K (* (cos (neg M)) (pow (+ m n) 2)))) (* 1/2 (* (sin (neg M)) (+ m n))))))
(+ (cos (neg M)) (* K (- (* K (+ (* -1/8 (* (cos (neg M)) (pow (+ m n) 2))) (* 1/48 (* K (* (sin (neg M)) (pow (+ m n) 3)))))) (* 1/2 (* (sin (neg M)) (+ m n))))))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K n)) M))
(+ (cos (- (* 1/2 (* K n)) M)) (* -1/2 (* K (* m (sin (- (* 1/2 (* K n)) M))))))
(+ (cos (- (* 1/2 (* K n)) M)) (* m (- (* -1/8 (* (pow K 2) (* m (cos (- (* 1/2 (* K n)) M))))) (* 1/2 (* K (sin (- (* 1/2 (* K n)) M)))))))
(+ (cos (- (* 1/2 (* K n)) M)) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (- (* 1/2 (* K n)) M)))) (* 1/48 (* (pow K 3) (* m (sin (- (* 1/2 (* K n)) M))))))) (* 1/2 (* K (sin (- (* 1/2 (* K n)) M)))))))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (- n (* -1 m)))) M))
(cos (- (* 1/2 (* K (- n (* -1 m)))) M))
(cos (- (* 1/2 (* K (- n (* -1 m)))) M))
(cos (- (* 1/2 (* K (- n (* -1 m)))) M))
(cos (- (* 1/2 (* K m)) M))
(+ (cos (- (* 1/2 (* K m)) M)) (* -1/2 (* K (* n (sin (- (* 1/2 (* K m)) M))))))
(+ (cos (- (* 1/2 (* K m)) M)) (* n (- (* -1/8 (* (pow K 2) (* n (cos (- (* 1/2 (* K m)) M))))) (* 1/2 (* K (sin (- (* 1/2 (* K m)) M)))))))
(+ (cos (- (* 1/2 (* K m)) M)) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (- (* 1/2 (* K m)) M)))) (* 1/48 (* (pow K 3) (* n (sin (- (* 1/2 (* K m)) M))))))) (* 1/2 (* K (sin (- (* 1/2 (* K m)) M)))))))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (- m (* -1 n)))) M))
(cos (- (* 1/2 (* K (- m (* -1 n)))) M))
(cos (- (* 1/2 (* K (- m (* -1 n)))) M))
(cos (- (* 1/2 (* K (- m (* -1 n)))) M))
(cos (* 1/2 (* K (+ m n))))
(+ (cos (* 1/2 (* K (+ m n)))) (* M (sin (* 1/2 (* K (+ m n))))))
(+ (cos (* 1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* 1/2 (* K (+ m n)))))) (* -1 (sin (* 1/2 (* K (+ m n))))))))
(+ (cos (* 1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* 1/2 (* K (+ m n))))) (* -1/6 (* M (sin (* 1/2 (* K (+ m n)))))))) (* -1 (sin (* 1/2 (* K (+ m n))))))))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))
(cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))
(cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))
(cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))
(* -1 M)
(- (* 1/2 (* K (+ m n))) M)
(- (* 1/2 (* K (+ m n))) M)
(- (* 1/2 (* K (+ m n))) M)
(* 1/2 (* K (+ m n)))
(* K (+ (* -1 (/ M K)) (* 1/2 (+ m n))))
(* K (+ (* -1 (/ M K)) (* 1/2 (+ m n))))
(* K (+ (* -1 (/ M K)) (* 1/2 (+ m n))))
(* 1/2 (* K (+ m n)))
(* -1 (* K (+ (* -1/2 (+ m n)) (/ M K))))
(* -1 (* K (+ (* -1/2 (+ m n)) (/ M K))))
(* -1 (* K (+ (* -1/2 (+ m n)) (/ M K))))
(- (* 1/2 (* K n)) M)
(- (+ (* 1/2 (* K m)) (* 1/2 (* K n))) M)
(- (+ (* 1/2 (* K m)) (* 1/2 (* K n))) M)
(- (+ (* 1/2 (* K m)) (* 1/2 (* K n))) M)
(* 1/2 (* K m))
(* m (- (+ (* 1/2 K) (* 1/2 (/ (* K n) m))) (/ M m)))
(* m (- (+ (* 1/2 K) (* 1/2 (/ (* K n) m))) (/ M m)))
(* m (- (+ (* 1/2 K) (* 1/2 (/ (* K n) m))) (/ M m)))
(* 1/2 (* K m))
(* -1 (* m (+ (* -1 (/ (- (* 1/2 (* K n)) M) m)) (* -1/2 K))))
(* -1 (* m (+ (* -1 (/ (- (* 1/2 (* K n)) M) m)) (* -1/2 K))))
(* -1 (* m (+ (* -1 (/ (- (* 1/2 (* K n)) M) m)) (* -1/2 K))))
(- (* 1/2 (* K m)) M)
(- (+ (* 1/2 (* K m)) (* 1/2 (* K n))) M)
(- (+ (* 1/2 (* K m)) (* 1/2 (* K n))) M)
(- (+ (* 1/2 (* K m)) (* 1/2 (* K n))) M)
(* 1/2 (* K n))
(* n (- (+ (* 1/2 K) (* 1/2 (/ (* K m) n))) (/ M n)))
(* n (- (+ (* 1/2 K) (* 1/2 (/ (* K m) n))) (/ M n)))
(* n (- (+ (* 1/2 K) (* 1/2 (/ (* K m) n))) (/ M n)))
(* 1/2 (* K n))
(* -1 (* n (+ (* -1 (/ (- (* 1/2 (* K m)) M) n)) (* -1/2 K))))
(* -1 (* n (+ (* -1 (/ (- (* 1/2 (* K m)) M) n)) (* -1/2 K))))
(* -1 (* n (+ (* -1 (/ (- (* 1/2 (* K m)) M) n)) (* -1/2 K))))
(* 1/2 (* K (+ m n)))
(+ (* -1 M) (* 1/2 (* K (+ m n))))
(+ (* -1 M) (* 1/2 (* K (+ m n))))
(+ (* -1 M) (* 1/2 (* K (+ m n))))
(* -1 M)
(* M (- (* 1/2 (/ (* K (+ m n)) M)) 1))
(* M (- (* 1/2 (/ (* K (+ m n)) M)) 1))
(* M (- (* 1/2 (/ (* K (+ m n)) M)) 1))
(* -1 M)
(* -1 (* M (+ 1 (* -1/2 (/ (* K (+ m n)) M)))))
(* -1 (* M (+ 1 (* -1/2 (/ (* K (+ m n)) M)))))
(* -1 (* M (+ 1 (* -1/2 (/ (* K (+ m n)) M)))))
(pow (- (* 1/2 n) M) 2)
(+ (* m (- (* 1/2 n) M)) (pow (- (* 1/2 n) M) 2))
(+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))
(+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))
(* 1/4 (pow m 2))
(* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))
(* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2)))) (/ M m)))
(* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2)))) (/ M m)))
(* 1/4 (pow m 2))
(* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (pow (- (* 1/2 n) M) 2) m))) m))))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (pow (- (* 1/2 n) M) 2) m))) m))))
(pow (- (* 1/2 m) M) 2)
(+ (* n (- (* 1/2 m) M)) (pow (- (* 1/2 m) M) 2))
(+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))
(+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))
(* 1/4 (pow n 2))
(* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))
(* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2)))) (/ M n)))
(* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2)))) (/ M n)))
(* 1/4 (pow n 2))
(* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (pow (- (* 1/2 m) M) 2) n))) n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (pow (- (* 1/2 m) M) 2) n))) n))))
(* 1/4 (pow (+ m n) 2))
(+ (* -1 (* M (+ m n))) (* 1/4 (pow (+ m n) 2)))
(+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))
(+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))
(pow M 2)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))
(* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))
(pow M 2)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))
(exp (- l (fabs (- m n))))
(+ (exp (- l (fabs (- m n)))) (* (pow M 2) (exp (- l (fabs (- m n))))))
(+ (exp (- l (fabs (- m n)))) (* (pow M 2) (+ (exp (- l (fabs (- m n)))) (* 1/2 (* (pow M 2) (exp (- l (fabs (- m n)))))))))
(+ (exp (- l (fabs (- m n)))) (* (pow M 2) (+ (exp (- l (fabs (- m n)))) (* (pow M 2) (+ (* 1/6 (* (pow M 2) (exp (- l (fabs (- m n)))))) (* 1/2 (exp (- l (fabs (- m n))))))))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (pow M 2) (fabs (- m n))))
(+ (exp (- (pow M 2) (fabs (- m n)))) (* l (exp (- (pow M 2) (fabs (- m n))))))
(+ (exp (- (pow M 2) (fabs (- m n)))) (* l (+ (exp (- (pow M 2) (fabs (- m n)))) (* 1/2 (* l (exp (- (pow M 2) (fabs (- m n)))))))))
(+ (exp (- (pow M 2) (fabs (- m n)))) (* l (+ (exp (- (pow M 2) (fabs (- m n)))) (* l (+ (* 1/6 (* l (exp (- (pow M 2) (fabs (- m n)))))) (* 1/2 (exp (- (pow M 2) (fabs (- m n))))))))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l))))
(exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l))))
(exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l))))
(exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))
(exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))
(exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))
(exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n)))))
(exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n)))))
(exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n)))))
(exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n)))))
(* K (+ m n))
(* K (+ m n))
(* K (+ m n))
(* K (+ m n))
(* K (+ m n))
(* K (+ m n))
(* K (+ m n))
(* K (+ m n))
(* K (+ m n))
(* K (+ m n))
(* K (+ m n))
(* K (+ m n))
(* K n)
(+ (* K m) (* K n))
(+ (* K m) (* K n))
(+ (* K m) (* K n))
(* K m)
(* m (+ K (/ (* K n) m)))
(* m (+ K (/ (* K n) m)))
(* m (+ K (/ (* K n) m)))
(* K m)
(* -1 (* m (+ (* -1 K) (* -1 (/ (* K n) m)))))
(* -1 (* m (+ (* -1 K) (* -1 (/ (* K n) m)))))
(* -1 (* m (+ (* -1 K) (* -1 (/ (* K n) m)))))
(* K m)
(+ (* K m) (* K n))
(+ (* K m) (* K n))
(+ (* K m) (* K n))
(* K n)
(* n (+ K (/ (* K m) n)))
(* n (+ K (/ (* K m) n)))
(* n (+ K (/ (* K m) n)))
(* K n)
(* -1 (* n (+ (* -1 K) (* -1 (/ (* K m) n)))))
(* -1 (* n (+ (* -1 K) (* -1 (/ (* K m) n)))))
(* -1 (* n (+ (* -1 K) (* -1 (/ (* K m) n)))))
(pow M 2)
(+ (* -1 (* M n)) (pow M 2))
(+ (* n (+ (* -1 M) (* 1/4 n))) (pow M 2))
(+ (* n (+ (* -1 M) (* 1/4 n))) (pow M 2))
(* 1/4 (pow n 2))
(* (pow n 2) (+ 1/4 (* -1 (/ M n))))
(* (pow n 2) (+ 1/4 (+ (* -1 (/ M n)) (/ (pow M 2) (pow n 2)))))
(* (pow n 2) (+ 1/4 (+ (* -1 (/ M n)) (/ (pow M 2) (pow n 2)))))
(* 1/4 (pow n 2))
(* (pow n 2) (+ 1/4 (* -1 (/ M n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ M (* -1 (/ (pow M 2) n))) n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ M (* -1 (/ (pow M 2) n))) n))))
(* 1/4 (pow n 2))
(+ (* -1 (* M n)) (* 1/4 (pow n 2)))
(+ (* 1/4 (pow n 2)) (* M (+ M (* -1 n))))
(+ (* 1/4 (pow n 2)) (* M (+ M (* -1 n))))
(pow M 2)
(* (pow M 2) (+ 1 (* -1 (/ n M))))
(* (pow M 2) (+ 1 (+ (* -1 (/ n M)) (* 1/4 (/ (pow n 2) (pow M 2))))))
(* (pow M 2) (+ 1 (+ (* -1 (/ n M)) (* 1/4 (/ (pow n 2) (pow M 2))))))
(pow M 2)
(* (pow M 2) (+ 1 (* -1 (/ n M))))
(* (pow M 2) (+ 1 (* -1 (/ (+ n (* -1/4 (/ (pow n 2) M))) M))))
(* (pow M 2) (+ 1 (* -1 (/ (+ n (* -1/4 (/ (pow n 2) M))) M))))
(exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))
(+ (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))) (* l (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))
(+ (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))) (* l (+ (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))) (* 1/2 (* l (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))))))
(+ (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))) (* l (+ (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))) (* l (+ (* 1/6 (* l (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))) (* 1/2 (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l))))
(exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l))))
(exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l))))
(exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l))))
(exp (- (+ l (pow M 2)) (fabs (- n m))))
(+ (exp (- (+ l (pow M 2)) (fabs (- n m)))) (* -1 (* M (* n (exp (- (+ l (pow M 2)) (fabs (- n m))))))))
(+ (exp (- (+ l (pow M 2)) (fabs (- n m)))) (* n (+ (* -1 (* M (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* n (* (exp (- (+ l (pow M 2)) (fabs (- n m)))) (+ 1/4 (* 1/2 (pow M 2))))))))
(+ (exp (- (+ l (pow M 2)) (fabs (- n m)))) (* n (+ (* -1 (* M (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* n (+ (* n (* (exp (- (+ l (pow M 2)) (fabs (- n m)))) (+ (* -1/4 M) (* -1/6 (pow M 3))))) (* (exp (- (+ l (pow M 2)) (fabs (- n m)))) (+ 1/4 (* 1/2 (pow M 2)))))))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n))))))
(exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n))))))
(exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n))))))
(exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n))))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(+ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (* -1 (* M (* n (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))
(+ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (* M (+ (* -1 (* n (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* M (* (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (+ 1 (* 1/2 (pow n 2))))))))
(+ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (* M (+ (* -1 (* n (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* M (+ (* M (* (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (+ (* -1 n) (* -1/6 (pow n 3))))) (* (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (+ 1 (* 1/2 (pow n 2)))))))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m)))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m)))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m)))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m)))))
(cos (* -1/2 (* K (+ m n))))
(+ (cos (* -1/2 (* K (+ m n)))) (* -1 (* M (sin (* -1/2 (* K (+ m n)))))))
(+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K (+ m n)))))) (sin (* -1/2 (* K (+ m n)))))))
(+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* 1/6 (* M (sin (* -1/2 (* K (+ m n)))))))) (sin (* -1/2 (* K (+ m n)))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos M)
(+ (cos M) (* 1/2 (* K (* (sin M) (+ m n)))))
(+ (cos M) (* K (- (* -1/8 (* K (* (cos M) (pow (+ m n) 2)))) (* -1/2 (* (sin M) (+ m n))))))
(+ (cos M) (* K (- (* K (+ (* -1/8 (* (cos M) (pow (+ m n) 2))) (* -1/48 (* K (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K n))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* -1/8 (* (pow K 2) (* m (cos (+ M (* -1/2 (* K n))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/48 (* (pow K 3) (* m (sin (+ M (* -1/2 (* K n))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos (+ M (* -1/2 (* K m))))
(+ (cos (+ M (* -1/2 (* K m)))) (* 1/2 (* K (* n (sin (+ M (* -1/2 (* K m))))))))
(+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* -1/8 (* (pow K 2) (* n (cos (+ M (* -1/2 (* K m))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))
(+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/48 (* (pow K 3) (* n (sin (+ M (* -1/2 (* K m))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(pow (+ M (* -1/2 n)) 2)
(+ (* -1 (* m (+ M (* -1/2 n)))) (pow (+ M (* -1/2 n)) 2))
(+ (* m (+ (* -1 (+ M (* -1/2 n))) (* 1/4 m))) (pow (+ M (* -1/2 n)) 2))
(+ (* m (+ (* -1 (+ M (* -1/2 n))) (* 1/4 m))) (pow (+ M (* -1/2 n)) 2))
(* 1/4 (pow m 2))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 n)) m))))
(* (pow m 2) (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 n)) m)) (/ (pow (+ M (* -1/2 n)) 2) (pow m 2)))))
(* (pow m 2) (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 n)) m)) (/ (pow (+ M (* -1/2 n)) 2) (pow m 2)))))
(* 1/4 (pow m 2))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 n)) m))))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (pow (+ M (* -1/2 n)) 2) m)) (* -1/2 n))) m))))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (pow (+ M (* -1/2 n)) 2) m)) (* -1/2 n))) m))))
(pow (+ M (* -1/2 m)) 2)
(+ (* -1 (* n (+ M (* -1/2 m)))) (pow (+ M (* -1/2 m)) 2))
(+ (* n (+ (* -1 (+ M (* -1/2 m))) (* 1/4 n))) (pow (+ M (* -1/2 m)) 2))
(+ (* n (+ (* -1 (+ M (* -1/2 m))) (* 1/4 n))) (pow (+ M (* -1/2 m)) 2))
(* 1/4 (pow n 2))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 m)) n))))
(* (pow n 2) (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 m)) n)) (/ (pow (+ M (* -1/2 m)) 2) (pow n 2)))))
(* (pow n 2) (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 m)) n)) (/ (pow (+ M (* -1/2 m)) 2) (pow n 2)))))
(* 1/4 (pow n 2))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 m)) n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (pow (+ M (* -1/2 m)) 2) n)) (* -1/2 m))) n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (pow (+ M (* -1/2 m)) 2) n)) (* -1/2 m))) n))))
(* 1/4 (pow (+ m n) 2))
(+ (* -1 (* M (+ m n))) (* 1/4 (pow (+ m n) 2)))
(+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))
(+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))
(pow M 2)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))
(* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))
(pow M 2)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K n))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(* -1/2 (* K m))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(* -1/2 (* K m))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(* -1/2 (* K m))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(* -1/2 (* K n))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(* -1/2 (* K n))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
Outputs
(/ 1 (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))
(+ (/ 1 (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (/ (* M (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))
(+.f64 (/.f64 (*.f64 (+.f64 m n) M) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))))
(+ (* M (- (* -1 (* M (+ (* -1 (/ (pow (+ m n) 2) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* 1/2 (/ (pow (+ m n) 2) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* 3/2 (/ 1 (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))))) (* -1 (/ (+ m n) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ 1 (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))
(+.f64 (*.f64 M (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 M (+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (+.f64 (/.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/2 binary64)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (/.f64 #s(literal 3/2 binary64) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))))) (/.f64 (+.f64 m n) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))))) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))))
(+ (* M (- (* M (- (* -1 (* M (+ (* -1 (/ (+ m n) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1/6 (/ (pow (+ m n) 3) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* (+ m n) (+ (* -1 (/ (pow (+ m n) 2) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* 1/2 (/ (pow (+ m n) 2) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* 3/2 (/ 1 (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (+ 1 (* 1/2 (pow (+ m n) 2))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))))) (+ (* -1 (/ (pow (+ m n) 2) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* 1/2 (/ (pow (+ m n) 2) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* 3/2 (/ 1 (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))))) (* -1 (/ (+ m n) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ 1 (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))
(+.f64 (*.f64 M (+.f64 (*.f64 M (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) M) (+.f64 (/.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (+.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 (+.f64 m n) (+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (+.f64 (/.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/2 binary64)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (/.f64 #s(literal 3/2 binary64) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))))) (/.f64 (*.f64 (+.f64 m n) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/2 binary64)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))))))) (+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (+.f64 (/.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/2 binary64)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (/.f64 #s(literal 3/2 binary64) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))))))) (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 m n) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))))) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(+ (* -1 (/ (* m (* (cos M) (- (* 1/2 n) M))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))
(+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 m (cos.f64 M)) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))))
(+ (* m (- (* -1 (* m (+ (* -1 (/ (* (cos M) (pow (- (* 1/2 n) M) 2)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))) (/ (* (cos M) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))
(+.f64 (*.f64 m (-.f64 (*.f64 (neg.f64 m) (+.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 M) (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (cos.f64 M) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 (cos.f64 M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))))
(+ (* m (- (* m (- (* -1 (* m (+ (* -1 (* (+ (* -1 (/ (* (cos M) (pow (- (* 1/2 n) M) 2)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (- (* 1/2 n) M))) (+ (* -1 (/ (* (cos M) (* (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))) (- (* 1/2 n) M))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ (* 1/6 (pow (- (* 1/2 n) M) 3)) (* 1/4 (- (* 1/2 n) M)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))))) (+ (* -1 (/ (* (cos M) (pow (- (* 1/2 n) M) 2)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))) (/ (* (cos M) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))
(+.f64 (*.f64 m (-.f64 (*.f64 m (-.f64 (*.f64 (neg.f64 m) (+.f64 (neg.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (+.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 M) (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (cos.f64 M) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))))) (+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 M) (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (cos.f64 M) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))))) (+.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 M) (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (cos.f64 M) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))))) (/.f64 (*.f64 (cos.f64 M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 n (neg.f64 m))) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 n (neg.f64 m))) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 n (neg.f64 m))) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 n (neg.f64 m))) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 n (neg.f64 m))) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 n (neg.f64 m))) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 n (neg.f64 m))) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 n (neg.f64 m))) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(+ (* -1 (/ (* n (* (cos M) (- (* 1/2 m) M))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 n (cos.f64 M)) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))))
(+ (* n (- (* -1 (* n (+ (* -1 (/ (* (cos M) (pow (- (* 1/2 m) M) 2)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))) (/ (* (cos M) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 n (-.f64 (*.f64 (neg.f64 n) (+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 M) (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (cos.f64 M) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))))) (/.f64 (*.f64 (cos.f64 M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))))))
(+ (* n (- (* n (- (* -1 (* n (+ (* -1 (* (+ (* -1 (/ (* (cos M) (pow (- (* 1/2 m) M) 2)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (- (* 1/2 m) M))) (+ (* -1 (/ (* (cos M) (* (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))) (- (* 1/2 m) M))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ (* 1/6 (pow (- (* 1/2 m) M) 3)) (* 1/4 (- (* 1/2 m) M)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))))) (+ (* -1 (/ (* (cos M) (pow (- (* 1/2 m) M) 2)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))) (/ (* (cos M) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 n (-.f64 (*.f64 n (-.f64 (*.f64 (neg.f64 n) (+.f64 (neg.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 M) (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (cos.f64 M) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))))) (+.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 M) (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 (cos.f64 M) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))))) (+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 M) (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (cos.f64 M) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))))) (/.f64 (*.f64 (cos.f64 M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 m (neg.f64 n))) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 m (neg.f64 n))) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 m (neg.f64 n))) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 m (neg.f64 n))) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 m (neg.f64 n))) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 m (neg.f64 n))) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 m (neg.f64 n))) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 m (neg.f64 n))) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(+ (* -1 (/ (* l (cos M)) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 l (cos.f64 M))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(+ (* l (- (* -1 (* l (+ (* -1 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))) (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))) (*.f64 l (-.f64 (*.f64 (neg.f64 l) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 M)) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))))
(+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))) (+ (* -1/2 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/6 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))))) (+ (* -1 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))) (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))) (*.f64 l (-.f64 (*.f64 l (-.f64 (*.f64 (neg.f64 l) (+.f64 (*.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))) #s(literal -1/3 binary64)) (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 M)) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 M)) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l)))))
(/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l)))))
(/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l)))))
(/ (cos M) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (cos.f64 M) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l)))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow M 2)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M)))
(+ 1 (* (pow M 2) (- (* 1/24 (pow M 2)) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) #s(literal 1/24 binary64)) #s(literal -1/2 binary64))))
(+ 1 (* (pow M 2) (- (* (pow M 2) (+ 1/24 (* -1/720 (pow M 2)))) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 M M) #s(literal -1/720 binary64)))) #s(literal -1/2 binary64))))
(cos M)
(cos.f64 M)
(cos M)
(cos.f64 M)
(cos M)
(cos.f64 M)
(cos M)
(cos.f64 M)
(cos M)
(cos.f64 M)
(cos M)
(cos.f64 M)
(cos M)
(cos.f64 M)
(cos M)
(cos.f64 M)
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(+ (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (* m (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (- (* 1/2 n) M))))
(+.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))) (*.f64 m (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))))
(+ (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (* m (+ (* m (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))))) (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (- (* 1/2 n) M)))))
(+.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))) (*.f64 m (+.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))) (*.f64 m (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))))))))
(+ (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (* m (+ (* m (+ (* m (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (+ (* 1/6 (pow (- (* 1/2 n) M) 3)) (* 1/4 (- (* 1/2 n) M))))) (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2)))))) (* (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))) (- (* 1/2 n) M)))))
(+.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))) (*.f64 m (+.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))) (*.f64 m (+.f64 (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))) (*.f64 (*.f64 m (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))))))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 n (neg.f64 m))) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 n (neg.f64 m))) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 n (neg.f64 m))) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 n (neg.f64 m))) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 n (neg.f64 m))) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 n (neg.f64 m))) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 n (neg.f64 m))) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 n (neg.f64 m))) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(+ (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (* n (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (- (* 1/2 m) M))))
(+.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))) (*.f64 n (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))))
(+ (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (* n (+ (* n (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))))) (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (- (* 1/2 m) M)))))
(+.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))) (*.f64 n (+.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 n (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)))))))))
(+ (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (* n (+ (* n (+ (* n (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (+ (* 1/6 (pow (- (* 1/2 m) M) 3)) (* 1/4 (- (* 1/2 m) M))))) (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2)))))) (* (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))) (- (* 1/2 m) M)))))
(+.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))) (*.f64 n (+.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 n (+.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M))))) (*.f64 n (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M))))))))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 m (neg.f64 n))) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 m (neg.f64 n))) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 m (neg.f64 n))) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 m (neg.f64 n))) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 m (neg.f64 n))) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 m (neg.f64 n))) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n)))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 m (neg.f64 n))) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 m (neg.f64 n))) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))
(+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* -1 (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)))))
(+.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (*.f64 (-.f64 #s(literal 0 binary64) M) (*.f64 (+.f64 m n) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))))
(+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* M (+ (* -1 (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n))) (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2))))))))
(+.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (*.f64 M (+.f64 (neg.f64 (*.f64 (+.f64 m n) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))) (*.f64 M (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/2 binary64))))))))
(+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* M (+ (* -1 (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n))) (* M (+ (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ (* -1 (+ m n)) (* -1/6 (pow (+ m n) 3))))) (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))))))))
(+.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (*.f64 M (+.f64 (neg.f64 (*.f64 (+.f64 m n) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))) (*.f64 M (+.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/2 binary64)))) (*.f64 M (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n))))))))))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))
(exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))
(+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))
(*.f64 (+.f64 l #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* 1/2 (* l (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))) (*.f64 l (+.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))) (*.f64 (*.f64 #s(literal 1/2 binary64) l) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))))
(+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (+ (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))) (* l (+ (* 1/6 (* l (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (* 1/2 (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))) (*.f64 l (+.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))) (*.f64 l (+.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) l) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))
(exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l))))
(exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))
(exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l))))
(exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))
(exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l))))
(exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l))))
(exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l))))
(- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))
(-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))
(- (+ l (+ (* m (- (* 1/2 n) M)) (pow (- (* 1/2 n) M) 2))) (fabs (- m n)))
(-.f64 (+.f64 l (+.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (*.f64 m (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))) (fabs.f64 (-.f64 n m)))
(- (+ l (+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))) (fabs (- m n)))
(+.f64 l (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (*.f64 m (+.f64 (*.f64 #s(literal 1/4 binary64) m) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))) (fabs.f64 (-.f64 n m))))
(- (+ l (+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))) (fabs (- m n)))
(+.f64 l (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (*.f64 m (+.f64 (*.f64 #s(literal 1/4 binary64) m) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))) (fabs.f64 (-.f64 n m))))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))
(*.f64 (*.f64 m m) (-.f64 (+.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 n #s(literal 1/2 binary64)) m)) (/.f64 M m)))
(* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (+ (/ l (pow m 2)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2))))) (+ (/ M m) (/ (fabs (- m n)) (pow m 2)))))
(*.f64 (*.f64 m m) (-.f64 (-.f64 (+.f64 (+.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 n #s(literal 1/2 binary64)) m)) (+.f64 (/.f64 l (*.f64 m m)) (/.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (*.f64 m m)))) (/.f64 M m)) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 m m))))
(* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (+ (/ l (pow m 2)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2))))) (+ (/ M m) (/ (fabs (- m n)) (pow m 2)))))
(*.f64 (*.f64 m m) (-.f64 (-.f64 (+.f64 (+.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 n #s(literal 1/2 binary64)) m)) (+.f64 (/.f64 l (*.f64 m m)) (/.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (*.f64 m m)))) (/.f64 M m)) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 m m))))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))
(*.f64 (*.f64 m m) (-.f64 (+.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 n #s(literal 1/2 binary64)) m)) (/.f64 M m)))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (neg (+ n (* -1 m))))) m))) m))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (/.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))) m))) m))))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (neg (+ n (* -1 m))))) m))) m))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (/.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))) m))) m))))
(- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))
(+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))
(- (+ l (+ (* n (- (* 1/2 m) M)) (pow (- (* 1/2 m) M) 2))) (fabs (- m n)))
(+.f64 l (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (*.f64 n (-.f64 (*.f64 m #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(- (+ l (+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))) (fabs (- m n)))
(+.f64 l (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (*.f64 n (+.f64 (*.f64 #s(literal 1/4 binary64) n) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)))) (fabs.f64 (-.f64 n m))))
(- (+ l (+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))) (fabs (- m n)))
(+.f64 l (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (*.f64 n (+.f64 (*.f64 #s(literal 1/4 binary64) n) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)))) (fabs.f64 (-.f64 n m))))
(* 1/4 (pow n 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
(* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 m #s(literal 1/2 binary64)) n) (/.f64 M n))))
(* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (+ (/ l (pow n 2)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2))))) (+ (/ M n) (/ (fabs (- m n)) (pow n 2)))))
(*.f64 (*.f64 n n) (-.f64 (-.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (+.f64 (/.f64 (*.f64 m #s(literal 1/2 binary64)) n) (/.f64 l (*.f64 n n))) (/.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (*.f64 n n)))) (/.f64 M n)) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 n n))))
(* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (+ (/ l (pow n 2)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2))))) (+ (/ M n) (/ (fabs (- m n)) (pow n 2)))))
(*.f64 (*.f64 n n) (-.f64 (-.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (+.f64 (/.f64 (*.f64 m #s(literal 1/2 binary64)) n) (/.f64 l (*.f64 n n))) (/.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (*.f64 n n)))) (/.f64 M n)) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 n n))))
(* 1/4 (pow n 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
(* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 m #s(literal 1/2 binary64)) n) (/.f64 M n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (+ m (* -1 n)))) n))) n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (/.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))) n))) n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (+ m (* -1 n)))) n))) n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (/.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))) n))) n))))
(- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))
(- (+ l (+ (* -1 (* M (+ m n))) (* 1/4 (pow (+ m n) 2)))) (fabs (- m n)))
(-.f64 (+.f64 (+.f64 l (neg.f64 (*.f64 (+.f64 m n) M))) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m)))
(- (+ l (+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))) (fabs (- m n)))
(+.f64 l (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (*.f64 M (+.f64 M (*.f64 (+.f64 m n) #s(literal -1 binary64))))) (fabs.f64 (-.f64 n m))))
(- (+ l (+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))) (fabs (- m n)))
(+.f64 l (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (*.f64 M (+.f64 M (*.f64 (+.f64 m n) #s(literal -1 binary64))))) (fabs.f64 (-.f64 n m))))
(pow M 2)
(*.f64 M M)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) M)))
(* (pow M 2) (- (+ 1 (+ (* -1 (/ (+ m n) M)) (+ (* 1/4 (/ (pow (+ m n) 2) (pow M 2))) (/ l (pow M 2))))) (/ (fabs (- m n)) (pow M 2))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) M) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 m n) (+.f64 m n)) (*.f64 M M))) (/.f64 l (*.f64 M M)))) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 M M)))))
(* (pow M 2) (- (+ 1 (+ (* -1 (/ (+ m n) M)) (+ (* 1/4 (/ (pow (+ m n) 2) (pow M 2))) (/ l (pow M 2))))) (/ (fabs (- m n)) (pow M 2))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) M) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 m n) (+.f64 m n)) (*.f64 M M))) (/.f64 l (*.f64 M M)))) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 M M)))))
(pow M 2)
(*.f64 M M)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) M)))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1 (/ (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))) M)))) M))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (+.f64 (+.f64 m n) (neg.f64 (/.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))) M))) M))))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1 (/ (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))) M)))) M))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (+.f64 (+.f64 m n) (neg.f64 (/.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))) M))) M))))
(- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))
(-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))
(- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))
(+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))
(- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))
(+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))
(- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))
(+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))
l
(* l (- (+ 1 (/ (pow (- (* 1/2 (+ m n)) M) 2) l)) (/ (fabs (- m n)) l)))
(*.f64 l (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))) l)))
(* l (- (+ 1 (/ (pow (- (* 1/2 (+ m n)) M) 2) l)) (/ (fabs (- m n)) l)))
(*.f64 l (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))) l)))
(* l (- (+ 1 (/ (pow (- (* 1/2 (+ m n)) M) 2) l)) (/ (fabs (- m n)) l)))
(*.f64 l (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))) l)))
l
(* -1 (* l (- (* -1 (/ (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))) l)) 1)))
(*.f64 (neg.f64 l) (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))) l)) #s(literal -1 binary64)))
(* -1 (* l (- (* -1 (/ (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))) l)) 1)))
(*.f64 (neg.f64 l) (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))) l)) #s(literal -1 binary64)))
(* -1 (* l (- (* -1 (/ (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))) l)) 1)))
(*.f64 (neg.f64 l) (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M) (-.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))) l)) #s(literal -1 binary64)))
(/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))
(+ (* -1 (/ (* M (sin (* -1/2 (* K (+ m n))))) (exp (- l (fabs (- m n)))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (neg.f64 (/.f64 (*.f64 M (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))))
(+ (* M (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n)))))) (* M (- (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n)))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n))))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 M (+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 M (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))))))
(+ (* M (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n)))))) (* M (- (+ (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n)))))) (* M (- (* 1/6 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n)))))) (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n))))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n))))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- l (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 M (+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 M (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (-.f64 (*.f64 M (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) #s(literal 7/6 binary64))) (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) (*.f64 #s(literal 1 binary64) M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) (*.f64 #s(literal 1 binary64) M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) (*.f64 #s(literal 1 binary64) M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) (*.f64 #s(literal 1 binary64) M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(+ (* 1/2 (/ (* K (* (sin M) (+ m n))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 K (sin.f64 M)) (+.f64 m n))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))
(+ (* K (+ (* -1/8 (/ (* K (* (cos M) (pow (+ m n) 2))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* 1/2 (/ (* (sin M) (+ m n)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+.f64 (*.f64 K (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) K) (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) (cos.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))
(+ (* K (+ (* 1/2 (/ (* (sin M) (+ m n)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* K (+ (* -1/8 (/ (* (cos M) (pow (+ m n) 2)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* -1/48 (/ (* K (* (sin M) (pow (+ m n) 3))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+.f64 (*.f64 K (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (*.f64 K (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 M)) (*.f64 (+.f64 m n) (+.f64 m n))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) K) (*.f64 (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n))) (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))))) (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))
(+ (* m (+ (* -1/8 (/ (* (pow K 2) (* m (cos (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (*.f64 m (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) m) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))))
(+ (* m (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* m (+ (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* -1/48 (/ (* (pow K 3) (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (*.f64 m (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (*.f64 m (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) m) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m)))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) (-.f64 n (neg.f64 m))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m)))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) (-.f64 n (neg.f64 m))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m)))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) (-.f64 n (neg.f64 m))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m)))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) (-.f64 n (neg.f64 m))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(+ (* 1/2 (/ (* K (* n (sin (+ M (* -1/2 (* K m)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 n K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))
(+ (* n (+ (* -1/8 (/ (* (pow K 2) (* n (cos (+ M (* -1/2 (* K m)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (*.f64 n (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) n) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))))
(+ (* n (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* n (+ (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* -1/48 (/ (* (pow K 3) (* n (sin (+ M (* -1/2 (* K m)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (*.f64 n (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (*.f64 n (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) n) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m)))))
(+ (* -1 (/ (* l (cos (+ M (* -1/2 (* K (+ m n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 l (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))))
(+ (* l (- (* -1 (* l (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n))))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))) (*.f64 l (-.f64 (*.f64 (neg.f64 l) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m)))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))))))
(+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n)))))))) (+ (* -1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n)))))) (* 1/6 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n)))))))))) (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n))))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))) (*.f64 l (-.f64 (*.f64 l (-.f64 (*.f64 (neg.f64 l) (+.f64 (*.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))) #s(literal -1/3 binary64)) (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m)))))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))) (neg.f64 l))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))) (neg.f64 l))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))) (neg.f64 l))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))) (neg.f64 l))))
(cos (* -1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))
(+ (cos (* -1/2 (* K (+ m n)))) (* -1 (* M (sin (* -1/2 (* K (+ m n)))))))
(+.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (*.f64 (-.f64 #s(literal 0 binary64) M) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K (+ m n)))))) (sin (* -1/2 (* K (+ m n)))))))
(+.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (*.f64 M (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) M) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))))
(+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* 1/6 (* M (sin (* -1/2 (* K (+ m n)))))))) (sin (* -1/2 (* K (+ m n)))))))
(+.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (*.f64 M (-.f64 (*.f64 M (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (*.f64 (*.f64 #s(literal 1/6 binary64) M) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) (*.f64 #s(literal 1 binary64) M)))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) (*.f64 #s(literal 1 binary64) M)))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) (*.f64 #s(literal 1 binary64) M)))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) (*.f64 #s(literal 1 binary64) M)))
(cos M)
(cos.f64 M)
(+ (cos M) (* 1/2 (* K (* (sin M) (+ m n)))))
(+.f64 (cos.f64 M) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 K (sin.f64 M)) (+.f64 m n))))
(+ (cos M) (* K (- (* -1/8 (* K (* (cos M) (pow (+ m n) 2)))) (* -1/2 (* (sin M) (+ m n))))))
(+.f64 (cos.f64 M) (*.f64 K (-.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) K) (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) (cos.f64 M))) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 M)) (+.f64 m n)))))
(+ (cos M) (* K (- (* K (+ (* -1/8 (* (cos M) (pow (+ m n) 2))) (* -1/48 (* K (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 M)) (*.f64 (+.f64 m n) (+.f64 m n))) (*.f64 (*.f64 #s(literal -1/48 binary64) K) (*.f64 (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n))) (sin.f64 M))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) (sin.f64 M))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* -1/8 (* (pow K 2) (* m (cos (+ M (* -1/2 (* K n))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (*.f64 m (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) m) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/48 (* (pow K 3) (* m (sin (+ M (* -1/2 (* K n))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (*.f64 m (+.f64 (*.f64 m (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))) (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) m) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) (-.f64 n (neg.f64 m)))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) (-.f64 n (neg.f64 m)))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) (-.f64 n (neg.f64 m)))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) (-.f64 n (neg.f64 m)))))
(cos (+ M (* -1/2 (* K m))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))
(+ (cos (+ M (* -1/2 (* K m)))) (* 1/2 (* K (* n (sin (+ M (* -1/2 (* K m))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 n K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))))
(+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* -1/8 (* (pow K 2) (* n (cos (+ M (* -1/2 (* K m))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (*.f64 n (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) n) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (*.f64 (*.f64 #s(literal -1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))))))
(+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/48 (* (pow K 3) (* n (sin (+ M (* -1/2 (* K m))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (*.f64 n (+.f64 (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) n) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K))))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(+ M (* -1/2 (* K (+ m n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))
(+ M (* -1/2 (* K (+ m n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))
(+ M (* -1/2 (* K (+ m n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))
M
(* M (+ 1 (* -1/2 (/ (* K (+ m n)) M))))
(*.f64 M (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* M (+ 1 (* -1/2 (/ (* K (+ m n)) M))))
(*.f64 M (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* M (+ 1 (* -1/2 (/ (* K (+ m n)) M))))
(*.f64 M (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
M
(* -1 (* M (- (* 1/2 (/ (* K (+ m n)) M)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) M) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M) #s(literal -1 binary64)))
(* -1 (* M (- (* 1/2 (/ (* K (+ m n)) M)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) M) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M) #s(literal -1 binary64)))
(* -1 (* M (- (* 1/2 (/ (* K (+ m n)) M)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) M) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M) #s(literal -1 binary64)))
M
(+ M (* -1/2 (* K (+ m n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))
(+ M (* -1/2 (* K (+ m n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))
(+ M (* -1/2 (* K (+ m n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* K (+ (* -1/2 (+ m n)) (/ M K)))
(*.f64 K (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (/.f64 M K)))
(* K (+ (* -1/2 (+ m n)) (/ M K)))
(*.f64 K (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (/.f64 M K)))
(* K (+ (* -1/2 (+ m n)) (/ M K)))
(*.f64 K (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (/.f64 M K)))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 (+ m n)))))
(*.f64 (neg.f64 K) (+.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) M) K)))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 (+ m n)))))
(*.f64 (neg.f64 K) (+.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) M) K)))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 (+ m n)))))
(*.f64 (neg.f64 K) (+.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) M) K)))
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))
(* -1/2 (* K m))
(*.f64 #s(literal -1/2 binary64) (*.f64 m K))
(* m (+ (* -1/2 K) (+ (* -1/2 (/ (* K n) m)) (/ M m))))
(*.f64 m (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))) (/.f64 M m)))
(* m (+ (* -1/2 K) (+ (* -1/2 (/ (* K n) m)) (/ M m))))
(*.f64 m (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))) (/.f64 M m)))
(* m (+ (* -1/2 K) (+ (* -1/2 (/ (* K n) m)) (/ M m))))
(*.f64 m (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))) (/.f64 M m)))
(* -1/2 (* K m))
(*.f64 #s(literal -1/2 binary64) (*.f64 m K))
(* -1 (* m (+ (* -1 (/ (+ M (* -1/2 (* K n))) m)) (* 1/2 K))))
(*.f64 (neg.f64 m) (+.f64 (neg.f64 (/.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) m)) (*.f64 #s(literal 1/2 binary64) K)))
(* -1 (* m (+ (* -1 (/ (+ M (* -1/2 (* K n))) m)) (* 1/2 K))))
(*.f64 (neg.f64 m) (+.f64 (neg.f64 (/.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) m)) (*.f64 #s(literal 1/2 binary64) K)))
(* -1 (* m (+ (* -1 (/ (+ M (* -1/2 (* K n))) m)) (* 1/2 K))))
(*.f64 (neg.f64 m) (+.f64 (neg.f64 (/.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) m)) (*.f64 #s(literal 1/2 binary64) K)))
(+ M (* -1/2 (* K m)))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))
(+ M (+ (* -1/2 (* K m)) (* -1/2 (* K n))))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* n (+ (* -1/2 K) (+ (* -1/2 (/ (* K m) n)) (/ M n))))
(*.f64 n (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))) (/.f64 M n)))
(* n (+ (* -1/2 K) (+ (* -1/2 (/ (* K m) n)) (/ M n))))
(*.f64 n (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))) (/.f64 M n)))
(* n (+ (* -1/2 K) (+ (* -1/2 (/ (* K m) n)) (/ M n))))
(*.f64 n (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))) (/.f64 M n)))
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1 (* n (+ (* -1 (/ (+ M (* -1/2 (* K m))) n)) (* 1/2 K))))
(*.f64 (neg.f64 n) (+.f64 (*.f64 #s(literal 1/2 binary64) K) (neg.f64 (/.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))) n))))
(* -1 (* n (+ (* -1 (/ (+ M (* -1/2 (* K m))) n)) (* 1/2 K))))
(*.f64 (neg.f64 n) (+.f64 (*.f64 #s(literal 1/2 binary64) K) (neg.f64 (/.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))) n))))
(* -1 (* n (+ (* -1 (/ (+ M (* -1/2 (* K m))) n)) (* 1/2 K))))
(*.f64 (neg.f64 n) (+.f64 (*.f64 #s(literal 1/2 binary64) K) (neg.f64 (/.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))) n))))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K m))
(*.f64 #s(literal -1/2 binary64) (*.f64 m K))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(*.f64 m (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(*.f64 m (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(*.f64 m (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* -1/2 (* K m))
(*.f64 #s(literal -1/2 binary64) (*.f64 m K))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(*.f64 (neg.f64 m) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(*.f64 (neg.f64 m) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(*.f64 (neg.f64 m) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* -1/2 (* K m))
(*.f64 #s(literal -1/2 binary64) (*.f64 m K))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(*.f64 n (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(*.f64 n (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(*.f64 n (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(*.f64 (neg.f64 n) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(*.f64 (neg.f64 n) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(*.f64 (neg.f64 n) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))))
(+ (* M (- (* -1 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* -1 (/ (* n (cos (* -1/2 (* K n)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))) (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))
(+.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))) (*.f64 M (*.f64 #s(literal -1 binary64) (-.f64 (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 n (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))))))))
(+ (* M (- (+ (* -1 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* M (- (* -1/2 (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (+ (* -1 (* n (- (* -1 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* -1 (/ (* n (cos (* -1/2 (* K n)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (/ (* (cos (* -1/2 (* K n))) (+ 1 (* 1/2 (pow n 2)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (* -1 (/ (* n (cos (* -1/2 (* K n)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))) (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))
(+.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))) (*.f64 M (+.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))))) (-.f64 (*.f64 M (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (neg.f64 n) (*.f64 #s(literal -1 binary64) (-.f64 (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 n (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))))))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 n n)))) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))))))) (neg.f64 (/.f64 (*.f64 n (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))))))))
(+ (* M (- (+ (* -1 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* M (- (+ (* -1/2 (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* M (- (* 1/6 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (+ (* -1 (* n (- (* -1/2 (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (+ (* -1 (* n (- (* -1 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* -1 (/ (* n (cos (* -1/2 (* K n)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (/ (* (cos (* -1/2 (* K n))) (+ 1 (* 1/2 (pow n 2)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (+ (* (+ 1 (* 1/2 (pow n 2))) (- (* -1 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* -1 (/ (* n (cos (* -1/2 (* K n)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))) (/ (* (cos (* -1/2 (* K n))) (+ (* -1 n) (* -1/6 (pow n 3)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))))) (+ (* -1 (* n (- (* -1 (/ (sin (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* -1 (/ (* n (cos (* -1/2 (* K n)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (/ (* (cos (* -1/2 (* K n))) (+ 1 (* 1/2 (pow n 2)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (* -1 (/ (* n (cos (* -1/2 (* K n)))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))) (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))
(+.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))) (*.f64 M (+.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))))) (-.f64 (*.f64 M (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))) (-.f64 (*.f64 M (-.f64 (/.f64 (*.f64 #s(literal 1/6 binary64) (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (neg.f64 n) (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (neg.f64 n) (*.f64 #s(literal -1 binary64) (-.f64 (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 n (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))))))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 n n)))) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))))))) (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (-.f64 (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 n (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 n n)))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (+.f64 (neg.f64 n) (*.f64 #s(literal -1/6 binary64) (*.f64 n (*.f64 n n))))) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))))))) (+.f64 (*.f64 (neg.f64 n) (*.f64 #s(literal -1 binary64) (-.f64 (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 n (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))))))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 n n)))) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))))))) (neg.f64 (/.f64 (*.f64 n (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))))))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (- (* -1/2 (* K n)) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n) (*.f64 #s(literal 1 binary64) M))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (- (* -1/2 (* K n)) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n) (*.f64 #s(literal 1 binary64) M))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (- (* -1/2 (* K n)) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n) (*.f64 #s(literal 1 binary64) M))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (- (* -1/2 (* K n)) (* -1 M))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n) (*.f64 #s(literal 1 binary64) M))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- n m)))))
(/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(+ (* n (- (* 1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* -1 (/ (* M (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- n m))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (*.f64 n (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 M (cos.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))))
(+ (* n (- (+ (* 1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* n (- (* -1/8 (/ (* (pow K 2) (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (+ (* -1 (* M (- (* 1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* -1 (/ (* M (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m))))))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow M 2)))) (exp (- (+ l (pow M 2)) (fabs (- n m))))))))) (* -1 (/ (* M (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- n m))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (*.f64 n (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (-.f64 (*.f64 n (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 M)) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) M) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 M (cos.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 (cos.f64 M) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M M)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 M (cos.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))))))
(+ (* n (- (+ (* 1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* n (- (+ (* -1/8 (/ (* (pow K 2) (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* n (- (* -1/48 (/ (* (pow K 3) (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (+ (* -1 (* M (- (* -1/8 (/ (* (pow K 2) (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (+ (* -1 (* M (- (* 1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* -1 (/ (* M (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m))))))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow M 2)))) (exp (- (+ l (pow M 2)) (fabs (- n m))))))))) (+ (* (+ 1/4 (* 1/2 (pow M 2))) (- (* 1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* -1 (/ (* M (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))))) (/ (* (cos M) (+ (* -1/4 M) (* -1/6 (pow M 3)))) (exp (- (+ l (pow M 2)) (fabs (- n m)))))))))) (+ (* -1 (* M (- (* 1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* -1 (/ (* M (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m))))))))) (/ (* (cos M) (+ 1/4 (* 1/2 (pow M 2)))) (exp (- (+ l (pow M 2)) (fabs (- n m))))))))) (* -1 (/ (* M (cos M)) (exp (- (+ l (pow M 2)) (fabs (- n m)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- n m))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (*.f64 n (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (-.f64 (*.f64 n (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 M)) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (-.f64 (*.f64 n (-.f64 (/.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (sin.f64 M) (*.f64 K (*.f64 K K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) M) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 M)) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) M) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 M (cos.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 (cos.f64 M) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M M)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))))) (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 M (cos.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M M)))) (/.f64 (*.f64 (cos.f64 M) (+.f64 (*.f64 M #s(literal -1/4 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 M (*.f64 M M))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))))) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) M) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 M (cos.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 (cos.f64 M) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M M)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 M (cos.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n)))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n)))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n)))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n)))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(+ (* 1/2 (/ (* K (* n (sin M))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 n (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))))
(+ (* K (+ (* -1/8 (/ (* K (* (pow n 2) (cos M))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))) (* 1/2 (/ (* n (sin M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))) (*.f64 K (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) K) (*.f64 (cos.f64 M) (*.f64 n n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))))))
(+ (* K (+ (* 1/2 (/ (* n (sin M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))) (* K (+ (* -1/8 (/ (* (pow n 2) (cos M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))) (* -1/48 (/ (* K (* (pow n 3) (sin M))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))) (*.f64 K (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))) (*.f64 K (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 n n)) (cos.f64 M)) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) K) (*.f64 (sin.f64 M) (*.f64 n (*.f64 n n)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))))))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(+ (* -1 (/ (* l (cos (+ M (* -1/2 (* K n))))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 l (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))
(+ (* l (- (* -1 (* l (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))) (*.f64 l (-.f64 (*.f64 (neg.f64 l) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))))
(+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))))) (+ (* -1/2 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))) (* 1/6 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))))))) (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))) (*.f64 l (-.f64 (*.f64 l (-.f64 (*.f64 (neg.f64 l) (+.f64 (*.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))) #s(literal -1/3 binary64)) (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))) (/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m)))))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))
(+ (cos (* -1/2 (* K n))) (* -1 (* M (sin (* -1/2 (* K n))))))
(+.f64 (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (*.f64 (-.f64 #s(literal 0 binary64) M) (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))
(+ (cos (* -1/2 (* K n))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K n))))) (sin (* -1/2 (* K n))))))
(+.f64 (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (*.f64 M (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) M) (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))))
(+ (cos (* -1/2 (* K n))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K n)))) (* 1/6 (* M (sin (* -1/2 (* K n))))))) (sin (* -1/2 (* K n))))))
(+.f64 (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (*.f64 M (-.f64 (*.f64 M (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (*.f64 (*.f64 #s(literal 1/6 binary64) M) (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))) (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n) (*.f64 #s(literal 1 binary64) M)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n) (*.f64 #s(literal 1 binary64) M)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n) (*.f64 #s(literal 1 binary64) M)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n) (*.f64 #s(literal 1 binary64) M)))
(cos M)
(cos.f64 M)
(+ (cos M) (* 1/2 (* K (* n (sin M)))))
(+.f64 (cos.f64 M) (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 n (sin.f64 M))))
(+ (cos M) (* n (- (* -1/8 (* (pow K 2) (* n (cos M)))) (* -1/2 (* K (sin M))))))
(+.f64 (cos.f64 M) (*.f64 n (-.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 n (cos.f64 M))) (*.f64 (*.f64 #s(literal -1/2 binary64) K) (sin.f64 M)))))
(+ (cos M) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos M))) (* -1/48 (* (pow K 3) (* n (sin M)))))) (* -1/2 (* K (sin M))))))
(+.f64 (cos.f64 M) (*.f64 n (+.f64 (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 M)) (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 K (*.f64 K K)) (*.f64 n (sin.f64 M)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 M))))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(cos M)
(cos.f64 M)
(+ (cos M) (* 1/2 (* K (* n (sin M)))))
(+.f64 (cos.f64 M) (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 n (sin.f64 M))))
(+ (cos M) (* K (- (* -1/8 (* K (* (pow n 2) (cos M)))) (* -1/2 (* n (sin M))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) K) (*.f64 (cos.f64 M) (*.f64 n n))) (*.f64 #s(literal 1/2 binary64) (*.f64 n (sin.f64 M))))))
(+ (cos M) (* K (- (* K (+ (* -1/8 (* (pow n 2) (cos M))) (* -1/48 (* K (* (pow n 3) (sin M)))))) (* -1/2 (* n (sin M))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 n n)) (cos.f64 M)) (*.f64 (*.f64 #s(literal -1/48 binary64) K) (*.f64 (sin.f64 M) (*.f64 n (*.f64 n n)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 n (sin.f64 M))))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))
M
(* M (+ 1 (* -1/2 (/ (* K n) M))))
(*.f64 M (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n) M)))
(* M (+ 1 (* -1/2 (/ (* K n) M))))
(*.f64 M (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n) M)))
(* M (+ 1 (* -1/2 (/ (* K n) M))))
(*.f64 M (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n) M)))
M
(* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) M) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M) #s(literal -1 binary64)))
(* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) M) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M) #s(literal -1 binary64)))
(* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) M) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M) #s(literal -1 binary64)))
M
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* n (+ (* -1/2 K) (/ M n)))
(*.f64 n (+.f64 (/.f64 M n) (*.f64 #s(literal -1/2 binary64) K)))
(* n (+ (* -1/2 K) (/ M n)))
(*.f64 n (+.f64 (/.f64 M n) (*.f64 #s(literal -1/2 binary64) K)))
(* n (+ (* -1/2 K) (/ M n)))
(*.f64 n (+.f64 (/.f64 M n) (*.f64 #s(literal -1/2 binary64) K)))
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))
(*.f64 (neg.f64 n) (+.f64 (*.f64 #s(literal 1/2 binary64) K) (/.f64 (-.f64 #s(literal 0 binary64) M) n)))
(* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))
(*.f64 (neg.f64 n) (+.f64 (*.f64 #s(literal 1/2 binary64) K) (/.f64 (-.f64 #s(literal 0 binary64) M) n)))
(* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))
(*.f64 (neg.f64 n) (+.f64 (*.f64 #s(literal 1/2 binary64) K) (/.f64 (-.f64 #s(literal 0 binary64) M) n)))
M
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* K (+ (* -1/2 n) (/ M K)))
(*.f64 K (+.f64 (/.f64 M K) (*.f64 n #s(literal -1/2 binary64))))
(* K (+ (* -1/2 n) (/ M K)))
(*.f64 K (+.f64 (/.f64 M K) (*.f64 n #s(literal -1/2 binary64))))
(* K (+ (* -1/2 n) (/ M K)))
(*.f64 K (+.f64 (/.f64 M K) (*.f64 n #s(literal -1/2 binary64))))
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))
(*.f64 (neg.f64 K) (+.f64 (*.f64 n #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) M) K)))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))
(*.f64 (neg.f64 K) (+.f64 (*.f64 n #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) M) K)))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))
(*.f64 (neg.f64 K) (+.f64 (*.f64 n #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) M) K)))
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(+ (* -1 (/ (* l (cos (+ M (* -1/2 (* K (+ m n)))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (neg.f64 (/.f64 (*.f64 l (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))
(+ (* l (- (* -1 (* l (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (*.f64 l (-.f64 (*.f64 (neg.f64 l) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))))
(+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))) (+ (* -1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (* 1/6 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))))) (+ (* -1 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (* 1/2 (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))) (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (*.f64 l (-.f64 (*.f64 l (-.f64 (*.f64 (neg.f64 l) (+.f64 (*.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) #s(literal -1/3 binary64)) (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(+ (* m (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K n)))) (+ M (* -1/2 n))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 m (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))))))
(+ (* m (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* m (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (+ (* -1 (* (+ M (* -1/2 n)) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K n)))) (+ M (* -1/2 n))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K n)))) (+ M (* -1/2 n))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 m (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (-.f64 (*.f64 m (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))))))
(+ (* m (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* m (- (+ (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* m (- (* -1/48 (/ (* (pow K 3) (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (+ (* -1 (* (+ M (* -1/2 n)) (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (+ (* -1 (* (+ M (* -1/2 n)) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K n)))) (+ M (* -1/2 n))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))))) (+ (* (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2))) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K n)))) (+ M (* -1/2 n))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ (* -1/4 (+ M (* -1/2 n))) (* -1/6 (pow (+ M (* -1/2 n)) 3)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))))) (+ (* -1 (* (+ M (* -1/2 n)) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K n)))) (+ M (* -1/2 n))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K n)))) (+ M (* -1/2 n))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 m (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (-.f64 (*.f64 m (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (-.f64 (*.f64 m (-.f64 (/.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (*.f64 K (*.f64 K K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))))) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))))) (/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (+.f64 (*.f64 #s(literal -1/4 binary64) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))))) (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) (-.f64 n (neg.f64 m))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) (-.f64 n (neg.f64 m))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) (-.f64 n (neg.f64 m))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) (-.f64 n (neg.f64 m))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))
(+ (* n (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K m)))) (+ M (* -1/2 m))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (*.f64 n (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))))))
(+ (* n (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* n (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (+ (* -1 (* (+ M (* -1/2 m)) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K m)))) (+ M (* -1/2 m))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K m)))) (+ M (* -1/2 m))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (*.f64 n (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (-.f64 (*.f64 n (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))))))
(+ (* n (- (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* n (- (+ (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* n (- (* -1/48 (/ (* (pow K 3) (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (+ (* -1 (* (+ M (* -1/2 m)) (- (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (+ (* -1 (* (+ M (* -1/2 m)) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K m)))) (+ M (* -1/2 m))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))))) (+ (* (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2))) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K m)))) (+ M (* -1/2 m))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ (* -1/4 (+ M (* -1/2 m))) (* -1/6 (pow (+ M (* -1/2 m)) 3)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))))) (+ (* -1 (* (+ M (* -1/2 m)) (- (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K m)))) (+ M (* -1/2 m))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))))) (/ (* (cos (+ M (* -1/2 (* K m)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))))) (* -1 (/ (* (cos (+ M (* -1/2 (* K m)))) (+ M (* -1/2 m))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (*.f64 n (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (-.f64 (*.f64 n (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (-.f64 (*.f64 n (-.f64 (/.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 K (*.f64 K K)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))))) (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))))) (/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))))))) (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))
(+ (* M (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (*.f64 M (*.f64 #s(literal -1 binary64) (-.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (+.f64 m n) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))))))
(+ (* M (- (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1 (* (+ m n) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (*.f64 M (+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (-.f64 (*.f64 M (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (-.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (+.f64 m n) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 m n) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))))))
(+ (* M (- (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (+ (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (* 1/6 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1 (* (+ m n) (- (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1 (* (+ m n) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (+ (* (+ 1 (* 1/2 (pow (+ m n) 2))) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ (* -1 (+ m n)) (* -1/6 (pow (+ m n) 3)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))))) (+ (* -1 (* (+ m n) (- (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (cos (* -1/2 (* K (+ m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (* -1 (/ (* (cos (* -1/2 (* K (+ m n)))) (+ m n)) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (*.f64 M (+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (-.f64 (*.f64 M (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (-.f64 (*.f64 M (-.f64 (/.f64 (*.f64 #s(literal 1/6 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (-.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (+.f64 m n) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))))) (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1 binary64) (-.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (+.f64 m n) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))))) (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n))))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))))))) (+.f64 (*.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (-.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (+.f64 m n) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 m n) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) (*.f64 #s(literal 1 binary64) M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M)) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M))) (fabs.f64 (-.f64 n m))))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) (*.f64 #s(literal 1 binary64) M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M)) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M))) (fabs.f64 (-.f64 n m))))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) (*.f64 #s(literal 1 binary64) M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M)) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M))) (fabs.f64 (-.f64 n m))))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) (*.f64 #s(literal 1 binary64) M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M)) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M))) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(+ (* 1/2 (/ (* K (* (sin M) (+ m n))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))) (/ (cos M) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 K (sin.f64 M)) (+.f64 m n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))
(+ (* K (+ (* -1/8 (/ (* K (* (cos M) (pow (+ m n) 2))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))) (* 1/2 (/ (* (sin M) (+ m n)) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 K (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) K) (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) (sin.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))))
(+ (* K (+ (* 1/2 (/ (* (sin M) (+ m n)) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))) (* K (+ (* -1/8 (/ (* (cos M) (pow (+ m n) 2)) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))) (* -1/48 (/ (* K (* (sin M) (pow (+ m n) 3))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))))))) (/ (cos M) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 K (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) (sin.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 K (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 M)) (*.f64 (+.f64 m n) (+.f64 m n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) K) (*.f64 (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n))) (sin.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(+ (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n)))))) (/ (* l (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))) (cos (+ M (* -1/2 (* K (+ m n)))))))
(+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (*.f64 l (/.f64 (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))))
(+ (* l (+ (* 1/2 (/ (* l (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))) (cos (+ M (* -1/2 (* K (+ m n))))))) (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n)))))))) (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n)))))))
(+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (*.f64 l (+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) l) (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))))))
(+ (* l (+ (* l (+ (* 1/6 (/ (* l (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))) (cos (+ M (* -1/2 (* K (+ m n))))))) (* 1/2 (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))))) (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n)))))))) (/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n)))))))
(+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (*.f64 l (+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (*.f64 l (+.f64 (/.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 l (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l)))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l)))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l)))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l)))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K n)))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))
(+ (* m (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K n))))))
(+.f64 (/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))) (*.f64 m (-.f64 (neg.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (/.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (*.f64 (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) #s(literal 2 binary64))))))
(+ (* m (- (+ (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))) (cos (+ M (* -1/2 (* K n)))))) (* m (- (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2)))) (cos (+ M (* -1/2 (* K n))))) (+ (* -1/8 (/ (* (pow K 2) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K n)))) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2)))))) (cos (+ M (* -1/2 (* K n)))))))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K n))))))
(+.f64 (/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))) (*.f64 m (+.f64 (neg.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (/.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))))) (-.f64 (*.f64 m (-.f64 (-.f64 (/.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) (/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))) (-.f64 (neg.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (/.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (*.f64 (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) #s(literal 2 binary64)))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (*.f64 (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) #s(literal 2 binary64)))))))
(+ (* m (- (+ (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))) (cos (+ M (* -1/2 (* K n)))))) (* m (- (+ (* m (- (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ (* -1/4 (+ M (* -1/2 n))) (* -1/6 (pow (+ M (* -1/2 n)) 3)))) (cos (+ M (* -1/2 (* K n))))) (+ (* -1/8 (* (pow K 2) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2)))))) (+ (* -1/48 (/ (* (pow K 3) (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K n)))) (- (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2)))) (cos (+ M (* -1/2 (* K n))))) (+ (* -1/8 (/ (* (pow K 2) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K n)))) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2)))))) (cos (+ M (* -1/2 (* K n)))))))))) (cos (+ M (* -1/2 (* K n)))))))))) (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2)))) (cos (+ M (* -1/2 (* K n)))))) (+ (* -1/8 (/ (* (pow K 2) (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K n)))) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))) (cos (+ M (* -1/2 (* K n)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2)))))) (cos (+ M (* -1/2 (* K n)))))))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K n))))))
(+.f64 (/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))) (*.f64 m (+.f64 (neg.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (/.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))))) (-.f64 (*.f64 m (+.f64 (*.f64 m (-.f64 (/.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (-.f64 (neg.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (/.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (*.f64 (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 K (*.f64 K K)) (*.f64 (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))) (-.f64 (-.f64 (/.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) (/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))) (-.f64 (neg.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (/.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (*.f64 (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) #s(literal 2 binary64)))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))))) (-.f64 (-.f64 (/.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) (/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))) (-.f64 (neg.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (/.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (*.f64 (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) #s(literal 2 binary64)))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (*.f64 (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) #s(literal 2 binary64)))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) (-.f64 n (neg.f64 m))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) (-.f64 n (neg.f64 m))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) (-.f64 n (neg.f64 m))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) (-.f64 n (neg.f64 m))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K m)))))
(/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))
(+ (* n (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K m))))))
(+.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (*.f64 n (+.f64 (neg.f64 (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))) (/.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 K (*.f64 (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) #s(literal 2 binary64)))))))
(+ (* n (- (+ (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))) (cos (+ M (* -1/2 (* K m)))))) (* n (- (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2)))) (cos (+ M (* -1/2 (* K m))))) (+ (* -1/8 (/ (* (pow K 2) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K m)))) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2)))))) (cos (+ M (* -1/2 (* K m)))))))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K m))))))
(+.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (*.f64 n (+.f64 (neg.f64 (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))) (/.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))))) (-.f64 (*.f64 n (-.f64 (-.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (+.f64 (neg.f64 (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))) (/.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 K (*.f64 (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) #s(literal 2 binary64))))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (*.f64 (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) #s(literal 2 binary64)))))))
(+ (* n (- (+ (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))) (cos (+ M (* -1/2 (* K m)))))) (* n (- (+ (* n (- (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ (* -1/4 (+ M (* -1/2 m))) (* -1/6 (pow (+ M (* -1/2 m)) 3)))) (cos (+ M (* -1/2 (* K m))))) (+ (* -1/8 (* (pow K 2) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2)))))) (+ (* -1/48 (/ (* (pow K 3) (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K m)))) (- (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2)))) (cos (+ M (* -1/2 (* K m))))) (+ (* -1/8 (/ (* (pow K 2) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K m)))) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2)))))) (cos (+ M (* -1/2 (* K m)))))))))) (cos (+ M (* -1/2 (* K m)))))))))) (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2)))) (cos (+ M (* -1/2 (* K m)))))) (+ (* -1/8 (/ (* (pow K 2) (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K m)))) (- (* -1 (/ (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))) (cos (+ M (* -1/2 (* K m)))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2)))))) (cos (+ M (* -1/2 (* K m)))))))))) (* 1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K m))))))
(+.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (*.f64 n (+.f64 (neg.f64 (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))) (/.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))))) (-.f64 (*.f64 n (+.f64 (*.f64 n (-.f64 (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (+.f64 (neg.f64 (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))) (/.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 K (*.f64 (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 K (*.f64 K K)) (*.f64 (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (-.f64 (-.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (+.f64 (neg.f64 (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))) (/.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 K (*.f64 (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) #s(literal 2 binary64))))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))))) (-.f64 (-.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (+.f64 (neg.f64 (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))) (/.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 K (*.f64 (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) #s(literal 2 binary64))))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (*.f64 (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) #s(literal 2 binary64)))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K)))))
(/ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (cos (* -1/2 (* K (+ m n)))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(+ (* M (- (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)) (cos (* -1/2 (* K (+ m n)))))) (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (/ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (cos (* -1/2 (* K (+ m n))))))
(+.f64 (/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (*.f64 M (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (/.f64 (+.f64 m n) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) #s(literal 2 binary64))))))))
(+ (* M (- (+ (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)) (cos (* -1/2 (* K (+ m n)))))) (* M (- (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (cos (* -1/2 (* K (+ m n))))) (+ (* -1 (/ (* (sin (* -1/2 (* K (+ m n)))) (- (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)) (cos (* -1/2 (* K (+ m n)))))) (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (cos (* -1/2 (* K (+ m n)))))) (* -1/2 (/ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (cos (* -1/2 (* K (+ m n)))))))))) (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (/ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (cos (* -1/2 (* K (+ m n))))))
(+.f64 (/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (*.f64 M (+.f64 (neg.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (/.f64 (+.f64 m n) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))) (-.f64 (*.f64 M (-.f64 (/.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (+.f64 (neg.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (/.f64 (+.f64 m n) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))))) (neg.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) #s(literal 2 binary64)))))))))
(+ (* M (- (+ (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)) (cos (* -1/2 (* K (+ m n)))))) (* M (- (+ (* M (- (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ (* -1 (+ m n)) (* -1/6 (pow (+ m n) 3)))) (cos (* -1/2 (* K (+ m n))))) (+ (* -1 (/ (* (sin (* -1/2 (* K (+ m n)))) (- (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (cos (* -1/2 (* K (+ m n))))) (+ (* -1 (/ (* (sin (* -1/2 (* K (+ m n)))) (- (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)) (cos (* -1/2 (* K (+ m n)))))) (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (cos (* -1/2 (* K (+ m n)))))) (* -1/2 (/ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (cos (* -1/2 (* K (+ m n))))))))) (cos (* -1/2 (* K (+ m n)))))) (+ (* -1/2 (- (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)) (cos (* -1/2 (* K (+ m n)))))) (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (* 1/6 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))))) (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))) (cos (* -1/2 (* K (+ m n)))))) (+ (* -1 (/ (* (sin (* -1/2 (* K (+ m n)))) (- (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)) (cos (* -1/2 (* K (+ m n)))))) (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (cos (* -1/2 (* K (+ m n)))))) (* -1/2 (/ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (cos (* -1/2 (* K (+ m n)))))))))) (* -1 (/ (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (/ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (cos (* -1/2 (* K (+ m n))))))
(+.f64 (/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (*.f64 M (+.f64 (neg.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (/.f64 (+.f64 m n) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))) (-.f64 (*.f64 M (+.f64 (*.f64 M (-.f64 (/.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n)))))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (+.f64 (neg.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (-.f64 (/.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (+.f64 (neg.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (/.f64 (+.f64 m n) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (/.f64 (+.f64 m n) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) #s(literal 2 binary64))))))))) (-.f64 (/.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (+.f64 (neg.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (/.f64 (+.f64 m n) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) #s(literal 2 binary64))))))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))))) (neg.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) #s(literal 2 binary64)))))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M)) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) (*.f64 #s(literal 1 binary64) M))))
(/ (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M)) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) (*.f64 #s(literal 1 binary64) M))))
(/ (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M)) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) (*.f64 #s(literal 1 binary64) M))))
(/ (exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M)) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) (*.f64 #s(literal 1 binary64) M))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos M))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 M))
(+ (* -1/2 (/ (* K (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (sin M) (+ m n)))) (pow (cos M) 2))) (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos M)))
(+.f64 (/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 M)) (*.f64 #s(literal -1/2 binary64) (*.f64 K (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (+.f64 m n) (sin.f64 M)) (pow.f64 (cos.f64 M) #s(literal 2 binary64)))))))
(+ (* K (- (* -1 (* K (+ (* -1/4 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (pow (sin M) 2) (pow (+ m n) 2))) (pow (cos M) 3))) (* -1/8 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (pow (+ m n) 2)) (cos M)))))) (* 1/2 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (sin M) (+ m n))) (pow (cos M) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos M)))
(+.f64 (/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 M)) (*.f64 K (+.f64 (neg.f64 (*.f64 K (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) (pow.f64 (sin.f64 M) #s(literal 2 binary64))) (pow.f64 (cos.f64 M) #s(literal 3 binary64))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (+.f64 m n) (+.f64 m n)) (cos.f64 M))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (+.f64 m n) (sin.f64 M)) (pow.f64 (cos.f64 M) #s(literal 2 binary64))))))))
(+ (* K (- (* K (- (* -1 (* K (+ (* -1/2 (/ (* (sin M) (* (+ m n) (+ (* -1/4 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (pow (sin M) 2) (pow (+ m n) 2))) (pow (cos M) 3))) (* -1/8 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (pow (+ m n) 2)) (cos M)))))) (cos M))) (+ (* -1/48 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (sin M) (pow (+ m n) 3))) (pow (cos M) 2))) (* 1/16 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (sin M) (pow (+ m n) 3))) (pow (cos M) 2))))))) (+ (* -1/4 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (pow (sin M) 2) (pow (+ m n) 2))) (pow (cos M) 3))) (* -1/8 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (pow (+ m n) 2)) (cos M)))))) (* 1/2 (/ (* (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (* (sin M) (+ m n))) (pow (cos M) 2))))) (/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos M)))
(+.f64 (/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 M)) (*.f64 K (+.f64 (*.f64 K (-.f64 (*.f64 (neg.f64 K) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (+.f64 m n) (sin.f64 M)) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) (pow.f64 (sin.f64 M) #s(literal 2 binary64))) (pow.f64 (cos.f64 M) #s(literal 3 binary64))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (+.f64 m n) (+.f64 m n)) (cos.f64 M))))))) (cos.f64 M)) (*.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n))) (sin.f64 M)) (pow.f64 (cos.f64 M) #s(literal 2 binary64)))) #s(literal 1/24 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) (pow.f64 (sin.f64 M) #s(literal 2 binary64))) (pow.f64 (cos.f64 M) #s(literal 3 binary64))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (+.f64 m n) (+.f64 m n)) (cos.f64 M))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (+.f64 m n) (sin.f64 M)) (pow.f64 (cos.f64 M) #s(literal 2 binary64))))))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(/ (exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))
(exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))
(+ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (* l (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))
(*.f64 (+.f64 l #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(+ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (* l (+ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (* 1/2 (* l (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))) (*.f64 l (+.f64 (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))) (*.f64 (*.f64 #s(literal 1/2 binary64) l) (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))))
(+ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (* l (+ (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))) (* l (+ (* 1/6 (* l (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (* 1/2 (exp (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))) (*.f64 l (+.f64 (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))) (*.f64 l (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 l (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))
(exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l))))
(exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))
(exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l))))
(exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))
(exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l))))
(exp (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))
(exp.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l))))
(exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(+ (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (* -1 (* m (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n))))))
(+.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (*.f64 (neg.f64 m) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))))
(+ (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (* m (+ (* -1 (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n)))) (* m (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2))))))))
(+.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (*.f64 m (+.f64 (neg.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))) (*.f64 (*.f64 m (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))))))))
(+ (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (* m (+ (* -1 (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ M (* -1/2 n)))) (* m (+ (* m (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ (* -1/4 (+ M (* -1/2 n))) (* -1/6 (pow (+ M (* -1/2 n)) 3))))) (* (exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 n)) 2)))))))))
(+.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (*.f64 m (+.f64 (neg.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))) (*.f64 m (+.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))))) (*.f64 (*.f64 m (exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))))))))))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))
(+ (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (* -1 (* n (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m))))))
(+.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))) (*.f64 (neg.f64 n) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))))
(+ (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (* n (+ (* -1 (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m)))) (* n (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2))))))))
(+.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))) (*.f64 n (+.f64 (neg.f64 (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))) (*.f64 n (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))))))))))
(+ (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (* n (+ (* -1 (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ M (* -1/2 m)))) (* n (+ (* n (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ (* -1/4 (+ M (* -1/2 m))) (* -1/6 (pow (+ M (* -1/2 m)) 3))))) (* (exp (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))) (+ 1/4 (* 1/2 (pow (+ M (* -1/2 m)) 2)))))))))
(+.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))) (*.f64 n (+.f64 (neg.f64 (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))) (*.f64 n (+.f64 (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))))) (*.f64 n (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))))))))))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))
(+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* -1 (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n)))))
(+.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (*.f64 (-.f64 #s(literal 0 binary64) M) (*.f64 (+.f64 m n) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))))
(+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* M (+ (* -1 (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n))) (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2))))))))
(+.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (*.f64 M (+.f64 (neg.f64 (*.f64 (+.f64 m n) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))) (*.f64 M (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/2 binary64))))))))
(+ (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (* M (+ (* -1 (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ m n))) (* M (+ (* M (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ (* -1 (+ m n)) (* -1/6 (pow (+ m n) 3))))) (* (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))) (+ 1 (* 1/2 (pow (+ m n) 2)))))))))
(+.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (*.f64 M (+.f64 (neg.f64 (*.f64 (+.f64 m n) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))) (*.f64 M (+.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/2 binary64)))) (*.f64 M (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n))))))))))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M)) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M)) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M)) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M)) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M))) (fabs.f64 (-.f64 n m)))))
(- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))
(-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))
(- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))
(+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))
(- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))
(+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))
(- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))
(+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))
l
(* l (- (+ 1 (/ (pow (+ M (* -1/2 (+ m n))) 2) l)) (/ (fabs (- m n)) l)))
(*.f64 l (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))) l)))
(* l (- (+ 1 (/ (pow (+ M (* -1/2 (+ m n))) 2) l)) (/ (fabs (- m n)) l)))
(*.f64 l (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))) l)))
(* l (- (+ 1 (/ (pow (+ M (* -1/2 (+ m n))) 2) l)) (/ (fabs (- m n)) l)))
(*.f64 l (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))) l)))
l
(* -1 (* l (- (* -1 (/ (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))) l)) 1)))
(*.f64 (neg.f64 l) (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))) l)) #s(literal -1 binary64)))
(* -1 (* l (- (* -1 (/ (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))) l)) 1)))
(*.f64 (neg.f64 l) (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))) l)) #s(literal -1 binary64)))
(* -1 (* l (- (* -1 (/ (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))) l)) 1)))
(*.f64 (neg.f64 l) (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))) l)) #s(literal -1 binary64)))
(- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))
(+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))
(- (+ l (+ (* -1 (* m (+ M (* -1/2 n)))) (pow (+ M (* -1/2 n)) 2))) (fabs (- m n)))
(+.f64 l (-.f64 (+.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (neg.f64 (*.f64 m (+.f64 M (*.f64 n #s(literal -1/2 binary64)))))) (fabs.f64 (-.f64 n m))))
(- (+ l (+ (* m (+ (* -1 (+ M (* -1/2 n))) (* 1/4 m))) (pow (+ M (* -1/2 n)) 2))) (fabs (- m n)))
(+.f64 l (-.f64 (+.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (*.f64 m (+.f64 (*.f64 #s(literal 1/4 binary64) m) (*.f64 #s(literal -1 binary64) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))))) (fabs.f64 (-.f64 n m))))
(- (+ l (+ (* m (+ (* -1 (+ M (* -1/2 n))) (* 1/4 m))) (pow (+ M (* -1/2 n)) 2))) (fabs (- m n)))
(+.f64 l (-.f64 (+.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (*.f64 m (+.f64 (*.f64 #s(literal 1/4 binary64) m) (*.f64 #s(literal -1 binary64) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))))) (fabs.f64 (-.f64 n m))))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 n)) m))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) m))))
(* (pow m 2) (- (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 n)) m)) (+ (/ l (pow m 2)) (/ (pow (+ M (* -1/2 n)) 2) (pow m 2))))) (/ (fabs (- m n)) (pow m 2))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (-.f64 (+.f64 (neg.f64 (/.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) m)) (+.f64 (/.f64 l (*.f64 m m)) (/.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (*.f64 m m)))) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 m m)))))
(* (pow m 2) (- (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 n)) m)) (+ (/ l (pow m 2)) (/ (pow (+ M (* -1/2 n)) 2) (pow m 2))))) (/ (fabs (- m n)) (pow m 2))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (-.f64 (+.f64 (neg.f64 (/.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) m)) (+.f64 (/.f64 l (*.f64 m m)) (/.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (*.f64 m m)))) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 m m)))))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 n)) m))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) m))))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ n (* -1 m))))) m)) (* -1/2 n))) m))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (+.f64 (*.f64 n #s(literal -1/2 binary64)) (neg.f64 (/.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))) m)))) m))))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ n (* -1 m))))) m)) (* -1/2 n))) m))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (+.f64 (*.f64 n #s(literal -1/2 binary64)) (neg.f64 (/.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))) m)))) m))))
(- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))
(-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))
(- (+ l (+ (* -1 (* n (+ M (* -1/2 m)))) (pow (+ M (* -1/2 m)) 2))) (fabs (- m n)))
(+.f64 l (-.f64 (+.f64 (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (neg.f64 (*.f64 n (+.f64 M (*.f64 m #s(literal -1/2 binary64)))))) (fabs.f64 (-.f64 n m))))
(- (+ l (+ (* n (+ (* -1 (+ M (* -1/2 m))) (* 1/4 n))) (pow (+ M (* -1/2 m)) 2))) (fabs (- m n)))
(+.f64 l (-.f64 (+.f64 (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (*.f64 n (+.f64 (*.f64 #s(literal 1/4 binary64) n) (*.f64 #s(literal -1 binary64) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))))) (fabs.f64 (-.f64 n m))))
(- (+ l (+ (* n (+ (* -1 (+ M (* -1/2 m))) (* 1/4 n))) (pow (+ M (* -1/2 m)) 2))) (fabs (- m n)))
(+.f64 l (-.f64 (+.f64 (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (*.f64 n (+.f64 (*.f64 #s(literal 1/4 binary64) n) (*.f64 #s(literal -1 binary64) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))))) (fabs.f64 (-.f64 n m))))
(* 1/4 (pow n 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 m)) n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) n))))
(* (pow n 2) (- (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 m)) n)) (+ (/ l (pow n 2)) (/ (pow (+ M (* -1/2 m)) 2) (pow n 2))))) (/ (fabs (- m n)) (pow n 2))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (-.f64 (+.f64 (+.f64 (neg.f64 (/.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) n)) (/.f64 l (*.f64 n n))) (/.f64 (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (*.f64 n n))) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 n n)))))
(* (pow n 2) (- (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 m)) n)) (+ (/ l (pow n 2)) (/ (pow (+ M (* -1/2 m)) 2) (pow n 2))))) (/ (fabs (- m n)) (pow n 2))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (-.f64 (+.f64 (+.f64 (neg.f64 (/.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) n)) (/.f64 l (*.f64 n n))) (/.f64 (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (*.f64 n n))) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 n n)))))
(* 1/4 (pow n 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 m)) n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (+ m (* -1 n)))) n)) (* -1/2 m))) n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (+.f64 (*.f64 m #s(literal -1/2 binary64)) (neg.f64 (/.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))) n)))) n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (+ m (* -1 n)))) n)) (* -1/2 m))) n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (+.f64 (*.f64 m #s(literal -1/2 binary64)) (neg.f64 (/.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))) n)))) n))))
(- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))
(- (+ l (+ (* -1 (* M (+ m n))) (* 1/4 (pow (+ m n) 2)))) (fabs (- m n)))
(-.f64 (+.f64 (+.f64 l (neg.f64 (*.f64 (+.f64 m n) M))) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m)))
(- (+ l (+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))) (fabs (- m n)))
(+.f64 l (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (*.f64 M (+.f64 M (*.f64 (+.f64 m n) #s(literal -1 binary64))))) (fabs.f64 (-.f64 n m))))
(- (+ l (+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))) (fabs (- m n)))
(+.f64 l (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (*.f64 M (+.f64 M (*.f64 (+.f64 m n) #s(literal -1 binary64))))) (fabs.f64 (-.f64 n m))))
(pow M 2)
(*.f64 M M)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) M)))
(* (pow M 2) (- (+ 1 (+ (* -1 (/ (+ m n) M)) (+ (* 1/4 (/ (pow (+ m n) 2) (pow M 2))) (/ l (pow M 2))))) (/ (fabs (- m n)) (pow M 2))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) M) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 m n) (+.f64 m n)) (*.f64 M M))) (/.f64 l (*.f64 M M)))) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 M M)))))
(* (pow M 2) (- (+ 1 (+ (* -1 (/ (+ m n) M)) (+ (* 1/4 (/ (pow (+ m n) 2) (pow M 2))) (/ l (pow M 2))))) (/ (fabs (- m n)) (pow M 2))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) M) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 m n) (+.f64 m n)) (*.f64 M M))) (/.f64 l (*.f64 M M)))) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 M M)))))
(pow M 2)
(*.f64 M M)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) M)))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1 (/ (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))) M)))) M))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (+.f64 (+.f64 m n) (neg.f64 (/.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))) M))) M))))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1 (/ (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))) M)))) M))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (+.f64 (+.f64 m n) (neg.f64 (/.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))) M))) M))))
(exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))
(exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(+ (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))) (* -1 (* l (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))))
(+.f64 (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (*.f64 (neg.f64 l) (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))
(+ (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))) (* l (+ (* -1 (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (* 1/2 (* l (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))))))
(+.f64 (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (*.f64 l (+.f64 (neg.f64 (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) l) (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))))
(+ (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))) (* l (+ (* -1 (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))) (* l (+ (* -1/6 (* l (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))) (* 1/2 (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))))))
(+.f64 (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (*.f64 l (+.f64 (neg.f64 (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 l (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) l) (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))
(exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l)))))
(exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))
(exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l)))))
(exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))
(exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l)))))
(exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l)))))
(exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l)))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(+ (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (* m (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ M (* -1/2 n)))))
(+.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 m (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))))
(+ (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (* m (+ (* m (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 n)) 2)) 1/4))) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ M (* -1/2 n))))))
(+.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 m (+.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))) (*.f64 m (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))) #s(literal -1/4 binary64)))))))
(+ (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (* m (+ (* m (+ (* m (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ (* -1/4 (+ M (* -1/2 n))) (* 1/6 (pow (+ M (* -1/2 n)) 3))))) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 n)) 2)) 1/4)))) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ M (* -1/2 n))))))
(+.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 m (+.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))) (*.f64 m (+.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))) #s(literal -1/4 binary64))) (*.f64 (*.f64 m (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))))))))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m)))))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))
(+ (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (* n (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ M (* -1/2 m)))))
(+.f64 (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (*.f64 n (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))))))
(+ (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (* n (+ (* n (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 m)) 2)) 1/4))) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ M (* -1/2 m))))))
(+.f64 (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (*.f64 n (+.f64 (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))) (*.f64 n (*.f64 (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) #s(literal -1/4 binary64)))))))
(+ (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (* n (+ (* n (+ (* n (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ (* -1/4 (+ M (* -1/2 m))) (* 1/6 (pow (+ M (* -1/2 m)) 3))))) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 m)) 2)) 1/4)))) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ M (* -1/2 m))))))
(+.f64 (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (*.f64 n (+.f64 (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))) (*.f64 n (+.f64 (*.f64 (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) #s(literal -1/4 binary64))) (*.f64 n (*.f64 (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))))))))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n))))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))
(+ (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (* M (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ m n))))
(+.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (*.f64 M (*.f64 (+.f64 m n) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))))))
(+ (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (* M (+ (* M (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (- (* 1/2 (pow (+ m n) 2)) 1))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ m n)))))
(+.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (*.f64 M (+.f64 (*.f64 (+.f64 m n) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))) (*.f64 M (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/2 binary64)) #s(literal -1 binary64)))))))
(+ (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (* M (+ (* M (+ (* M (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ (* -1 (+ m n)) (* 1/6 (pow (+ m n) 3))))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (- (* 1/2 (pow (+ m n) 2)) 1)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ m n)))))
(+.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (*.f64 M (+.f64 (*.f64 (+.f64 m n) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))) (*.f64 M (+.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/2 binary64)) #s(literal -1 binary64))) (*.f64 M (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) (*.f64 (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n))) #s(literal 1/6 binary64))))))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M)) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M)) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M)) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M))) (fabs.f64 (-.f64 n m))))))
(exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n)))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M)) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M))) (fabs.f64 (-.f64 n m))))))
(* (cos (neg M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (cos.f64 M) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))
(+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))) (* (sin (neg M)) (+ m n))))) (* (cos (neg M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))))
(+.f64 (*.f64 (cos.f64 M) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))) (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 (+.f64 m n) (sin.f64 (-.f64 #s(literal 0 binary64) M))))))
(+ (* K (+ (* -1/2 (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))) (* (sin (neg M)) (+ m n)))) (* -1/8 (* K (* (cos (neg M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))) (pow (+ m n) 2))))))) (* (cos (neg M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))))
(+.f64 (*.f64 (cos.f64 M) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))) (*.f64 K (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 (+.f64 m n) (sin.f64 (-.f64 #s(literal 0 binary64) M))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K (cos.f64 M)) (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))))))))
(+ (* K (+ (* -1/2 (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))) (* (sin (neg M)) (+ m n)))) (* K (+ (* -1/8 (* (cos (neg M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))) (pow (+ m n) 2)))) (* 1/48 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))) (* (sin (neg M)) (pow (+ m n) 3))))))))) (* (cos (neg M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n)))))))
(+.f64 (*.f64 (cos.f64 M) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))) (*.f64 K (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 (+.f64 m n) (sin.f64 (-.f64 #s(literal 0 binary64) M))))) (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 M)) (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))) (*.f64 #s(literal 1/48 binary64) (*.f64 K (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n))) (sin.f64 (-.f64 #s(literal 0 binary64) M)))))))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K n)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)))
(+ (* m (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K n)) M))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ M (* -1/2 n)))))) (* (cos (- (* 1/2 (* K n)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))
(+.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))) (*.f64 m (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)))) (*.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))))))
(+ (* m (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K n)) M))))) (+ (* m (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (* (sin (- (* 1/2 (* K n)) M)) (+ M (* -1/2 n)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K n)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 n)) 2)) 1/4)))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ M (* -1/2 n))))))) (* (cos (- (* 1/2 (* K n)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))
(+.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))) (*.f64 m (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)))) (+.f64 (*.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))) (*.f64 m (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))) (*.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))) #s(literal -1/4 binary64))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))))))))))
(+ (* m (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K n)) M))))) (+ (* m (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (* (sin (- (* 1/2 (* K n)) M)) (+ M (* -1/2 n)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K n)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))) (+ (* m (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (* (sin (- (* 1/2 (* K n)) M)) (- (* 1/2 (pow (+ M (* -1/2 n)) 2)) 1/4))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ M (* -1/2 n)))))) (+ (* 1/48 (* (pow K 3) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K n)) M))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ (* -1/4 (+ M (* -1/2 n))) (* 1/6 (pow (+ M (* -1/2 n)) 3))))))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 n)) 2)) 1/4))))))) (* (cos (- (* 1/2 (* K n)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n))))) (+ M (* -1/2 n))))))) (* (cos (- (* 1/2 (* K n)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (- m n)))))))
(+.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))) (*.f64 m (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)))) (+.f64 (*.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))) (*.f64 m (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))) (+.f64 (*.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))) #s(literal -1/4 binary64))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))) (*.f64 m (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))) #s(literal -1/4 binary64)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))))))) (+.f64 (*.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 K (*.f64 K K))) (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)))) (*.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))))))))))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (-.f64 n (neg.f64 m))) M)))
(* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (-.f64 n (neg.f64 m))) M)))
(* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (-.f64 n (neg.f64 m))) M)))
(* (cos (- (* 1/2 (* K (- n (* -1 m)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- n (* -1 m)))) 2)) (fabs (neg (+ n (* -1 m))))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 n (neg.f64 m)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (-.f64 n (neg.f64 m))) M)))
(* (cos (- (* 1/2 (* K m)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)))
(+ (* n (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K m)) M))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ M (* -1/2 m)))))) (* (cos (- (* 1/2 (* K m)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))
(+.f64 (*.f64 (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))) (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)))) (*.f64 (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))))))
(+ (* n (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K m)) M))))) (+ (* n (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (* (sin (- (* 1/2 (* K m)) M)) (+ M (* -1/2 m)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K m)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 m)) 2)) 1/4)))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ M (* -1/2 m))))))) (* (cos (- (* 1/2 (* K m)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))
(+.f64 (*.f64 (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))) (*.f64 n (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)))) (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))) (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))))) (*.f64 (*.f64 (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) #s(literal -1/4 binary64))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))))))) (*.f64 (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))))))
(+ (* n (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K m)) M))))) (+ (* n (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (* (sin (- (* 1/2 (* K m)) M)) (+ M (* -1/2 m)))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K m)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))) (+ (* n (+ (* -1/2 (* K (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (* (sin (- (* 1/2 (* K m)) M)) (- (* 1/2 (pow (+ M (* -1/2 m)) 2)) 1/4))))) (+ (* -1/8 (* (pow K 2) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ M (* -1/2 m)))))) (+ (* 1/48 (* (pow K 3) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (sin (- (* 1/2 (* K m)) M))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ (* -1/4 (+ M (* -1/2 m))) (* 1/6 (pow (+ M (* -1/2 m)) 3))))))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (- (* 1/2 (pow (+ M (* -1/2 m)) 2)) 1/4))))))) (* (cos (- (* 1/2 (* K m)) M)) (* (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n))))) (+ M (* -1/2 m))))))) (* (cos (- (* 1/2 (* K m)) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 m)) 2)) (fabs (- m n)))))))
(+.f64 (*.f64 (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))) (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)))) (+.f64 (*.f64 (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))) (*.f64 n (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))) (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))))) (+.f64 (*.f64 (*.f64 (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) #s(literal -1/4 binary64))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))) (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) #s(literal -1/4 binary64)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m)))))))) (+.f64 (*.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 K (*.f64 K K))) (*.f64 (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)))) (*.f64 (*.f64 (exp.f64 (neg.f64 (-.f64 (+.f64 l (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))) (fabs.f64 (-.f64 n m))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))) (+.f64 (*.f64 #s(literal -1/4 binary64) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))))))))))))))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K)) M)))
(* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K)) M)))
(* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K)) M)))
(* (cos (- (* 1/2 (* K (- m (* -1 n)))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (- m (* -1 n)))) 2)) (fabs (+ m (* -1 n)))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (-.f64 m (neg.f64 n)) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K)) M)))
(* (cos (* 1/2 (* K (+ m n)))) (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K))))
(+ (* M (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ m n))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (sin (* 1/2 (* K (+ m n))))))) (* (cos (* 1/2 (* K (+ m n)))) (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))
(+.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)))) (*.f64 M (+.f64 (*.f64 (*.f64 (+.f64 m n) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)))) (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)))))))
(+ (* M (+ (* M (+ (* -1/2 (* (cos (* 1/2 (* K (+ m n)))) (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (- (* 1/2 (pow (+ m n) 2)) 1))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (* (sin (* 1/2 (* K (+ m n)))) (+ m n)))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ m n))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (sin (* 1/2 (* K (+ m n)))))))) (* (cos (* 1/2 (* K (+ m n)))) (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))
(+.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)))) (*.f64 M (+.f64 (+.f64 (*.f64 (*.f64 (+.f64 m n) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)))) (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K))))) (*.f64 M (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K))))) (*.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/2 binary64)) #s(literal -1 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K))))) (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (*.f64 (+.f64 m n) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K))))))))))
(+ (* M (+ (* M (+ (* -1/2 (* (cos (* 1/2 (* K (+ m n)))) (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))) (+ (* M (+ (* -1/2 (* (cos (* 1/2 (* K (+ m n)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ m n)))) (+ (* -1/6 (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (sin (* 1/2 (* K (+ m n)))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ (* -1 (+ m n)) (* 1/6 (pow (+ m n) 3))))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (* (sin (* 1/2 (* K (+ m n)))) (- (* 1/2 (pow (+ m n) 2)) 1))))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (- (* 1/2 (pow (+ m n) 2)) 1))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (* (sin (* 1/2 (* K (+ m n)))) (+ m n))))))) (+ (* (cos (* 1/2 (* K (+ m n)))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (+ m n))) (* (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))) (sin (* 1/2 (* K (+ m n)))))))) (* (cos (* 1/2 (* K (+ m n)))) (exp (* -1 (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))
(+.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)))) (*.f64 M (+.f64 (+.f64 (*.f64 (*.f64 (+.f64 m n) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)))) (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K))))) (*.f64 M (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K))))) (+.f64 (+.f64 (*.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/2 binary64)) #s(literal -1 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)))) (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (*.f64 (+.f64 m n) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)))))) (*.f64 M (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)))) (*.f64 (+.f64 m n) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))))) (+.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K))))) (*.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) (*.f64 (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n))) #s(literal 1/6 binary64)))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K))))) (*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (*.f64 (+.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K))))))))))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M)) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M)) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M)) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (+ (* -1 M) (* 1/2 (* K (+ m n))))) (exp (* -1 (- (+ l (pow (- (* -1/2 (+ m n)) (* -1 M)) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M)) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) M))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(+ (* -1 (* l (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))) (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))
(+.f64 (*.f64 (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))) (*.f64 (neg.f64 l) (*.f64 (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))))
(+ (* l (+ (* -1 (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))) (* 1/2 (* l (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))))) (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))
(+.f64 (*.f64 (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))) (*.f64 l (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))) (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) l) (*.f64 (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))))))
(+ (* l (+ (* -1 (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))) (* l (+ (* -1/6 (* l (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))) (* 1/2 (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n))))))))))) (* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (fabs (- m n)))))))
(+.f64 (*.f64 (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))) (*.f64 l (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))) (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (*.f64 l (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) l) (*.f64 (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))))))))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (+ l (pow (+ M (* -1/2 (+ m n))) 2)) (fabs (- m n))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))))
(*.f64 (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))))
(*.f64 (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))))
(*.f64 (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* (cos (- (* 1/2 (* K (+ m n))) M)) (exp (* -1 (- (pow (+ M (* -1/2 (+ m n))) 2) (+ (fabs (- m n)) (* -1 l))))))
(*.f64 (exp.f64 (neg.f64 (-.f64 (*.f64 (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64))) (+.f64 M (*.f64 (+.f64 m n) #s(literal -1/2 binary64)))) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l))))) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(cos (neg M))
(cos.f64 M)
(+ (cos (neg M)) (* -1/2 (* K (* (sin (neg M)) (+ m n)))))
(+.f64 (cos.f64 M) (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (+.f64 m n) (sin.f64 (-.f64 #s(literal 0 binary64) M)))))
(+ (cos (neg M)) (* K (- (* -1/8 (* K (* (cos (neg M)) (pow (+ m n) 2)))) (* 1/2 (* (sin (neg M)) (+ m n))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) K) (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) (cos.f64 M))) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) (sin.f64 (-.f64 #s(literal 0 binary64) M)))))))
(+ (cos (neg M)) (* K (- (* K (+ (* -1/8 (* (cos (neg M)) (pow (+ m n) 2))) (* 1/48 (* K (* (sin (neg M)) (pow (+ m n) 3)))))) (* 1/2 (* (sin (neg M)) (+ m n))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 M)) (*.f64 (+.f64 m n) (+.f64 m n))) (*.f64 (*.f64 #s(literal 1/48 binary64) K) (*.f64 (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n))) (sin.f64 (-.f64 #s(literal 0 binary64) M)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) (sin.f64 (-.f64 #s(literal 0 binary64) M)))))))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (- (* 1/2 (* K n)) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))
(+ (cos (- (* 1/2 (* K n)) M)) (* -1/2 (* K (* m (sin (- (* 1/2 (* K n)) M))))))
(+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)))))
(+ (cos (- (* 1/2 (* K n)) M)) (* m (- (* -1/8 (* (pow K 2) (* m (cos (- (* 1/2 (* K n)) M))))) (* 1/2 (* K (sin (- (* 1/2 (* K n)) M)))))))
(+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (*.f64 m (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) m) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)))) (*.f64 #s(literal -1/2 binary64) (*.f64 K (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)))))))
(+ (cos (- (* 1/2 (* K n)) M)) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (- (* 1/2 (* K n)) M)))) (* 1/48 (* (pow K 3) (* m (sin (- (* 1/2 (* K n)) M))))))) (* 1/2 (* K (sin (- (* 1/2 (* K n)) M)))))))
(+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (*.f64 m (+.f64 (*.f64 m (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))) (*.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) m) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 K (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)))))))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (- (* 1/2 (* K (- n (* -1 m)))) M))
(cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (-.f64 n (neg.f64 m))) M))
(cos (- (* 1/2 (* K (- n (* -1 m)))) M))
(cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (-.f64 n (neg.f64 m))) M))
(cos (- (* 1/2 (* K (- n (* -1 m)))) M))
(cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (-.f64 n (neg.f64 m))) M))
(cos (- (* 1/2 (* K (- n (* -1 m)))) M))
(cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (-.f64 n (neg.f64 m))) M))
(cos (- (* 1/2 (* K m)) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M))
(+ (cos (- (* 1/2 (* K m)) M)) (* -1/2 (* K (* n (sin (- (* 1/2 (* K m)) M))))))
(+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 n K) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)))))
(+ (cos (- (* 1/2 (* K m)) M)) (* n (- (* -1/8 (* (pow K 2) (* n (cos (- (* 1/2 (* K m)) M))))) (* 1/2 (* K (sin (- (* 1/2 (* K m)) M)))))))
(+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) (*.f64 n (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) n) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)))) (*.f64 #s(literal -1/2 binary64) (*.f64 K (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)))))))
(+ (cos (- (* 1/2 (* K m)) M)) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (- (* 1/2 (* K m)) M)))) (* 1/48 (* (pow K 3) (* n (sin (- (* 1/2 (* K m)) M))))))) (* 1/2 (* K (sin (- (* 1/2 (* K m)) M)))))))
(+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) (*.f64 n (+.f64 (*.f64 n (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)))) (*.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) n) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 K (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)))))))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (- (* 1/2 (* K (- m (* -1 n)))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K)) M))
(cos (- (* 1/2 (* K (- m (* -1 n)))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K)) M))
(cos (- (* 1/2 (* K (- m (* -1 n)))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K)) M))
(cos (- (* 1/2 (* K (- m (* -1 n)))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K)) M))
(cos (* 1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)))
(+ (cos (* 1/2 (* K (+ m n)))) (* M (sin (* 1/2 (* K (+ m n))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K))) (*.f64 M (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)))))
(+ (cos (* 1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* 1/2 (* K (+ m n)))))) (* -1 (sin (* 1/2 (* K (+ m n))))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K))) (*.f64 M (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)))) (*.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)))))))
(+ (cos (* 1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* 1/2 (* K (+ m n))))) (* -1/6 (* M (sin (* 1/2 (* K (+ m n)))))))) (* -1 (sin (* 1/2 (* K (+ m n))))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K))) (*.f64 M (+.f64 (*.f64 M (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)))) (*.f64 (*.f64 #s(literal -1/6 binary64) M) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)))))) (*.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)))))))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (- (* 1/2 (* K (+ m n))) M))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(cos (+ (* -1 M) (* 1/2 (* K (+ m n)))))
(cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M))
(* -1 M)
(-.f64 #s(literal 0 binary64) M)
(- (* 1/2 (* K (+ m n))) M)
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)
(- (* 1/2 (* K (+ m n))) M)
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)
(- (* 1/2 (* K (+ m n))) M)
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)
(* 1/2 (* K (+ m n)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K))
(* K (+ (* -1 (/ M K)) (* 1/2 (+ m n))))
(*.f64 K (+.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) M) K)))
(* K (+ (* -1 (/ M K)) (* 1/2 (+ m n))))
(*.f64 K (+.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) M) K)))
(* K (+ (* -1 (/ M K)) (* 1/2 (+ m n))))
(*.f64 K (+.f64 (*.f64 (+.f64 m n) #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) M) K)))
(* 1/2 (* K (+ m n)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1 (* K (+ (* -1/2 (+ m n)) (/ M K))))
(*.f64 (neg.f64 K) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (/.f64 M K)))
(* -1 (* K (+ (* -1/2 (+ m n)) (/ M K))))
(*.f64 (neg.f64 K) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (/.f64 M K)))
(* -1 (* K (+ (* -1/2 (+ m n)) (/ M K))))
(*.f64 (neg.f64 K) (+.f64 (*.f64 (+.f64 m n) #s(literal -1/2 binary64)) (/.f64 M K)))
(- (* 1/2 (* K n)) M)
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)
(- (+ (* 1/2 (* K m)) (* 1/2 (* K n))) M)
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)
(- (+ (* 1/2 (* K m)) (* 1/2 (* K n))) M)
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)
(- (+ (* 1/2 (* K m)) (* 1/2 (* K n))) M)
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)
(* 1/2 (* K m))
(*.f64 #s(literal 1/2 binary64) (*.f64 m K))
(* m (- (+ (* 1/2 K) (* 1/2 (/ (* K n) m))) (/ M m)))
(*.f64 m (+.f64 (*.f64 #s(literal 1/2 binary64) K) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M) m)))
(* m (- (+ (* 1/2 K) (* 1/2 (/ (* K n) m))) (/ M m)))
(*.f64 m (+.f64 (*.f64 #s(literal 1/2 binary64) K) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M) m)))
(* m (- (+ (* 1/2 K) (* 1/2 (/ (* K n) m))) (/ M m)))
(*.f64 m (+.f64 (*.f64 #s(literal 1/2 binary64) K) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M) m)))
(* 1/2 (* K m))
(*.f64 #s(literal 1/2 binary64) (*.f64 m K))
(* -1 (* m (+ (* -1 (/ (- (* 1/2 (* K n)) M) m)) (* -1/2 K))))
(*.f64 (neg.f64 m) (+.f64 (*.f64 #s(literal -1/2 binary64) K) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M) m))))
(* -1 (* m (+ (* -1 (/ (- (* 1/2 (* K n)) M) m)) (* -1/2 K))))
(*.f64 (neg.f64 m) (+.f64 (*.f64 #s(literal -1/2 binary64) K) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M) m))))
(* -1 (* m (+ (* -1 (/ (- (* 1/2 (* K n)) M) m)) (* -1/2 K))))
(*.f64 (neg.f64 m) (+.f64 (*.f64 #s(literal -1/2 binary64) K) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M) m))))
(- (* 1/2 (* K m)) M)
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)
(- (+ (* 1/2 (* K m)) (* 1/2 (* K n))) M)
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)
(- (+ (* 1/2 (* K m)) (* 1/2 (* K n))) M)
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)
(- (+ (* 1/2 (* K m)) (* 1/2 (* K n))) M)
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)
(* 1/2 (* K n))
(*.f64 #s(literal 1/2 binary64) (*.f64 n K))
(* n (- (+ (* 1/2 K) (* 1/2 (/ (* K m) n))) (/ M n)))
(*.f64 n (+.f64 (*.f64 #s(literal 1/2 binary64) K) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M) n)))
(* n (- (+ (* 1/2 K) (* 1/2 (/ (* K m) n))) (/ M n)))
(*.f64 n (+.f64 (*.f64 #s(literal 1/2 binary64) K) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M) n)))
(* n (- (+ (* 1/2 K) (* 1/2 (/ (* K m) n))) (/ M n)))
(*.f64 n (+.f64 (*.f64 #s(literal 1/2 binary64) K) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M) n)))
(* 1/2 (* K n))
(*.f64 #s(literal 1/2 binary64) (*.f64 n K))
(* -1 (* n (+ (* -1 (/ (- (* 1/2 (* K m)) M) n)) (* -1/2 K))))
(*.f64 (neg.f64 n) (+.f64 (*.f64 #s(literal -1/2 binary64) K) (/.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) n)))
(* -1 (* n (+ (* -1 (/ (- (* 1/2 (* K m)) M) n)) (* -1/2 K))))
(*.f64 (neg.f64 n) (+.f64 (*.f64 #s(literal -1/2 binary64) K) (/.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) n)))
(* -1 (* n (+ (* -1 (/ (- (* 1/2 (* K m)) M) n)) (* -1/2 K))))
(*.f64 (neg.f64 n) (+.f64 (*.f64 #s(literal -1/2 binary64) K) (/.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m K)) M)) n)))
(* 1/2 (* K (+ m n)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K))
(+ (* -1 M) (* 1/2 (* K (+ m n))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)
(+ (* -1 M) (* 1/2 (* K (+ m n))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)
(+ (* -1 M) (* 1/2 (* K (+ m n))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M)
(* -1 M)
(-.f64 #s(literal 0 binary64) M)
(* M (- (* 1/2 (/ (* K (+ m n)) M)) 1))
(*.f64 M (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M) #s(literal -1 binary64)))
(* M (- (* 1/2 (/ (* K (+ m n)) M)) 1))
(*.f64 M (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M) #s(literal -1 binary64)))
(* M (- (* 1/2 (/ (* K (+ m n)) M)) 1))
(*.f64 M (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) K)) M) #s(literal -1 binary64)))
(* -1 M)
(-.f64 #s(literal 0 binary64) M)
(* -1 (* M (+ 1 (* -1/2 (/ (* K (+ m n)) M)))))
(*.f64 (-.f64 #s(literal 0 binary64) M) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* -1 (* M (+ 1 (* -1/2 (/ (* K (+ m n)) M)))))
(*.f64 (-.f64 #s(literal 0 binary64) M) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(* -1 (* M (+ 1 (* -1/2 (/ (* K (+ m n)) M)))))
(*.f64 (-.f64 #s(literal 0 binary64) M) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) M)))
(pow (- (* 1/2 n) M) 2)
(*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))
(+ (* m (- (* 1/2 n) M)) (pow (- (* 1/2 n) M) 2))
(+.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (*.f64 m (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)))
(+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))
(+.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (*.f64 m (+.f64 (*.f64 #s(literal 1/4 binary64) m) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))
(+ (* m (- (+ (* 1/4 m) (* 1/2 n)) M)) (pow (- (* 1/2 n) M) 2))
(+.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (*.f64 m (+.f64 (*.f64 #s(literal 1/4 binary64) m) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))
(*.f64 (*.f64 m m) (-.f64 (+.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 n #s(literal 1/2 binary64)) m)) (/.f64 M m)))
(* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2)))) (/ M m)))
(*.f64 (*.f64 m m) (-.f64 (+.f64 (+.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 n #s(literal 1/2 binary64)) m)) (/.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (*.f64 m m))) (/.f64 M m)))
(* (pow m 2) (- (+ 1/4 (+ (* 1/2 (/ n m)) (/ (pow (- (* 1/2 n) M) 2) (pow m 2)))) (/ M m)))
(*.f64 (*.f64 m m) (-.f64 (+.f64 (+.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 n #s(literal 1/2 binary64)) m)) (/.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (*.f64 m m))) (/.f64 M m)))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* (pow m 2) (- (+ 1/4 (* 1/2 (/ n m))) (/ M m)))
(*.f64 (*.f64 m m) (-.f64 (+.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 n #s(literal 1/2 binary64)) m)) (/.f64 M m)))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (pow (- (* 1/2 n) M) 2) m))) m))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (/.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) m))) m))))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 n) M)) (* -1 (/ (pow (- (* 1/2 n) M) 2) m))) m))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (/.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) m))) m))))
(pow (- (* 1/2 m) M) 2)
(*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M))
(+ (* n (- (* 1/2 m) M)) (pow (- (* 1/2 m) M) 2))
(+.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (*.f64 n (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)))
(+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))
(+.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (*.f64 n (+.f64 (*.f64 #s(literal 1/4 binary64) n) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M))))
(+ (* n (- (+ (* 1/4 n) (* 1/2 m)) M)) (pow (- (* 1/2 m) M) 2))
(+.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (*.f64 n (+.f64 (*.f64 #s(literal 1/4 binary64) n) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M))))
(* 1/4 (pow n 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
(* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 m #s(literal 1/2 binary64)) n) (/.f64 M n))))
(* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2)))) (/ M n)))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (-.f64 (+.f64 (/.f64 (*.f64 m #s(literal 1/2 binary64)) n) (/.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (*.f64 n n))) (/.f64 M n))))
(* (pow n 2) (- (+ 1/4 (+ (* 1/2 (/ m n)) (/ (pow (- (* 1/2 m) M) 2) (pow n 2)))) (/ M n)))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (-.f64 (+.f64 (/.f64 (*.f64 m #s(literal 1/2 binary64)) n) (/.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) (*.f64 n n))) (/.f64 M n))))
(* 1/4 (pow n 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
(* (pow n 2) (- (+ 1/4 (* 1/2 (/ m n))) (/ M n)))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 m #s(literal 1/2 binary64)) n) (/.f64 M n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (pow (- (* 1/2 m) M) 2) n))) n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (/.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) n))) n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (- (* 1/2 m) M)) (* -1 (/ (pow (- (* 1/2 m) M) 2) n))) n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (/.f64 (*.f64 (-.f64 (*.f64 m #s(literal 1/2 binary64)) M) (-.f64 (*.f64 m #s(literal 1/2 binary64)) M)) n))) n))))
(* 1/4 (pow (+ m n) 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))
(+ (* -1 (* M (+ m n))) (* 1/4 (pow (+ m n) 2)))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (neg.f64 (*.f64 (+.f64 m n) M)))
(+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (*.f64 M (+.f64 M (*.f64 (+.f64 m n) #s(literal -1 binary64)))))
(+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (*.f64 M (+.f64 M (*.f64 (+.f64 m n) #s(literal -1 binary64)))))
(pow M 2)
(*.f64 M M)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) M)))
(* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))
(*.f64 (*.f64 M M) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) M)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 m n) (+.f64 m n)) (*.f64 M M)))))
(* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))
(*.f64 (*.f64 M M) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) M)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 m n) (+.f64 m n)) (*.f64 M M)))))
(pow M 2)
(*.f64 M M)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) M)))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (+.f64 (+.f64 m n) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) M)) M))))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (+.f64 (+.f64 m n) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) M)) M))))
(exp (- l (fabs (- m n))))
(exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))
(+ (exp (- l (fabs (- m n)))) (* (pow M 2) (exp (- l (fabs (- m n))))))
(*.f64 (+.f64 (*.f64 M M) #s(literal 1 binary64)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))
(+ (exp (- l (fabs (- m n)))) (* (pow M 2) (+ (exp (- l (fabs (- m n)))) (* 1/2 (* (pow M 2) (exp (- l (fabs (- m n)))))))))
(+.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (*.f64 (*.f64 M M) (+.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M M)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))))
(+ (exp (- l (fabs (- m n)))) (* (pow M 2) (+ (exp (- l (fabs (- m n)))) (* (pow M 2) (+ (* 1/6 (* (pow M 2) (exp (- l (fabs (- m n)))))) (* 1/2 (exp (- l (fabs (- m n))))))))))
(+.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (*.f64 (*.f64 M M) (+.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 M M)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (pow M 2) (fabs (- m n))))
(exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))
(+ (exp (- (pow M 2) (fabs (- m n)))) (* l (exp (- (pow M 2) (fabs (- m n))))))
(*.f64 (+.f64 l #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m)))))
(+ (exp (- (pow M 2) (fabs (- m n)))) (* l (+ (exp (- (pow M 2) (fabs (- m n)))) (* 1/2 (* l (exp (- (pow M 2) (fabs (- m n)))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m)))) (*.f64 l (+.f64 (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m)))) (*.f64 (*.f64 #s(literal 1/2 binary64) l) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))))))
(+ (exp (- (pow M 2) (fabs (- m n)))) (* l (+ (exp (- (pow M 2) (fabs (- m n)))) (* l (+ (* 1/6 (* l (exp (- (pow M 2) (fabs (- m n)))))) (* 1/2 (exp (- (pow M 2) (fabs (- m n))))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m)))) (*.f64 l (+.f64 (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m)))) (*.f64 l (+.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) l) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))))))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l))))
(exp.f64 (-.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))) (neg.f64 l)))
(exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l))))
(exp.f64 (-.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))) (neg.f64 l)))
(exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l))))
(exp.f64 (-.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))) (neg.f64 l)))
(exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l))))
(exp.f64 (-.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))) (neg.f64 l)))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (- m n))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n)))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n)))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n)))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n)))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(* K (+ m n))
(*.f64 (+.f64 m n) K)
(* K (+ m n))
(*.f64 (+.f64 m n) K)
(* K (+ m n))
(*.f64 (+.f64 m n) K)
(* K (+ m n))
(*.f64 (+.f64 m n) K)
(* K (+ m n))
(*.f64 (+.f64 m n) K)
(* K (+ m n))
(*.f64 (+.f64 m n) K)
(* K (+ m n))
(*.f64 (+.f64 m n) K)
(* K (+ m n))
(*.f64 (+.f64 m n) K)
(* K (+ m n))
(*.f64 (+.f64 m n) K)
(* K (+ m n))
(*.f64 (+.f64 m n) K)
(* K (+ m n))
(*.f64 (+.f64 m n) K)
(* K (+ m n))
(*.f64 (+.f64 m n) K)
(* K n)
(*.f64 n K)
(+ (* K m) (* K n))
(*.f64 (+.f64 m n) K)
(+ (* K m) (* K n))
(*.f64 (+.f64 m n) K)
(+ (* K m) (* K n))
(*.f64 (+.f64 m n) K)
(* K m)
(*.f64 m K)
(* m (+ K (/ (* K n) m)))
(*.f64 m (+.f64 K (/.f64 (*.f64 n K) m)))
(* m (+ K (/ (* K n) m)))
(*.f64 m (+.f64 K (/.f64 (*.f64 n K) m)))
(* m (+ K (/ (* K n) m)))
(*.f64 m (+.f64 K (/.f64 (*.f64 n K) m)))
(* K m)
(*.f64 m K)
(* -1 (* m (+ (* -1 K) (* -1 (/ (* K n) m)))))
(*.f64 (neg.f64 m) (*.f64 #s(literal -1 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* -1 (* m (+ (* -1 K) (* -1 (/ (* K n) m)))))
(*.f64 (neg.f64 m) (*.f64 #s(literal -1 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* -1 (* m (+ (* -1 K) (* -1 (/ (* K n) m)))))
(*.f64 (neg.f64 m) (*.f64 #s(literal -1 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* K m)
(*.f64 m K)
(+ (* K m) (* K n))
(*.f64 (+.f64 m n) K)
(+ (* K m) (* K n))
(*.f64 (+.f64 m n) K)
(+ (* K m) (* K n))
(*.f64 (+.f64 m n) K)
(* K n)
(*.f64 n K)
(* n (+ K (/ (* K m) n)))
(*.f64 n (+.f64 K (/.f64 (*.f64 m K) n)))
(* n (+ K (/ (* K m) n)))
(*.f64 n (+.f64 K (/.f64 (*.f64 m K) n)))
(* n (+ K (/ (* K m) n)))
(*.f64 n (+.f64 K (/.f64 (*.f64 m K) n)))
(* K n)
(*.f64 n K)
(* -1 (* n (+ (* -1 K) (* -1 (/ (* K m) n)))))
(neg.f64 (*.f64 n (*.f64 #s(literal -1 binary64) (+.f64 K (/.f64 (*.f64 m K) n)))))
(* -1 (* n (+ (* -1 K) (* -1 (/ (* K m) n)))))
(neg.f64 (*.f64 n (*.f64 #s(literal -1 binary64) (+.f64 K (/.f64 (*.f64 m K) n)))))
(* -1 (* n (+ (* -1 K) (* -1 (/ (* K m) n)))))
(neg.f64 (*.f64 n (*.f64 #s(literal -1 binary64) (+.f64 K (/.f64 (*.f64 m K) n)))))
(pow M 2)
(*.f64 M M)
(+ (* -1 (* M n)) (pow M 2))
(+.f64 (*.f64 M M) (*.f64 #s(literal -1 binary64) (*.f64 n M)))
(+ (* n (+ (* -1 M) (* 1/4 n))) (pow M 2))
(+.f64 (*.f64 M M) (*.f64 n (+.f64 (*.f64 #s(literal 1/4 binary64) n) (-.f64 #s(literal 0 binary64) M))))
(+ (* n (+ (* -1 M) (* 1/4 n))) (pow M 2))
(+.f64 (*.f64 M M) (*.f64 n (+.f64 (*.f64 #s(literal 1/4 binary64) n) (-.f64 #s(literal 0 binary64) M))))
(* 1/4 (pow n 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
(* (pow n 2) (+ 1/4 (* -1 (/ M n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 0 binary64) M) n)))
(* (pow n 2) (+ 1/4 (+ (* -1 (/ M n)) (/ (pow M 2) (pow n 2)))))
(*.f64 (*.f64 n n) (+.f64 (+.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 0 binary64) M) n)) (/.f64 (*.f64 M M) (*.f64 n n))))
(* (pow n 2) (+ 1/4 (+ (* -1 (/ M n)) (/ (pow M 2) (pow n 2)))))
(*.f64 (*.f64 n n) (+.f64 (+.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 0 binary64) M) n)) (/.f64 (*.f64 M M) (*.f64 n n))))
(* 1/4 (pow n 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
(* (pow n 2) (+ 1/4 (* -1 (/ M n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 0 binary64) M) n)))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ M (* -1 (/ (pow M 2) n))) n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 M M)) n)) n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ M (* -1 (/ (pow M 2) n))) n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 M M)) n)) n))))
(* 1/4 (pow n 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
(+ (* -1 (* M n)) (* 1/4 (pow n 2)))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (*.f64 #s(literal -1 binary64) (*.f64 n M)))
(+ (* 1/4 (pow n 2)) (* M (+ M (* -1 n))))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (*.f64 M (+.f64 M (neg.f64 n))))
(+ (* 1/4 (pow n 2)) (* M (+ M (* -1 n))))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (*.f64 M (+.f64 M (neg.f64 n))))
(pow M 2)
(*.f64 M M)
(* (pow M 2) (+ 1 (* -1 (/ n M))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 n) M)))
(* (pow M 2) (+ 1 (+ (* -1 (/ n M)) (* 1/4 (/ (pow n 2) (pow M 2))))))
(*.f64 (*.f64 M M) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 n) M)) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (*.f64 M M))))
(* (pow M 2) (+ 1 (+ (* -1 (/ n M)) (* 1/4 (/ (pow n 2) (pow M 2))))))
(*.f64 (*.f64 M M) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 n) M)) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (*.f64 M M))))
(pow M 2)
(*.f64 M M)
(* (pow M 2) (+ 1 (* -1 (/ n M))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 n) M)))
(* (pow M 2) (+ 1 (* -1 (/ (+ n (* -1/4 (/ (pow n 2) M))) M))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (+.f64 n (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 n n)) M)) M))))
(* (pow M 2) (+ 1 (* -1 (/ (+ n (* -1/4 (/ (pow n 2) M))) M))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (+.f64 n (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 n n)) M)) M))))
(exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))
(exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))
(+ (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))) (* l (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))
(*.f64 (+.f64 l #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))))
(+ (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))) (* l (+ (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))) (* 1/2 (* l (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))) (*.f64 l (+.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))) (*.f64 (*.f64 #s(literal 1/2 binary64) l) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))))
(+ (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))) (* l (+ (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))) (* l (+ (* 1/6 (* l (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m)))))) (* 1/2 (exp (- (pow (- (* 1/2 n) M) 2) (fabs (- n m))))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))) (*.f64 l (+.f64 (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m)))) (*.f64 l (+.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) l) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (fabs.f64 (-.f64 n m))))))))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l))))
(exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l))))
(exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l))))
(exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l))))
(exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l))))
(exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l))))
(exp (- (pow (- (* 1/2 n) M) 2) (+ (fabs (- n m)) (* -1 l))))
(exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M)) (+.f64 (fabs.f64 (-.f64 n m)) (neg.f64 l))))
(exp (- (+ l (pow M 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(+ (exp (- (+ l (pow M 2)) (fabs (- n m)))) (* -1 (* M (* n (exp (- (+ l (pow M 2)) (fabs (- n m))))))))
(+.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))) (neg.f64 (*.f64 (*.f64 n M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))))
(+ (exp (- (+ l (pow M 2)) (fabs (- n m)))) (* n (+ (* -1 (* M (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* n (* (exp (- (+ l (pow M 2)) (fabs (- n m)))) (+ 1/4 (* 1/2 (pow M 2))))))))
(+.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))) (*.f64 n (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (*.f64 n (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M M))))))))
(+ (exp (- (+ l (pow M 2)) (fabs (- n m)))) (* n (+ (* -1 (* M (exp (- (+ l (pow M 2)) (fabs (- n m)))))) (* n (+ (* n (* (exp (- (+ l (pow M 2)) (fabs (- n m)))) (+ (* -1/4 M) (* -1/6 (pow M 3))))) (* (exp (- (+ l (pow M 2)) (fabs (- n m)))) (+ 1/4 (* 1/2 (pow M 2)))))))))
(+.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))) (*.f64 n (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (*.f64 n (+.f64 (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M M)))) (*.f64 (*.f64 n (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 M #s(literal -1/4 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 M (*.f64 M M))))))))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (pow (+ M (* -1/2 n)) 2)) (fabs (neg (+ m (* -1 n))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))
(+ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (* -1 (* M (* n (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))
(+.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))) (neg.f64 (*.f64 (*.f64 n M) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))))))
(+ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (* M (+ (* -1 (* n (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* M (* (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (+ 1 (* 1/2 (pow n 2))))))))
(+.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))) (*.f64 M (+.f64 (*.f64 (neg.f64 n) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))) (*.f64 M (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 n n))))))))
(+ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (* M (+ (* -1 (* n (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* M (+ (* M (* (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (+ (* -1 n) (* -1/6 (pow n 3))))) (* (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (+ 1 (* 1/2 (pow n 2)))))))))
(+.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))) (*.f64 M (+.f64 (*.f64 (neg.f64 n) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))) (*.f64 M (+.f64 (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 n n)))) (*.f64 M (*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))) (+.f64 (neg.f64 n) (*.f64 #s(literal -1/6 binary64) (*.f64 n (*.f64 n n)))))))))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (+ (* -1 M) (* 1/2 n)) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m)))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m)))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m)))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (+ n (* -1 m)))))
(exp.f64 (-.f64 (+.f64 l (*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) M) (-.f64 (*.f64 n #s(literal 1/2 binary64)) M))) (fabs.f64 (-.f64 n m))))
(cos (* -1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))
(+ (cos (* -1/2 (* K (+ m n)))) (* -1 (* M (sin (* -1/2 (* K (+ m n)))))))
(+.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (*.f64 (-.f64 #s(literal 0 binary64) M) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))
(+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K (+ m n)))))) (sin (* -1/2 (* K (+ m n)))))))
(+.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (*.f64 M (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) M) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))))
(+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* 1/6 (* M (sin (* -1/2 (* K (+ m n)))))))) (sin (* -1/2 (* K (+ m n)))))))
(+.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))) (*.f64 M (-.f64 (*.f64 M (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))) (*.f64 (*.f64 #s(literal 1/6 binary64) M) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)))))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) (*.f64 #s(literal 1 binary64) M)))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) (*.f64 #s(literal 1 binary64) M)))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) (*.f64 #s(literal 1 binary64) M)))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K)) (*.f64 #s(literal 1 binary64) M)))
(cos M)
(cos.f64 M)
(+ (cos M) (* 1/2 (* K (* (sin M) (+ m n)))))
(+.f64 (cos.f64 M) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 K (sin.f64 M)) (+.f64 m n))))
(+ (cos M) (* K (- (* -1/8 (* K (* (cos M) (pow (+ m n) 2)))) (* -1/2 (* (sin M) (+ m n))))))
(+.f64 (cos.f64 M) (*.f64 K (-.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) K) (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) (cos.f64 M))) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 M)) (+.f64 m n)))))
(+ (cos M) (* K (- (* K (+ (* -1/8 (* (cos M) (pow (+ m n) 2))) (* -1/48 (* K (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 M)) (*.f64 (+.f64 m n) (+.f64 m n))) (*.f64 (*.f64 #s(literal -1/48 binary64) K) (*.f64 (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n))) (sin.f64 M))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) (sin.f64 M))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* -1/8 (* (pow K 2) (* m (cos (+ M (* -1/2 (* K n))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (*.f64 m (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) m) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/48 (* (pow K 3) (* m (sin (+ M (* -1/2 (* K n))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (*.f64 m (+.f64 (*.f64 m (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))) (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) m) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) (-.f64 n (neg.f64 m)))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) (-.f64 n (neg.f64 m)))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) (-.f64 n (neg.f64 m)))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) (-.f64 n (neg.f64 m)))))
(cos (+ M (* -1/2 (* K m))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))
(+ (cos (+ M (* -1/2 (* K m)))) (* 1/2 (* K (* n (sin (+ M (* -1/2 (* K m))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 n K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))))
(+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* -1/8 (* (pow K 2) (* n (cos (+ M (* -1/2 (* K m))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (*.f64 n (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) n) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (*.f64 (*.f64 #s(literal -1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))))))
(+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/48 (* (pow K 3) (* n (sin (+ M (* -1/2 (* K m))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (*.f64 n (+.f64 (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) n) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 m (neg.f64 n)) K))))
(pow (+ M (* -1/2 n)) 2)
(*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))
(+ (* -1 (* m (+ M (* -1/2 n)))) (pow (+ M (* -1/2 n)) 2))
(+.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (neg.f64 (*.f64 m (+.f64 M (*.f64 n #s(literal -1/2 binary64))))))
(+ (* m (+ (* -1 (+ M (* -1/2 n))) (* 1/4 m))) (pow (+ M (* -1/2 n)) 2))
(+.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (*.f64 m (+.f64 (*.f64 #s(literal 1/4 binary64) m) (*.f64 #s(literal -1 binary64) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))))))
(+ (* m (+ (* -1 (+ M (* -1/2 n))) (* 1/4 m))) (pow (+ M (* -1/2 n)) 2))
(+.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (*.f64 m (+.f64 (*.f64 #s(literal 1/4 binary64) m) (*.f64 #s(literal -1 binary64) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))))))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 n)) m))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) m))))
(* (pow m 2) (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 n)) m)) (/ (pow (+ M (* -1/2 n)) 2) (pow m 2)))))
(*.f64 (*.f64 m m) (+.f64 (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) m))) (/.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (*.f64 m m))))
(* (pow m 2) (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 n)) m)) (/ (pow (+ M (* -1/2 n)) 2) (pow m 2)))))
(*.f64 (*.f64 m m) (+.f64 (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) m))) (/.f64 (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64)))) (*.f64 m m))))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 n)) m))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) m))))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (pow (+ M (* -1/2 n)) 2) m)) (* -1/2 n))) m))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (+.f64 (*.f64 n #s(literal -1/2 binary64)) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))) m))) m))))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (pow (+ M (* -1/2 n)) 2) m)) (* -1/2 n))) m))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (+.f64 (*.f64 n #s(literal -1/2 binary64)) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 M (*.f64 n #s(literal -1/2 binary64))) (+.f64 M (*.f64 n #s(literal -1/2 binary64))))) m))) m))))
(pow (+ M (* -1/2 m)) 2)
(*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64))))
(+ (* -1 (* n (+ M (* -1/2 m)))) (pow (+ M (* -1/2 m)) 2))
(+.f64 (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (neg.f64 (*.f64 n (+.f64 M (*.f64 m #s(literal -1/2 binary64))))))
(+ (* n (+ (* -1 (+ M (* -1/2 m))) (* 1/4 n))) (pow (+ M (* -1/2 m)) 2))
(+.f64 (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (*.f64 n (+.f64 (*.f64 #s(literal 1/4 binary64) n) (*.f64 #s(literal -1 binary64) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))))))
(+ (* n (+ (* -1 (+ M (* -1/2 m))) (* 1/4 n))) (pow (+ M (* -1/2 m)) 2))
(+.f64 (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (*.f64 n (+.f64 (*.f64 #s(literal 1/4 binary64) n) (*.f64 #s(literal -1 binary64) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))))))
(* 1/4 (pow n 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 m)) n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) n))))
(* (pow n 2) (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 m)) n)) (/ (pow (+ M (* -1/2 m)) 2) (pow n 2)))))
(*.f64 (*.f64 n n) (+.f64 (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) n))) (/.f64 (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (*.f64 n n))))
(* (pow n 2) (+ 1/4 (+ (* -1 (/ (+ M (* -1/2 m)) n)) (/ (pow (+ M (* -1/2 m)) 2) (pow n 2)))))
(*.f64 (*.f64 n n) (+.f64 (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) n))) (/.f64 (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) (*.f64 n n))))
(* 1/4 (pow n 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ M (* -1/2 m)) n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (pow (+ M (* -1/2 m)) 2) n)) (* -1/2 m))) n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (+.f64 (*.f64 m #s(literal -1/2 binary64)) (neg.f64 (/.f64 (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) n)))) n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ M (+ (* -1 (/ (pow (+ M (* -1/2 m)) 2) n)) (* -1/2 m))) n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (+.f64 M (+.f64 (*.f64 m #s(literal -1/2 binary64)) (neg.f64 (/.f64 (*.f64 (+.f64 M (*.f64 m #s(literal -1/2 binary64))) (+.f64 M (*.f64 m #s(literal -1/2 binary64)))) n)))) n))))
(* 1/4 (pow (+ m n) 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))
(+ (* -1 (* M (+ m n))) (* 1/4 (pow (+ m n) 2)))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (neg.f64 (*.f64 (+.f64 m n) M)))
(+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (*.f64 M (+.f64 M (*.f64 (+.f64 m n) #s(literal -1 binary64)))))
(+ (* 1/4 (pow (+ m n) 2)) (* M (+ M (* -1 (+ m n)))))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (*.f64 M (+.f64 M (*.f64 (+.f64 m n) #s(literal -1 binary64)))))
(pow M 2)
(*.f64 M M)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) M)))
(* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))
(*.f64 (*.f64 M M) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) M)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 m n) (+.f64 m n)) (*.f64 M M)))))
(* (pow M 2) (+ 1 (+ (* -1 (/ (+ m n) M)) (* 1/4 (/ (pow (+ m n) 2) (pow M 2))))))
(*.f64 (*.f64 M M) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) M)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 m n) (+.f64 m n)) (*.f64 M M)))))
(pow M 2)
(*.f64 M M)
(* (pow M 2) (+ 1 (* -1 (/ (+ m n) M))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 m n) #s(literal -1 binary64)) M)))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (+.f64 (+.f64 m n) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) M)) M))))
(* (pow M 2) (+ 1 (* -1 (/ (+ m (+ n (* -1/4 (/ (pow (+ m n) 2) M)))) M))))
(*.f64 (*.f64 M M) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (+.f64 (+.f64 m n) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) M)) M))))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K m))
(*.f64 #s(literal -1/2 binary64) (*.f64 m K))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(*.f64 m (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(*.f64 m (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(*.f64 m (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* -1/2 (* K m))
(*.f64 #s(literal -1/2 binary64) (*.f64 m K))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(*.f64 (neg.f64 m) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(*.f64 (neg.f64 m) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(*.f64 (neg.f64 m) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* -1/2 (* K m))
(*.f64 #s(literal -1/2 binary64) (*.f64 m K))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(*.f64 n (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(*.f64 n (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(*.f64 n (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(* -1/2 (* K n))
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(*.f64 (neg.f64 n) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(*.f64 (neg.f64 n) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(*.f64 (neg.f64 n) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))

eval383.0ms (2.1%)

Compiler

Compiled 131384 to 5564 computations (95.8% saved)

prune379.0ms (2.1%)

Pruning

26 alts after pruning (26 fresh and 0 done)

PrunedKeptTotal
New2608222630
Fresh10414
Picked505
Done000
Total2623262649
Accuracy
98.4%
Counts
2649 → 26
Alt Table
Click to see full alt table
StatusAccuracyProgram
77.2%
(/.f64 (fma.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
▶48.6%
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))))) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
76.4%
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
49.8%
(/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
35.9%
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (*.f64 (+.f64 l #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))))
44.6%
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
38.8%
(/.f64 (cos.f64 (+.f64 M (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1 binary64))))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
26.3%
(/.f64 (cos.f64 (+.f64 M (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1 binary64))))) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
▶45.6%
(/.f64 (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))))
52.2%
(/.f64 (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
50.9%
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 m K))) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
55.5%
(/.f64 (cos.f64 M) (exp.f64 (*.f64 M M)))
49.4%
(/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))
54.7%
(/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
▶35.4%
(/.f64 (cos.f64 M) (exp.f64 l))
38.8%
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1 binary64)))))))
45.0%
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 #s(literal 1/4 binary64) (*.f64 n n)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
45.0%
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 M M)) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
36.7%
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
▶40.5%
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
29.9%
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 l) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
76.4%
(*.f64 (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))))) (exp.f64 (-.f64 (neg.f64 (pow.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 2 binary64))) (-.f64 l (fabs.f64 (-.f64 m n))))))
45.0%
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 #s(literal 1/4 binary64) (*.f64 n n)))))
36.7%
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))
40.5%
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
▶83.8%
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))
Compiler

Compiled 1502 to 984 computations (34.5% saved)

simplify213.0ms (1.2%)

Algorithm
1×egg-herbie
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))
✓cost-diff0
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
✓cost-diff0
(+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))))
✓cost-diff0
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))))) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
✓cost-diff0
(*.f64 #s(literal -1/2 binary64) K)
✓cost-diff0
(*.f64 (*.f64 #s(literal -1/2 binary64) K) n)
✓cost-diff0
(cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))
✓cost-diff0
(/.f64 (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))))
✓cost-diff0
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
✓cost-diff0
(exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))
✓cost-diff0
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
✓cost-diff128
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
✓cost-diff0
(exp.f64 l)
✓cost-diff0
(cos.f64 M)
✓cost-diff0
(/.f64 (cos.f64 M) (exp.f64 l))
✓cost-diff0
(-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))
✓cost-diff0
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))
✓cost-diff0
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))
✓cost-diff64
(neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))
Rules
2254×+-lowering-+.f64
2254×+-lowering-+.f32
1686×--lowering--.f32
1686×--lowering--.f64
1634×*-lowering-*.f32
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
054408
1134389
2327386
3934386
44037386
08084386
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(exp (neg (+ l (- (* 1/4 (* (+ m n) (+ m n))) (fabs (- n m))))))
(neg (+ l (- (* 1/4 (* (+ m n) (+ m n))) (fabs (- n m)))))
(+ l (- (* 1/4 (* (+ m n) (+ m n))) (fabs (- n m))))
l
(- (* 1/4 (* (+ m n) (+ m n))) (fabs (- n m)))
(* 1/4 (* (+ m n) (+ m n)))
1/4
(* (+ m n) (+ m n))
(+ m n)
m
n
(fabs (- n m))
(- n m)
(/ (cos M) (exp l))
(cos M)
M
(exp l)
l
(/ 1 (/ (exp (* 1/4 (* m m))) (cos (+ M (* K (/ (+ m n) -2))))))
1
(/ (exp (* 1/4 (* m m))) (cos (+ M (* K (/ (+ m n) -2)))))
(exp (* 1/4 (* m m)))
(* 1/4 (* m m))
1/4
(* m m)
m
(cos (+ M (* K (/ (+ m n) -2))))
(+ M (* K (/ (+ m n) -2)))
M
(* K (/ (+ m n) -2))
K
(/ (+ m n) -2)
(+ m n)
n
-2
(/ (cos (* (* -1/2 K) n)) (exp (- (+ l (* 1/4 (* n n))) (fabs (- n m)))))
(cos (* (* -1/2 K) n))
(* (* -1/2 K) n)
(* -1/2 K)
-1/2
K
n
(exp (- (+ l (* 1/4 (* n n))) (fabs (- n m))))
(- (+ l (* 1/4 (* n n))) (fabs (- n m)))
(+ l (* 1/4 (* n n)))
l
(* 1/4 (* n n))
1/4
(* n n)
(fabs (- n m))
(- n m)
m
(/ (+ (cos (+ M (* (* -1/2 K) n))) (* 1/2 (* (* m K) (sin (+ M (* (* -1/2 K) n)))))) (exp (+ (* M M) (- l (fabs (- m n))))))
(+ (cos (+ M (* (* -1/2 K) n))) (* 1/2 (* (* m K) (sin (+ M (* (* -1/2 K) n))))))
(cos (+ M (* (* -1/2 K) n)))
(+ M (* (* -1/2 K) n))
M
(* (* -1/2 K) n)
(* -1/2 K)
-1/2
K
n
(* 1/2 (* (* m K) (sin (+ M (* (* -1/2 K) n)))))
1/2
(* (* m K) (sin (+ M (* (* -1/2 K) n))))
(* m K)
m
(sin (+ M (* (* -1/2 K) n)))
(exp (+ (* M M) (- l (fabs (- m n)))))
(+ (* M M) (- l (fabs (- m n))))
(* M M)
(- l (fabs (- m n)))
l
(fabs (- m n))
(- m n)
Outputs
(exp (neg (+ l (- (* 1/4 (* (+ m n) (+ m n))) (fabs (- n m))))))
(exp.f64 (+.f64 (fabs.f64 (-.f64 n m)) (-.f64 (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) #s(literal -1/4 binary64))) l)))
(neg (+ l (- (* 1/4 (* (+ m n) (+ m n))) (fabs (- n m)))))
(+.f64 (fabs.f64 (-.f64 n m)) (-.f64 (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) #s(literal -1/4 binary64))) l))
(+ l (- (* 1/4 (* (+ m n) (+ m n))) (fabs (- n m))))
(+.f64 l (-.f64 (*.f64 (+.f64 m n) (*.f64 #s(literal 1/4 binary64) (+.f64 m n))) (fabs.f64 (-.f64 n m))))
l
(- (* 1/4 (* (+ m n) (+ m n))) (fabs (- n m)))
(-.f64 (*.f64 (+.f64 m n) (*.f64 #s(literal 1/4 binary64) (+.f64 m n))) (fabs.f64 (-.f64 n m)))
(* 1/4 (* (+ m n) (+ m n)))
(*.f64 (+.f64 m n) (*.f64 #s(literal 1/4 binary64) (+.f64 m n)))
1/4
#s(literal 1/4 binary64)
(* (+ m n) (+ m n))
(*.f64 (+.f64 m n) (+.f64 m n))
(+ m n)
(+.f64 m n)
m
n
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(- n m)
(-.f64 n m)
(/ (cos M) (exp l))
(/.f64 (cos.f64 M) (exp.f64 l))
(cos M)
(cos.f64 M)
M
(exp l)
(exp.f64 l)
l
(/ 1 (/ (exp (* 1/4 (* m m))) (cos (+ M (* K (/ (+ m n) -2))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
1
#s(literal 1 binary64)
(/ (exp (* 1/4 (* m m))) (cos (+ M (* K (/ (+ m n) -2)))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(exp (* 1/4 (* m m)))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))
(* 1/4 (* m m))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
1/4
#s(literal 1/4 binary64)
(* m m)
(*.f64 m m)
m
(cos (+ M (* K (/ (+ m n) -2))))
(cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(+ M (* K (/ (+ m n) -2)))
(+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))
M
(* K (/ (+ m n) -2))
(/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))
K
(/ (+ m n) -2)
(/.f64 (+.f64 m n) #s(literal -2 binary64))
(+ m n)
(+.f64 m n)
n
-2
#s(literal -2 binary64)
(/ (cos (* (* -1/2 K) n)) (exp (- (+ l (* 1/4 (* n n))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))))
(cos (* (* -1/2 K) n))
(cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))
(* (* -1/2 K) n)
(*.f64 n (*.f64 K #s(literal -1/2 binary64)))
(* -1/2 K)
(*.f64 K #s(literal -1/2 binary64))
-1/2
#s(literal -1/2 binary64)
K
n
(exp (- (+ l (* 1/4 (* n n))) (fabs (- n m))))
(exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))
(- (+ l (* 1/4 (* n n))) (fabs (- n m)))
(-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))
(+ l (* 1/4 (* n n)))
(+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n)))
l
(* 1/4 (* n n))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
1/4
#s(literal 1/4 binary64)
(* n n)
(*.f64 n n)
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(- n m)
(-.f64 n m)
m
(/ (+ (cos (+ M (* (* -1/2 K) n))) (* 1/2 (* (* m K) (sin (+ M (* (* -1/2 K) n)))))) (exp (+ (* M M) (- l (fabs (- m n))))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(+ (cos (+ M (* (* -1/2 K) n))) (* 1/2 (* (* m K) (sin (+ M (* (* -1/2 K) n))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))))
(cos (+ M (* (* -1/2 K) n)))
(cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))
(+ M (* (* -1/2 K) n))
(+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))
M
(* (* -1/2 K) n)
(*.f64 n (*.f64 K #s(literal -1/2 binary64)))
(* -1/2 K)
(*.f64 K #s(literal -1/2 binary64))
-1/2
#s(literal -1/2 binary64)
K
n
(* 1/2 (* (* m K) (sin (+ M (* (* -1/2 K) n)))))
(*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))
1/2
#s(literal 1/2 binary64)
(* (* m K) (sin (+ M (* (* -1/2 K) n))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(* m K)
(*.f64 m K)
m
(sin (+ M (* (* -1/2 K) n)))
(sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))
(exp (+ (* M M) (- l (fabs (- m n)))))
(exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))
(+ (* M M) (- l (fabs (- m n))))
(-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))
(* M M)
(*.f64 M M)
(- l (fabs (- m n)))
(-.f64 l (fabs.f64 (-.f64 n m)))
l
(fabs (- m n))
(fabs.f64 (-.f64 n m))
(- m n)
(-.f64 m n)

localize965.0ms (5.4%)

Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
✓accuracy99.8%
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))))
✓accuracy97.7%
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))))) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
✓accuracy84.1%
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
✓accuracy84.0%
(sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))
✓accuracy100.0%
(*.f64 #s(literal -1/2 binary64) K)
✓accuracy100.0%
(fabs.f64 (-.f64 n m))
✓accuracy100.0%
(exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m))))
✓accuracy84.4%
(cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))
✓accuracy100.0%
(*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))
✓accuracy99.9%
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))))
✓accuracy99.9%
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
✓accuracy80.7%
(cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))
✓accuracy100.0%
(exp.f64 l)
✓accuracy100.0%
(cos.f64 M)
✓accuracy100.0%
(/.f64 (cos.f64 M) (exp.f64 l))
✓accuracy100.0%
(fabs.f64 (-.f64 n m))
✓accuracy100.0%
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))
✓accuracy100.0%
(*.f64 (+.f64 m n) (+.f64 m n))
✓accuracy100.0%
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))
Results
698.0ms156×5exit
161.0ms81×1valid
14.0ms19×0valid
Compiler

Compiled 452 to 55 computations (87.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 344.0ms
backward-pass: 132.0ms (38.4% of total)
ival-cos: 64.0ms (18.6% of total)
ival-mult: 47.0ms (13.7% of total)
ival-add: 25.0ms (7.3% of total)
ival-div: 20.0ms (5.8% of total)
ival-exp: 17.0ms (4.9% of total)
ival-sin: 15.0ms (4.4% of total)
ival-sub: 12.0ms (3.5% of total)
ival-fabs: 6.0ms (1.7% of total)
ival-neg: 3.0ms (0.9% of total)
const: 2.0ms (0.6% of total)

series91.0ms (0.5%)

Counts
26 → 840
Calls
Call 1
Inputs
#<alt (neg (+ l (- (* 1/4 (* (+ m n) (+ m n))) (fabs (- n m)))))>
#<alt (exp (neg (+ l (- (* 1/4 (* (+ m n) (+ m n))) (fabs (- n m))))))>
#<alt (+ l (- (* 1/4 (* (+ m n) (+ m n))) (fabs (- n m))))>
#<alt (- (* 1/4 (* (+ m n) (+ m n))) (fabs (- n m)))>
#<alt (/ (cos M) (exp l))>
#<alt (cos M)>
#<alt (exp l)>
#<alt (/ 1 (/ (exp (* 1/4 (* m m))) (cos (+ M (* K (/ (+ m n) -2))))))>
#<alt (/ (exp (* 1/4 (* m m))) (cos (+ M (* K (/ (+ m n) -2)))))>
#<alt (exp (* 1/4 (* m m)))>
#<alt (* 1/4 (* m m))>
#<alt (/ (cos (* (* -1/2 K) n)) (exp (- (+ l (* 1/4 (* n n))) (fabs (- n m)))))>
#<alt (cos (* (* -1/2 K) n))>
#<alt (* (* -1/2 K) n)>
#<alt (* -1/2 K)>
#<alt (/ (+ (cos (+ M (* (* -1/2 K) n))) (* 1/2 (* (* m K) (sin (+ M (* (* -1/2 K) n)))))) (exp (+ (* M M) (- l (fabs (- m n))))))>
#<alt (+ (cos (+ M (* (* -1/2 K) n))) (* 1/2 (* (* m K) (sin (+ M (* (* -1/2 K) n))))))>
#<alt (cos (+ M (* (* -1/2 K) n)))>
#<alt (+ M (* (* -1/2 K) n))>
#<alt (* (+ m n) (+ m n))>
#<alt (fabs (- n m))>
#<alt (cos (+ M (* K (/ (+ m n) -2))))>
#<alt (* K (/ (+ m n) -2))>
#<alt (exp (- (+ l (* 1/4 (* n n))) (fabs (- n m))))>
#<alt (sin (+ M (* (* -1/2 K) n)))>
#<alt (* (* m K) (sin (+ M (* (* -1/2 K) n))))>
Outputs
#<alt (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2)))>
#<alt (- (+ (fabs (- n m)) (* -1 l)) (* 1/4 (pow (+ m n) 2)))>
#<alt (- (+ (fabs (- n m)) (* -1 l)) (* 1/4 (pow (+ m n) 2)))>
#<alt (- (+ (fabs (- n m)) (* -1 l)) (* 1/4 (pow (+ m n) 2)))>
#<alt (* -1 l)>
#<alt (* l (- (/ (fabs (- n m)) l) (+ 1 (* 1/4 (/ (pow (+ m n) 2) l)))))>
#<alt (* l (- (/ (fabs (- n m)) l) (+ 1 (* 1/4 (/ (pow (+ m n) 2) l)))))>
#<alt (* l (- (/ (fabs (- n m)) l) (+ 1 (* 1/4 (/ (pow (+ m n) 2) l)))))>
#<alt (* -1 l)>
#<alt (* -1 (* l (+ 1 (* -1 (/ (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2))) l)))))>
#<alt (* -1 (* l (+ 1 (* -1 (/ (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2))) l)))))>
#<alt (* -1 (* l (+ 1 (* -1 (/ (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2))) l)))))>
#<alt (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))>
#<alt (- (+ (fabs (- n m)) (* -1/2 (* m n))) (+ l (* 1/4 (pow n 2))))>
#<alt (- (+ (fabs (- n m)) (* m (- (* -1/4 m) (* 1/2 n)))) (+ l (* 1/4 (pow n 2))))>
#<alt (- (+ (fabs (- n m)) (* m (- (* -1/4 m) (* 1/2 n)))) (+ l (* 1/4 (pow n 2))))>
#<alt (* -1/4 (pow m 2))>
#<alt (* (pow m 2) (- (* -1/2 (/ n m)) 1/4))>
#<alt (* (pow m 2) (- (/ (fabs (- n m)) (pow m 2)) (+ 1/4 (+ (* 1/4 (/ (pow n 2) (pow m 2))) (+ (* 1/2 (/ n m)) (/ l (pow m 2)))))))>
#<alt (* (pow m 2) (- (/ (fabs (- n m)) (pow m 2)) (+ 1/4 (+ (* 1/4 (/ (pow n 2) (pow m 2))) (+ (* 1/2 (/ n m)) (/ l (pow m 2)))))))>
#<alt (* -1/4 (pow m 2))>
#<alt (* (pow m 2) (- (* -1/2 (/ n m)) 1/4))>
#<alt (* (pow m 2) (- (* -1 (/ (- (* -1 (/ (- (fabs (+ n (* -1 m))) (+ l (* 1/4 (pow n 2)))) m)) (* -1/2 n)) m)) 1/4))>
#<alt (* (pow m 2) (- (* -1 (/ (- (* -1 (/ (- (fabs (+ n (* -1 m))) (+ l (* 1/4 (pow n 2)))) m)) (* -1/2 n)) m)) 1/4))>
#<alt (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))>
#<alt (- (+ (fabs (- n m)) (* -1/2 (* m n))) (+ l (* 1/4 (pow m 2))))>
#<alt (- (+ (fabs (- n m)) (* n (- (* -1/4 n) (* 1/2 m)))) (+ l (* 1/4 (pow m 2))))>
#<alt (- (+ (fabs (- n m)) (* n (- (* -1/4 n) (* 1/2 m)))) (+ l (* 1/4 (pow m 2))))>
#<alt (* -1/4 (pow n 2))>
#<alt (* (pow n 2) (- (* -1/2 (/ m n)) 1/4))>
#<alt (* (pow n 2) (- (/ (fabs (- n m)) (pow n 2)) (+ 1/4 (+ (* 1/4 (/ (pow m 2) (pow n 2))) (+ (* 1/2 (/ m n)) (/ l (pow n 2)))))))>
#<alt (* (pow n 2) (- (/ (fabs (- n m)) (pow n 2)) (+ 1/4 (+ (* 1/4 (/ (pow m 2) (pow n 2))) (+ (* 1/2 (/ m n)) (/ l (pow n 2)))))))>
#<alt (* -1/4 (pow n 2))>
#<alt (* (pow n 2) (- (* -1/2 (/ m n)) 1/4))>
#<alt (* (pow n 2) (- (* -1 (/ (- (* -1 (/ (- (fabs (neg (+ m (* -1 n)))) (+ l (* 1/4 (pow m 2)))) n)) (* -1/2 m)) n)) 1/4))>
#<alt (* (pow n 2) (- (* -1 (/ (- (* -1 (/ (- (fabs (neg (+ m (* -1 n)))) (+ l (* 1/4 (pow m 2)))) n)) (* -1/2 m)) n)) 1/4))>
#<alt (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2))))>
#<alt (+ (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2)))) (* -1 (* l (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2)))))))>
#<alt (+ (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2)))) (* l (+ (* -1 (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2))))) (* 1/2 (* l (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2)))))))))>
#<alt (+ (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2)))) (* l (+ (* -1 (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2))))) (* l (+ (* -1/6 (* l (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2)))))) (* 1/2 (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2))))))))))>
#<alt (exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))>
#<alt (exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))>
#<alt (exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))>
#<alt (exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))>
#<alt (exp (- (+ (fabs (- n m)) (* -1 l)) (* 1/4 (pow (+ m n) 2))))>
#<alt (exp (- (+ (fabs (- n m)) (* -1 l)) (* 1/4 (pow (+ m n) 2))))>
#<alt (exp (- (+ (fabs (- n m)) (* -1 l)) (* 1/4 (pow (+ m n) 2))))>
#<alt (exp (- (+ (fabs (- n m)) (* -1 l)) (* 1/4 (pow (+ m n) 2))))>
#<alt (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2)))))>
#<alt (+ (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))) (* -1/2 (* m (* n (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2)))))))))>
#<alt (+ (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))) (* m (+ (* -1/2 (* n (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))))) (* m (* (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))) (- (* 1/8 (pow n 2)) 1/4))))))>
#<alt (+ (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))) (* m (+ (* -1/2 (* n (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))))) (* m (+ (* m (* (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))) (+ (* -1/48 (pow n 3)) (* 1/8 n)))) (* (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))) (- (* 1/8 (pow n 2)) 1/4)))))))>
#<alt (exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))>
#<alt (exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))>
#<alt (exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))>
#<alt (exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))>
#<alt (exp (- (fabs (+ n (* -1 m))) (+ l (* 1/4 (pow (- n (* -1 m)) 2)))))>
#<alt (exp (- (fabs (+ n (* -1 m))) (+ l (* 1/4 (pow (- n (* -1 m)) 2)))))>
#<alt (exp (- (fabs (+ n (* -1 m))) (+ l (* 1/4 (pow (- n (* -1 m)) 2)))))>
#<alt (exp (- (fabs (+ n (* -1 m))) (+ l (* 1/4 (pow (- n (* -1 m)) 2)))))>
#<alt (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2)))))>
#<alt (+ (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))) (* -1/2 (* m (* n (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2)))))))))>
#<alt (+ (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))) (* n (+ (* -1/2 (* m (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))))) (* n (* (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))) (- (* 1/8 (pow m 2)) 1/4))))))>
#<alt (+ (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))) (* n (+ (* -1/2 (* m (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))))) (* n (+ (* n (* (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))) (+ (* -1/48 (pow m 3)) (* 1/8 m)))) (* (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))) (- (* 1/8 (pow m 2)) 1/4)))))))>
#<alt (exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))>
#<alt (exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))>
#<alt (exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))>
#<alt (exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))>
#<alt (exp (- (fabs (neg (+ m (* -1 n)))) (+ l (* 1/4 (pow (- m (* -1 n)) 2)))))>
#<alt (exp (- (fabs (neg (+ m (* -1 n)))) (+ l (* 1/4 (pow (- m (* -1 n)) 2)))))>
#<alt (exp (- (fabs (neg (+ m (* -1 n)))) (+ l (* 1/4 (pow (- m (* -1 n)) 2)))))>
#<alt (exp (- (fabs (neg (+ m (* -1 n)))) (+ l (* 1/4 (pow (- m (* -1 n)) 2)))))>
#<alt (- (* 1/4 (pow (+ m n) 2)) (fabs (- n m)))>
#<alt (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- n m)))>
#<alt (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- n m)))>
#<alt (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- n m)))>
#<alt l>
#<alt (* l (- (+ 1 (* 1/4 (/ (pow (+ m n) 2) l))) (/ (fabs (- n m)) l)))>
#<alt (* l (- (+ 1 (* 1/4 (/ (pow (+ m n) 2) l))) (/ (fabs (- n m)) l)))>
#<alt (* l (- (+ 1 (* 1/4 (/ (pow (+ m n) 2) l))) (/ (fabs (- n m)) l)))>
#<alt l>
#<alt (* -1 (* l (- (* -1 (/ (- (* 1/4 (pow (+ m n) 2)) (fabs (- n m))) l)) 1)))>
#<alt (* -1 (* l (- (* -1 (/ (- (* 1/4 (pow (+ m n) 2)) (fabs (- n m))) l)) 1)))>
#<alt (* -1 (* l (- (* -1 (/ (- (* 1/4 (pow (+ m n) 2)) (fabs (- n m))) l)) 1)))>
#<alt (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))>
#<alt (- (+ l (+ (* 1/4 (pow n 2)) (* 1/2 (* m n)))) (fabs (- n m)))>
#<alt (- (+ l (+ (* 1/4 (pow n 2)) (* m (+ (* 1/4 m) (* 1/2 n))))) (fabs (- n m)))>
#<alt (- (+ l (+ (* 1/4 (pow n 2)) (* m (+ (* 1/4 m) (* 1/2 n))))) (fabs (- n m)))>
#<alt (* 1/4 (pow m 2))>
#<alt (* (pow m 2) (+ 1/4 (* 1/2 (/ n m))))>
#<alt (* (pow m 2) (- (+ 1/4 (+ (* 1/4 (/ (pow n 2) (pow m 2))) (+ (* 1/2 (/ n m)) (/ l (pow m 2))))) (/ (fabs (- n m)) (pow m 2))))>
#<alt (* (pow m 2) (- (+ 1/4 (+ (* 1/4 (/ (pow n 2) (pow m 2))) (+ (* 1/2 (/ n m)) (/ l (pow m 2))))) (/ (fabs (- n m)) (pow m 2))))>
#<alt (* 1/4 (pow m 2))>
#<alt (* (pow m 2) (+ 1/4 (* 1/2 (/ n m))))>
#<alt (* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))) m)) (* -1/2 n)) m))))>
#<alt (* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))) m)) (* -1/2 n)) m))))>
#<alt (- (+ l (* 1/4 (pow m 2))) (fabs (- n m)))>
#<alt (- (+ l (+ (* 1/4 (pow m 2)) (* 1/2 (* m n)))) (fabs (- n m)))>
#<alt (- (+ l (+ (* 1/4 (pow m 2)) (* n (+ (* 1/4 n) (* 1/2 m))))) (fabs (- n m)))>
#<alt (- (+ l (+ (* 1/4 (pow m 2)) (* n (+ (* 1/4 n) (* 1/2 m))))) (fabs (- n m)))>
#<alt (* 1/4 (pow n 2))>
#<alt (* (pow n 2) (+ 1/4 (* 1/2 (/ m n))))>
#<alt (* (pow n 2) (- (+ 1/4 (+ (* 1/4 (/ (pow m 2) (pow n 2))) (+ (* 1/2 (/ m n)) (/ l (pow n 2))))) (/ (fabs (- n m)) (pow n 2))))>
#<alt (* (pow n 2) (- (+ 1/4 (+ (* 1/4 (/ (pow m 2) (pow n 2))) (+ (* 1/2 (/ m n)) (/ l (pow n 2))))) (/ (fabs (- n m)) (pow n 2))))>
#<alt (* 1/4 (pow n 2))>
#<alt (* (pow n 2) (+ 1/4 (* 1/2 (/ m n))))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (+ l (* 1/4 (pow m 2))) (fabs (neg (+ m (* -1 n))))) n)) (* -1/2 m)) n))))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (+ l (* 1/4 (pow m 2))) (fabs (neg (+ m (* -1 n))))) n)) (* -1/2 m)) n))))>
#<alt (- (* 1/4 (pow n 2)) (fabs (- n m)))>
#<alt (- (+ (* 1/4 (pow n 2)) (* 1/2 (* m n))) (fabs (- n m)))>
#<alt (- (+ (* 1/4 (pow n 2)) (* m (+ (* 1/4 m) (* 1/2 n)))) (fabs (- n m)))>
#<alt (- (+ (* 1/4 (pow n 2)) (* m (+ (* 1/4 m) (* 1/2 n)))) (fabs (- n m)))>
#<alt (* 1/4 (pow m 2))>
#<alt (* (pow m 2) (+ 1/4 (* 1/2 (/ n m))))>
#<alt (* (pow m 2) (- (+ 1/4 (+ (* 1/4 (/ (pow n 2) (pow m 2))) (* 1/2 (/ n m)))) (/ (fabs (- n m)) (pow m 2))))>
#<alt (* (pow m 2) (- (+ 1/4 (+ (* 1/4 (/ (pow n 2) (pow m 2))) (* 1/2 (/ n m)))) (/ (fabs (- n m)) (pow m 2))))>
#<alt (* 1/4 (pow m 2))>
#<alt (* (pow m 2) (+ 1/4 (* 1/2 (/ n m))))>
#<alt (* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (* 1/4 (pow n 2)) (fabs (+ n (* -1 m)))) m)) (* -1/2 n)) m))))>
#<alt (* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (* 1/4 (pow n 2)) (fabs (+ n (* -1 m)))) m)) (* -1/2 n)) m))))>
#<alt (- (* 1/4 (pow m 2)) (fabs (- n m)))>
#<alt (- (+ (* 1/4 (pow m 2)) (* 1/2 (* m n))) (fabs (- n m)))>
#<alt (- (+ (* 1/4 (pow m 2)) (* n (+ (* 1/4 n) (* 1/2 m)))) (fabs (- n m)))>
#<alt (- (+ (* 1/4 (pow m 2)) (* n (+ (* 1/4 n) (* 1/2 m)))) (fabs (- n m)))>
#<alt (* 1/4 (pow n 2))>
#<alt (* (pow n 2) (+ 1/4 (* 1/2 (/ m n))))>
#<alt (* (pow n 2) (- (+ 1/4 (+ (* 1/4 (/ (pow m 2) (pow n 2))) (* 1/2 (/ m n)))) (/ (fabs (- n m)) (pow n 2))))>
#<alt (* (pow n 2) (- (+ 1/4 (+ (* 1/4 (/ (pow m 2) (pow n 2))) (* 1/2 (/ m n)))) (/ (fabs (- n m)) (pow n 2))))>
#<alt (* 1/4 (pow n 2))>
#<alt (* (pow n 2) (+ 1/4 (* 1/2 (/ m n))))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (* 1/4 (pow m 2)) (fabs (neg (+ m (* -1 n))))) n)) (* -1/2 m)) n))))>
#<alt (* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (* 1/4 (pow m 2)) (fabs (neg (+ m (* -1 n))))) n)) (* -1/2 m)) n))))>
#<alt (/ 1 (exp l))>
#<alt (+ (* -1/2 (/ (pow M 2) (exp l))) (/ 1 (exp l)))>
#<alt (+ (* (pow M 2) (- (* 1/24 (/ (pow M 2) (exp l))) (* 1/2 (/ 1 (exp l))))) (/ 1 (exp l)))>
#<alt (+ (* (pow M 2) (- (* (pow M 2) (+ (* -1/720 (/ (pow M 2) (exp l))) (* 1/24 (/ 1 (exp l))))) (* 1/2 (/ 1 (exp l))))) (/ 1 (exp l)))>
#<alt (/ (cos M) (exp l))>
#<alt (/ (cos M) (exp l))>
#<alt (/ (cos M) (exp l))>
#<alt (/ (cos M) (exp l))>
#<alt (/ (cos M) (exp l))>
#<alt (/ (cos M) (exp l))>
#<alt (/ (cos M) (exp l))>
#<alt (/ (cos M) (exp l))>
#<alt (cos M)>
#<alt (+ (cos M) (* -1 (* l (cos M))))>
#<alt (+ (cos M) (* l (- (* -1 (* l (+ (* -1 (cos M)) (* 1/2 (cos M))))) (cos M))))>
#<alt (+ (cos M) (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (cos M)) (* 1/2 (cos M)))) (+ (* -1/2 (cos M)) (* 1/6 (cos M)))))) (+ (* -1 (cos M)) (* 1/2 (cos M))))) (cos M))))>
#<alt (/ (cos M) (exp l))>
#<alt (/ (cos M) (exp l))>
#<alt (/ (cos M) (exp l))>
#<alt (/ (cos M) (exp l))>
#<alt (/ (cos M) (exp l))>
#<alt (/ (cos M) (exp l))>
#<alt (/ (cos M) (exp l))>
#<alt (/ (cos M) (exp l))>
#<alt 1>
#<alt (+ 1 (* -1/2 (pow M 2)))>
#<alt (+ 1 (* (pow M 2) (- (* 1/24 (pow M 2)) 1/2)))>
#<alt (+ 1 (* (pow M 2) (- (* (pow M 2) (+ 1/24 (* -1/720 (pow M 2)))) 1/2)))>
#<alt (cos M)>
#<alt (cos M)>
#<alt (cos M)>
#<alt (cos M)>
#<alt (cos M)>
#<alt (cos M)>
#<alt (cos M)>
#<alt (cos M)>
#<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 (cos (+ M (* -1/2 (* K n))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* m (+ (* 1/2 (* K (sin (+ M (* -1/2 (* K n)))))) (* m (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* 1/4 (cos (+ M (* -1/2 (* K n))))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* m (+ (* 1/2 (* K (sin (+ M (* -1/2 (* K n)))))) (* m (- (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* m (- (* -1/48 (* (pow K 3) (sin (+ M (* -1/2 (* K n)))))) (* 1/8 (* K (sin (+ M (* -1/2 (* K n))))))))) (* 1/4 (cos (+ M (* -1/2 (* K n))))))))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (* -1/2 (* K (+ m n)))) (exp (* 1/4 (pow m 2))))>
#<alt (+ (* -1 (/ (* M (sin (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (* 1/4 (pow m 2)))))>
#<alt (+ (* M (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (* 1/4 (pow m 2))))) (* -1/2 (/ (* M (cos (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (* 1/4 (pow m 2)))))>
#<alt (+ (* M (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (* 1/4 (pow m 2))))) (* M (+ (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (* 1/4 (pow m 2))))) (* 1/6 (/ (* M (sin (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (* 1/4 (pow m 2)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos M) (exp (* 1/4 (pow m 2))))>
#<alt (+ (* 1/2 (/ (* K (* (sin M) (+ m n))) (exp (* 1/4 (pow m 2))))) (/ (cos M) (exp (* 1/4 (pow m 2)))))>
#<alt (+ (* K (+ (* -1/8 (/ (* K (* (cos M) (pow (+ m n) 2))) (exp (* 1/4 (pow m 2))))) (* 1/2 (/ (* (sin M) (+ m n)) (exp (* 1/4 (pow m 2))))))) (/ (cos M) (exp (* 1/4 (pow m 2)))))>
#<alt (+ (* K (+ (* 1/2 (/ (* (sin M) (+ m n)) (exp (* 1/4 (pow m 2))))) (* K (+ (* -1/8 (/ (* (cos M) (pow (+ m n) 2)) (exp (* 1/4 (pow m 2))))) (* -1/48 (/ (* K (* (sin M) (pow (+ m n) 3))) (exp (* 1/4 (pow m 2))))))))) (/ (cos M) (exp (* 1/4 (pow m 2)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K m)))) (exp (* 1/4 (pow m 2))))>
#<alt (+ (* 1/2 (/ (* K (* n (sin (+ M (* -1/2 (* K m)))))) (exp (* 1/4 (pow m 2))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (* 1/4 (pow m 2)))))>
#<alt (+ (* n (+ (* -1/8 (/ (* (pow K 2) (* n (cos (+ M (* -1/2 (* K m)))))) (exp (* 1/4 (pow m 2))))) (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (* 1/4 (pow m 2))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (* 1/4 (pow m 2)))))>
#<alt (+ (* n (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (* 1/4 (pow m 2))))) (* n (+ (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (* 1/4 (pow m 2))))) (* -1/48 (/ (* (pow K 3) (* n (sin (+ M (* -1/2 (* K m)))))) (exp (* 1/4 (pow m 2))))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (* 1/4 (pow m 2)))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (* 1/4 (pow m 2))))>
#<alt (/ 1 (cos (+ M (* -1/2 (* K n)))))>
#<alt (+ (* -1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))) (/ 1 (cos (+ M (* -1/2 (* K n))))))>
#<alt (+ (* m (- (* m (- (* 1/4 (/ 1 (cos (+ M (* -1/2 (* K n)))))) (+ (* -1/4 (/ (* (pow K 2) (pow (sin (+ M (* -1/2 (* K n)))) 2)) (pow (cos (+ M (* -1/2 (* K n)))) 3))) (* -1/8 (/ (pow K 2) (cos (+ M (* -1/2 (* K n))))))))) (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))))) (/ 1 (cos (+ M (* -1/2 (* K n))))))>
#<alt (+ (* m (- (* m (- (+ (* -1 (* m (+ (* -1/48 (/ (* (pow K 3) (sin (+ M (* -1/2 (* K n))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))) (+ (* 1/16 (/ (* (pow K 3) (sin (+ M (* -1/2 (* K n))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K n)))) (- (* 1/4 (/ 1 (cos (+ M (* -1/2 (* K n)))))) (+ (* -1/4 (/ (* (pow K 2) (pow (sin (+ M (* -1/2 (* K n)))) 2)) (pow (cos (+ M (* -1/2 (* K n)))) 3))) (* -1/8 (/ (pow K 2) (cos (+ M (* -1/2 (* K n)))))))))) (cos (+ M (* -1/2 (* K n)))))))))) (* 1/4 (/ 1 (cos (+ M (* -1/2 (* K n))))))) (+ (* -1/4 (/ (* (pow K 2) (pow (sin (+ M (* -1/2 (* K n)))) 2)) (pow (cos (+ M (* -1/2 (* K n)))) 3))) (* -1/8 (/ (pow K 2) (cos (+ M (* -1/2 (* K n))))))))) (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))))) (/ 1 (cos (+ M (* -1/2 (* K n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (* -1/2 (* K (+ m n)))))>
#<alt (+ (/ (exp (* 1/4 (pow m 2))) (cos (* -1/2 (* K (+ m n))))) (/ (* M (* (exp (* 1/4 (pow m 2))) (sin (* -1/2 (* K (+ m n)))))) (pow (cos (* -1/2 (* K (+ m n)))) 2)))>
#<alt (+ (* M (- (* -1 (* M (+ (* -1 (/ (* (exp (* 1/4 (pow m 2))) (pow (sin (* -1/2 (* K (+ m n)))) 2)) (pow (cos (* -1/2 (* K (+ m n)))) 3))) (* -1/2 (/ (exp (* 1/4 (pow m 2))) (cos (* -1/2 (* K (+ m n))))))))) (* -1 (/ (* (exp (* 1/4 (pow m 2))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (/ (exp (* 1/4 (pow m 2))) (cos (* -1/2 (* K (+ m n))))))>
#<alt (+ (* M (- (* M (- (* -1 (* M (+ (* -1/2 (/ (* (exp (* 1/4 (pow m 2))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))) (+ (* 1/6 (/ (* (exp (* 1/4 (pow m 2))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))) (/ (* (sin (* -1/2 (* K (+ m n)))) (+ (* -1 (/ (* (exp (* 1/4 (pow m 2))) (pow (sin (* -1/2 (* K (+ m n)))) 2)) (pow (cos (* -1/2 (* K (+ m n)))) 3))) (* -1/2 (/ (exp (* 1/4 (pow m 2))) (cos (* -1/2 (* K (+ m n)))))))) (cos (* -1/2 (* K (+ m n))))))))) (+ (* -1 (/ (* (exp (* 1/4 (pow m 2))) (pow (sin (* -1/2 (* K (+ m n)))) 2)) (pow (cos (* -1/2 (* K (+ m n)))) 3))) (* -1/2 (/ (exp (* 1/4 (pow m 2))) (cos (* -1/2 (* K (+ m n))))))))) (* -1 (/ (* (exp (* 1/4 (pow m 2))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (/ (exp (* 1/4 (pow m 2))) (cos (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos M))>
#<alt (+ (* -1/2 (/ (* K (* (exp (* 1/4 (pow m 2))) (* (sin M) (+ m n)))) (pow (cos M) 2))) (/ (exp (* 1/4 (pow m 2))) (cos M)))>
#<alt (+ (* K (- (* -1 (* K (+ (* -1/4 (/ (* (exp (* 1/4 (pow m 2))) (* (pow (sin M) 2) (pow (+ m n) 2))) (pow (cos M) 3))) (* -1/8 (/ (* (exp (* 1/4 (pow m 2))) (pow (+ m n) 2)) (cos M)))))) (* 1/2 (/ (* (exp (* 1/4 (pow m 2))) (* (sin M) (+ m n))) (pow (cos M) 2))))) (/ (exp (* 1/4 (pow m 2))) (cos M)))>
#<alt (+ (* K (- (* K (- (* -1 (* K (+ (* -1/2 (/ (* (sin M) (* (+ m n) (+ (* -1/4 (/ (* (exp (* 1/4 (pow m 2))) (* (pow (sin M) 2) (pow (+ m n) 2))) (pow (cos M) 3))) (* -1/8 (/ (* (exp (* 1/4 (pow m 2))) (pow (+ m n) 2)) (cos M)))))) (cos M))) (+ (* -1/48 (/ (* (exp (* 1/4 (pow m 2))) (* (sin M) (pow (+ m n) 3))) (pow (cos M) 2))) (* 1/16 (/ (* (exp (* 1/4 (pow m 2))) (* (sin M) (pow (+ m n) 3))) (pow (cos M) 2))))))) (+ (* -1/4 (/ (* (exp (* 1/4 (pow m 2))) (* (pow (sin M) 2) (pow (+ m n) 2))) (pow (cos M) 3))) (* -1/8 (/ (* (exp (* 1/4 (pow m 2))) (pow (+ m n) 2)) (cos M)))))) (* 1/2 (/ (* (exp (* 1/4 (pow m 2))) (* (sin M) (+ m n))) (pow (cos M) 2))))) (/ (exp (* 1/4 (pow m 2))) (cos M)))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K m)))))>
#<alt (+ (* -1/2 (/ (* K (* n (* (exp (* 1/4 (pow m 2))) (sin (+ M (* -1/2 (* K m))))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))) (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K m))))))>
#<alt (+ (* n (- (* -1 (* n (+ (* -1/4 (/ (* (pow K 2) (* (exp (* 1/4 (pow m 2))) (pow (sin (+ M (* -1/2 (* K m)))) 2))) (pow (cos (+ M (* -1/2 (* K m)))) 3))) (* -1/8 (/ (* (pow K 2) (exp (* 1/4 (pow m 2)))) (cos (+ M (* -1/2 (* K m))))))))) (* 1/2 (/ (* K (* (exp (* 1/4 (pow m 2))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))))) (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K m))))))>
#<alt (+ (* n (- (* n (- (* -1 (* n (+ (* -1/2 (/ (* K (* (sin (+ M (* -1/2 (* K m)))) (+ (* -1/4 (/ (* (pow K 2) (* (exp (* 1/4 (pow m 2))) (pow (sin (+ M (* -1/2 (* K m)))) 2))) (pow (cos (+ M (* -1/2 (* K m)))) 3))) (* -1/8 (/ (* (pow K 2) (exp (* 1/4 (pow m 2)))) (cos (+ M (* -1/2 (* K m))))))))) (cos (+ M (* -1/2 (* K m)))))) (+ (* -1/48 (/ (* (pow K 3) (* (exp (* 1/4 (pow m 2))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))) (* 1/16 (/ (* (pow K 3) (* (exp (* 1/4 (pow m 2))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))))))) (+ (* -1/4 (/ (* (pow K 2) (* (exp (* 1/4 (pow m 2))) (pow (sin (+ M (* -1/2 (* K m)))) 2))) (pow (cos (+ M (* -1/2 (* K m)))) 3))) (* -1/8 (/ (* (pow K 2) (exp (* 1/4 (pow m 2)))) (cos (+ M (* -1/2 (* K m))))))))) (* 1/2 (/ (* K (* (exp (* 1/4 (pow m 2))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))))) (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K m))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))>
#<alt (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))>
#<alt 1>
#<alt (+ 1 (* 1/4 (pow m 2)))>
#<alt (+ 1 (* (pow m 2) (+ 1/4 (* 1/32 (pow m 2)))))>
#<alt (+ 1 (* (pow m 2) (+ 1/4 (* (pow m 2) (+ 1/32 (* 1/384 (pow m 2)))))))>
#<alt (exp (* 1/4 (pow m 2)))>
#<alt (exp (* 1/4 (pow m 2)))>
#<alt (exp (* 1/4 (pow m 2)))>
#<alt (exp (* 1/4 (pow m 2)))>
#<alt (exp (* 1/4 (pow m 2)))>
#<alt (exp (* 1/4 (pow m 2)))>
#<alt (exp (* 1/4 (pow m 2)))>
#<alt (exp (* 1/4 (pow m 2)))>
#<alt (* 1/4 (pow m 2))>
#<alt (* 1/4 (pow m 2))>
#<alt (* 1/4 (pow m 2))>
#<alt (* 1/4 (pow m 2))>
#<alt (* 1/4 (pow m 2))>
#<alt (* 1/4 (pow m 2))>
#<alt (* 1/4 (pow m 2))>
#<alt (* 1/4 (pow m 2))>
#<alt (* 1/4 (pow m 2))>
#<alt (* 1/4 (pow m 2))>
#<alt (* 1/4 (pow m 2))>
#<alt (* 1/4 (pow m 2))>
#<alt (/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (+ (* -1/8 (/ (* (pow K 2) (pow n 2)) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))>
#<alt (+ (* (pow K 2) (+ (* -1/8 (/ (pow n 2) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/384 (/ (* (pow K 2) (pow n 4)) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))) (/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))>
#<alt (+ (* (pow K 2) (+ (* -1/8 (/ (pow n 2) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* (pow K 2) (+ (* -1/46080 (/ (* (pow K 2) (pow n 6)) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/384 (/ (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))))) (/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ 1 (exp (- l (fabs (- n m)))))>
#<alt (+ (* (pow n 2) (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (/ 1 (exp (- l (fabs (- n m))))))>
#<alt (+ (* (pow n 2) (- (+ (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* (pow n 2) (- (* 1/384 (/ (pow K 4) (exp (- l (fabs (- n m)))))) (+ (* 1/32 (/ 1 (exp (- l (fabs (- n m)))))) (* 1/4 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (/ 1 (exp (- l (fabs (- n m))))))>
#<alt (+ (* (pow n 2) (- (+ (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* (pow n 2) (- (+ (* 1/384 (/ (pow K 4) (exp (- l (fabs (- n m)))))) (* (pow n 2) (- (* -1/46080 (/ (pow K 6) (exp (- l (fabs (- n m)))))) (+ (* 1/384 (/ 1 (exp (- l (fabs (- n m)))))) (+ (* 1/32 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (* 1/4 (- (* 1/384 (/ (pow K 4) (exp (- l (fabs (- n m)))))) (+ (* 1/32 (/ 1 (exp (- l (fabs (- n m)))))) (* 1/4 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))))))))))) (+ (* 1/32 (/ 1 (exp (- l (fabs (- n m)))))) (* 1/4 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (/ 1 (exp (- l (fabs (- n m))))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))>
#<alt (+ (* -1 (/ (* l (cos (* -1/2 (* K n)))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))>
#<alt (+ (* l (- (* -1 (* l (+ (* -1 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))>
#<alt (+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))))) (+ (* -1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/6 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))))))) (+ (* -1 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))>
#<alt 1>
#<alt (+ 1 (* -1/8 (* (pow K 2) (pow n 2))))>
#<alt (+ 1 (* (pow K 2) (+ (* -1/8 (pow n 2)) (* 1/384 (* (pow K 2) (pow n 4))))))>
#<alt (+ 1 (* (pow K 2) (+ (* -1/8 (pow n 2)) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (pow n 6))) (* 1/384 (pow n 4)))))))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt 1>
#<alt (+ 1 (* -1/8 (* (pow K 2) (pow n 2))))>
#<alt (+ 1 (* (pow n 2) (+ (* -1/8 (pow K 2)) (* 1/384 (* (pow K 4) (pow n 2))))))>
#<alt (+ 1 (* (pow n 2) (+ (* -1/8 (pow K 2)) (* (pow n 2) (+ (* -1/46080 (* (pow K 6) (pow n 2))) (* 1/384 (pow K 4)))))))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<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 (/ (+ (cos (* -1/2 (* K n))) (* 1/2 (* K (* m (sin (* -1/2 (* K n))))))) (exp (- l (fabs (- m n)))))>
#<alt (+ (* 1/2 (/ (* K (* m (sin (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (+ (* M (- (* 1/2 (/ (* K (* m (cos (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (/ (sin (* -1/2 (* K n))) (exp (- l (fabs (- m n))))))) (/ (cos (* -1/2 (* K n))) (exp (- l (fabs (- m n)))))))>
#<alt (+ (* 1/2 (/ (* K (* m (sin (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (+ (* M (- (+ (* 1/2 (/ (* K (* m (cos (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (* M (- (+ (* -1/2 (/ (cos (* -1/2 (* K n))) (exp (- l (fabs (- m n)))))) (* -1/4 (/ (* K (* m (sin (* -1/2 (* K n))))) (exp (- l (fabs (- m n))))))) (+ (* 1/2 (/ (* K (* m (sin (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (/ (cos (* -1/2 (* K n))) (exp (- l (fabs (- m n))))))))) (/ (sin (* -1/2 (* K n))) (exp (- l (fabs (- m n))))))) (/ (cos (* -1/2 (* K n))) (exp (- l (fabs (- m n)))))))>
#<alt (+ (* 1/2 (/ (* K (* m (sin (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (+ (* M (- (+ (* 1/2 (/ (* K (* m (cos (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (* M (- (+ (* -1/2 (/ (cos (* -1/2 (* K n))) (exp (- l (fabs (- m n)))))) (+ (* -1/4 (/ (* K (* m (sin (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (* M (- (+ (* -1/12 (/ (* K (* m (cos (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (/ (sin (* -1/2 (* K n))) (exp (- l (fabs (- m n)))))) (+ (* -1/6 (/ (sin (* -1/2 (* K n))) (exp (- l (fabs (- m n)))))) (* 1/2 (/ (* K (* m (cos (* -1/2 (* K n))))) (exp (- l (fabs (- m n))))))))))) (+ (* 1/2 (/ (* K (* m (sin (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (/ (cos (* -1/2 (* K n))) (exp (- l (fabs (- m n))))))))) (/ (sin (* -1/2 (* K n))) (exp (- l (fabs (- m n))))))) (/ (cos (* -1/2 (* K n))) (exp (- l (fabs (- m n)))))))>
#<alt (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (+ (* K (- (* 1/2 (/ (* m (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* -1/2 (/ (* n (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n))))))>
#<alt (+ (* K (- (+ (* 1/2 (/ (* m (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* K (+ (* -1/4 (/ (* m (* n (cos M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* -1/8 (/ (* (pow n 2) (cos M)) (exp (- (+ l (pow M 2)) (fabs (- m n))))))))) (* -1/2 (/ (* n (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n))))))>
#<alt (+ (* K (- (+ (* 1/2 (/ (* m (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* K (+ (* -1/4 (/ (* m (* n (cos M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (+ (* -1/8 (/ (* (pow n 2) (cos M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* K (- (* -1/16 (/ (* m (* (pow n 2) (sin M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* 1/48 (/ (* (pow n 3) (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))))) (* -1/2 (/ (* n (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n))))))>
#<alt (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))>
#<alt (* K (+ (* 1/2 (/ (* m (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (* K (exp (- (+ l (pow M 2)) (fabs (- m n))))))))>
#<alt (* K (+ (* 1/2 (/ (* m (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (* K (exp (- (+ l (pow M 2)) (fabs (- m n))))))))>
#<alt (* K (+ (* 1/2 (/ (* m (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (* K (exp (- (+ l (pow M 2)) (fabs (- m n))))))))>
#<alt (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))>
#<alt (* -1 (* K (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (* K (exp (- (+ l (pow M 2)) (fabs (- m n))))))) (* -1/2 (/ (* m (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))>
#<alt (* -1 (* K (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (* K (exp (- (+ l (pow M 2)) (fabs (- m n))))))) (* -1/2 (/ (* m (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))>
#<alt (* -1 (* K (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (* K (exp (- (+ l (pow M 2)) (fabs (- m n))))))) (* -1/2 (/ (* m (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))>
#<alt (/ (+ (cos M) (* 1/2 (* K (* m (sin M))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (+ (* 1/2 (/ (* K (* m (sin M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (+ (* n (- (* -1/4 (/ (* (pow K 2) (* m (cos M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* -1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))>
#<alt (+ (* 1/2 (/ (* K (* m (sin M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (+ (* n (- (+ (* -1/4 (/ (* (pow K 2) (* m (cos M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* n (+ (* -1/8 (/ (* (pow K 2) (cos M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* -1/16 (/ (* (pow K 3) (* m (sin M))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))))) (* -1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))>
#<alt (+ (* 1/2 (/ (* K (* m (sin M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (+ (* n (- (+ (* -1/4 (/ (* (pow K 2) (* m (cos M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* n (+ (* -1/8 (/ (* (pow K 2) (cos M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (+ (* -1/16 (/ (* (pow K 3) (* m (sin M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* n (- (* 1/96 (/ (* (pow K 4) (* m (cos M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* 1/48 (/ (* (pow K 3) (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))))) (* -1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))>
#<alt (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))>
#<alt (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))>
#<alt (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))>
#<alt (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))>
#<alt (* m (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (* m (exp (- (+ l (pow M 2)) (fabs (- m n))))))))>
#<alt (* m (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (* m (exp (- (+ l (pow M 2)) (fabs (- m n))))))))>
#<alt (* m (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (* m (exp (- (+ l (pow M 2)) (fabs (- m n))))))))>
#<alt (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))))>
#<alt (* -1 (* m (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (* m (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))))) (* -1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m)))))))))))>
#<alt (* -1 (* m (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (* m (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))))) (* -1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m)))))))))))>
#<alt (* -1 (* m (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (* m (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))))) (* -1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m)))))))))))>
#<alt (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (fabs (- m n)))))>
#<alt (+ (* -1 (* l (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n)))))))) (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n)))))))>
#<alt (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (+ (* l (- (* -1 (* l (+ (* -1 (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n))))))) (* 1/2 (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (fabs (- m n))))))))) (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n)))))))>
#<alt (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n))))))) (* 1/2 (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (fabs (- m n)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n))))))) (* 1/6 (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (fabs (- m n)))))))))) (+ (* -1 (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n))))))) (* 1/2 (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (fabs (- m n))))))))) (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n)))))))>
#<alt (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))>
#<alt (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (+ (cos (* -1/2 (* K n))) (* 1/2 (* K (* m (sin (* -1/2 (* K n)))))))>
#<alt (+ (cos (* -1/2 (* K n))) (+ (* 1/2 (* K (* m (sin (* -1/2 (* K n)))))) (* M (- (* 1/2 (* K (* m (cos (* -1/2 (* K n)))))) (sin (* -1/2 (* K n)))))))>
#<alt (+ (cos (* -1/2 (* K n))) (+ (* 1/2 (* K (* m (sin (* -1/2 (* K n)))))) (* M (- (+ (* 1/2 (* K (* m (cos (* -1/2 (* K n)))))) (* M (+ (* -1/2 (cos (* -1/2 (* K n)))) (* -1/4 (* K (* m (sin (* -1/2 (* K n))))))))) (sin (* -1/2 (* K n)))))))>
#<alt (+ (cos (* -1/2 (* K n))) (+ (* 1/2 (* K (* m (sin (* -1/2 (* K n)))))) (* M (- (+ (* 1/2 (* K (* m (cos (* -1/2 (* K n)))))) (* M (+ (* -1/2 (cos (* -1/2 (* K n)))) (+ (* -1/4 (* K (* m (sin (* -1/2 (* K n)))))) (* M (- (* -1/12 (* K (* m (cos (* -1/2 (* K n)))))) (* -1/6 (sin (* -1/2 (* K n)))))))))) (sin (* -1/2 (* K n)))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))>
#<alt (+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))))>
#<alt (+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))))>
#<alt (+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))))>
#<alt (+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))))>
#<alt (cos M)>
#<alt (+ (cos M) (* K (- (* 1/2 (* m (sin M))) (* -1/2 (* n (sin M))))))>
#<alt (+ (cos M) (* K (- (+ (* 1/2 (* m (sin M))) (* K (+ (* -1/4 (* m (* n (cos M)))) (* -1/8 (* (pow n 2) (cos M)))))) (* -1/2 (* n (sin M))))))>
#<alt (+ (cos M) (* K (- (+ (* 1/2 (* m (sin M))) (* K (+ (* -1/4 (* m (* n (cos M)))) (+ (* -1/8 (* (pow n 2) (cos M))) (* K (- (* -1/16 (* m (* (pow n 2) (sin M)))) (* 1/48 (* (pow n 3) (sin M))))))))) (* -1/2 (* n (sin M))))))>
#<alt (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))>
#<alt (* K (+ (* 1/2 (* m (sin (+ M (* -1/2 (* K n)))))) (/ (cos (+ M (* -1/2 (* K n)))) K)))>
#<alt (* K (+ (* 1/2 (* m (sin (+ M (* -1/2 (* K n)))))) (/ (cos (+ M (* -1/2 (* K n)))) K)))>
#<alt (* K (+ (* 1/2 (* m (sin (+ M (* -1/2 (* K n)))))) (/ (cos (+ M (* -1/2 (* K n)))) K)))>
#<alt (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))>
#<alt (* -1 (* K (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) K)) (* -1/2 (* m (sin (+ M (* -1/2 (* K n)))))))))>
#<alt (* -1 (* K (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) K)) (* -1/2 (* m (sin (+ M (* -1/2 (* K n)))))))))>
#<alt (* -1 (* K (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) K)) (* -1/2 (* m (sin (+ M (* -1/2 (* K n)))))))))>
#<alt (+ (cos M) (* 1/2 (* K (* m (sin M)))))>
#<alt (+ (cos M) (+ (* 1/2 (* K (* m (sin M)))) (* n (- (* -1/4 (* (pow K 2) (* m (cos M)))) (* -1/2 (* K (sin M)))))))>
#<alt (+ (cos M) (+ (* 1/2 (* K (* m (sin M)))) (* n (- (+ (* -1/4 (* (pow K 2) (* m (cos M)))) (* n (+ (* -1/8 (* (pow K 2) (cos M))) (* -1/16 (* (pow K 3) (* m (sin M))))))) (* -1/2 (* K (sin M)))))))>
#<alt (+ (cos M) (+ (* 1/2 (* K (* m (sin M)))) (* n (- (+ (* -1/4 (* (pow K 2) (* m (cos M)))) (* n (+ (* -1/8 (* (pow K 2) (cos M))) (+ (* -1/16 (* (pow K 3) (* m (sin M)))) (* n (- (* 1/96 (* (pow K 4) (* m (cos M)))) (* 1/48 (* (pow K 3) (sin M))))))))) (* -1/2 (* K (sin M)))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))>
#<alt (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))>
#<alt (* m (+ (* 1/2 (* K (sin (+ M (* -1/2 (* K n)))))) (/ (cos (+ M (* -1/2 (* K n)))) m)))>
#<alt (* m (+ (* 1/2 (* K (sin (+ M (* -1/2 (* K n)))))) (/ (cos (+ M (* -1/2 (* K n)))) m)))>
#<alt (* m (+ (* 1/2 (* K (sin (+ M (* -1/2 (* K n)))))) (/ (cos (+ M (* -1/2 (* K n)))) m)))>
#<alt (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))>
#<alt (* -1 (* m (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) m)) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))>
#<alt (* -1 (* m (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) m)) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))>
#<alt (* -1 (* m (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) m)) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (+ (cos (* -1/2 (* K n))) (* -1 (* M (sin (* -1/2 (* K n))))))>
#<alt (+ (cos (* -1/2 (* K n))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K n))))) (sin (* -1/2 (* K n))))))>
#<alt (+ (cos (* -1/2 (* K n))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K n)))) (* 1/6 (* M (sin (* -1/2 (* K n))))))) (sin (* -1/2 (* K n))))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (- (* -1/2 (* K n)) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K n)) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K n)) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K n)) (* -1 M)))>
#<alt (cos M)>
#<alt (+ (cos M) (* 1/2 (* K (* n (sin M)))))>
#<alt (+ (cos M) (* K (- (* -1/8 (* K (* (pow n 2) (cos M)))) (* -1/2 (* n (sin M))))))>
#<alt (+ (cos M) (* K (- (* K (+ (* -1/8 (* (pow n 2) (cos M))) (* -1/48 (* K (* (pow n 3) (sin M)))))) (* -1/2 (* n (sin M))))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos M)>
#<alt (+ (cos M) (* 1/2 (* K (* n (sin M)))))>
#<alt (+ (cos M) (* n (- (* -1/8 (* (pow K 2) (* n (cos M)))) (* -1/2 (* K (sin M))))))>
#<alt (+ (cos M) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos M))) (* -1/48 (* (pow K 3) (* n (sin M)))))) (* -1/2 (* K (sin M))))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (* -1/2 (* K n))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt M>
#<alt (* M (+ 1 (* -1/2 (/ (* K n) M))))>
#<alt (* M (+ 1 (* -1/2 (/ (* K n) M))))>
#<alt (* M (+ 1 (* -1/2 (/ (* K n) M))))>
#<alt M>
#<alt (* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))>
#<alt (* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))>
#<alt (* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))>
#<alt M>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (* -1/2 (* K n))>
#<alt (* K (+ (* -1/2 n) (/ M K)))>
#<alt (* K (+ (* -1/2 n) (/ M K)))>
#<alt (* K (+ (* -1/2 n) (/ M K)))>
#<alt (* -1/2 (* K n))>
#<alt (* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))>
#<alt (* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))>
#<alt (* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))>
#<alt M>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (* -1/2 (* K n))>
#<alt (* n (+ (* -1/2 K) (/ M n)))>
#<alt (* n (+ (* -1/2 K) (/ M n)))>
#<alt (* n (+ (* -1/2 K) (/ M n)))>
#<alt (* -1/2 (* K n))>
#<alt (* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))>
#<alt (* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))>
#<alt (* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))>
#<alt (pow n 2)>
#<alt (+ (* 2 (* m n)) (pow n 2))>
#<alt (+ (* m (+ m (* 2 n))) (pow n 2))>
#<alt (+ (* m (+ m (* 2 n))) (pow n 2))>
#<alt (pow m 2)>
#<alt (* (pow m 2) (+ 1 (* 2 (/ n m))))>
#<alt (* (pow m 2) (+ 1 (+ (* 2 (/ n m)) (/ (pow n 2) (pow m 2)))))>
#<alt (* (pow m 2) (+ 1 (+ (* 2 (/ n m)) (/ (pow n 2) (pow m 2)))))>
#<alt (pow m 2)>
#<alt (* (pow m 2) (+ 1 (* 2 (/ n m))))>
#<alt (* (pow m 2) (+ 1 (* -1 (/ (+ (* -2 n) (* -1 (/ (pow n 2) m))) m))))>
#<alt (* (pow m 2) (+ 1 (* -1 (/ (+ (* -2 n) (* -1 (/ (pow n 2) m))) m))))>
#<alt (pow m 2)>
#<alt (+ (* 2 (* m n)) (pow m 2))>
#<alt (+ (* n (+ n (* 2 m))) (pow m 2))>
#<alt (+ (* n (+ n (* 2 m))) (pow m 2))>
#<alt (pow n 2)>
#<alt (* (pow n 2) (+ 1 (* 2 (/ m n))))>
#<alt (* (pow n 2) (+ 1 (+ (* 2 (/ m n)) (/ (pow m 2) (pow n 2)))))>
#<alt (* (pow n 2) (+ 1 (+ (* 2 (/ m n)) (/ (pow m 2) (pow n 2)))))>
#<alt (pow n 2)>
#<alt (* (pow n 2) (+ 1 (* 2 (/ m n))))>
#<alt (* (pow n 2) (+ 1 (* -1 (/ (+ (* -2 m) (* -1 (/ (pow m 2) n))) n))))>
#<alt (* (pow n 2) (+ 1 (* -1 (/ (+ (* -2 m) (* -1 (/ (pow m 2) n))) n))))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (neg (+ m (* -1 n))))>
#<alt (fabs (neg (+ m (* -1 n))))>
#<alt (fabs (neg (+ m (* -1 n))))>
#<alt (fabs (neg (+ m (* -1 n))))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (+ n (* -1 m)))>
#<alt (fabs (+ n (* -1 m)))>
#<alt (fabs (+ n (* -1 m)))>
#<alt (fabs (+ n (* -1 m)))>
#<alt (cos (* -1/2 (* K (+ m n))))>
#<alt (+ (cos (* -1/2 (* K (+ m n)))) (* -1 (* M (sin (* -1/2 (* K (+ m n)))))))>
#<alt (+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K (+ m n)))))) (sin (* -1/2 (* K (+ m n)))))))>
#<alt (+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* 1/6 (* M (sin (* -1/2 (* K (+ m n)))))))) (sin (* -1/2 (* K (+ m n)))))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (- (* -1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos M)>
#<alt (+ (cos M) (* 1/2 (* K (* (sin M) (+ m n)))))>
#<alt (+ (cos M) (* K (- (* -1/8 (* K (* (cos M) (pow (+ m n) 2)))) (* -1/2 (* (sin M) (+ m n))))))>
#<alt (+ (cos M) (* K (- (* K (+ (* -1/8 (* (cos M) (pow (+ m n) 2))) (* -1/48 (* K (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n))))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* -1/8 (* (pow K 2) (* m (cos (+ M (* -1/2 (* K n))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/48 (* (pow K 3) (* m (sin (+ M (* -1/2 (* K n))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* -1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* -1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* -1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* -1/2 (* K m))))>
#<alt (+ (cos (+ M (* -1/2 (* K m)))) (* 1/2 (* K (* n (sin (+ M (* -1/2 (* K m))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* -1/8 (* (pow K 2) (* n (cos (+ M (* -1/2 (* K m))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/48 (* (pow K 3) (* n (sin (+ M (* -1/2 (* K m))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (- m (* -1 n))))))>
#<alt (cos (+ M (* -1/2 (* K (- m (* -1 n))))))>
#<alt (cos (+ M (* -1/2 (* K (- m (* -1 n))))))>
#<alt (cos (+ M (* -1/2 (* K (- m (* -1 n))))))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K (+ m n)))>
#<alt (* -1/2 (* K n))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (* -1/2 (* K m))>
#<alt (* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))>
#<alt (* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))>
#<alt (* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))>
#<alt (* -1/2 (* K m))>
#<alt (* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))>
#<alt (* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))>
#<alt (* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))>
#<alt (* -1/2 (* K m))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (+ (* -1/2 (* K m)) (* -1/2 (* K n)))>
#<alt (* -1/2 (* K n))>
#<alt (* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))>
#<alt (* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))>
#<alt (* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))>
#<alt (* -1/2 (* K n))>
#<alt (* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))>
#<alt (* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))>
#<alt (* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))>
#<alt (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))>
#<alt (+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))>
#<alt (+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* 1/2 (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))))))>
#<alt (+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (+ (* 1/6 (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))>
#<alt (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))>
#<alt (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))>
#<alt (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))>
#<alt (exp (- l (fabs (- n m))))>
#<alt (+ (exp (- l (fabs (- n m)))) (* 1/4 (* (pow n 2) (exp (- l (fabs (- n m)))))))>
#<alt (+ (exp (- l (fabs (- n m)))) (* (pow n 2) (+ (* 1/32 (* (pow n 2) (exp (- l (fabs (- n m)))))) (* 1/4 (exp (- l (fabs (- n m))))))))>
#<alt (+ (exp (- l (fabs (- n m)))) (* (pow n 2) (+ (* 1/4 (exp (- l (fabs (- n m))))) (* (pow n 2) (+ (* 1/384 (* (pow n 2) (exp (- l (fabs (- n m)))))) (* 1/32 (exp (- l (fabs (- n m))))))))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))>
#<alt (sin (* -1/2 (* K n)))>
#<alt (+ (sin (* -1/2 (* K n))) (* M (cos (* -1/2 (* K n)))))>
#<alt (+ (sin (* -1/2 (* K n))) (* M (+ (cos (* -1/2 (* K n))) (* -1/2 (* M (sin (* -1/2 (* K n))))))))>
#<alt (+ (sin (* -1/2 (* K n))) (* M (+ (cos (* -1/2 (* K n))) (* M (+ (* -1/2 (sin (* -1/2 (* K n)))) (* -1/6 (* M (cos (* -1/2 (* K n))))))))))>
#<alt (sin (+ M (* -1/2 (* K n))))>
#<alt (sin (+ M (* -1/2 (* K n))))>
#<alt (sin (+ M (* -1/2 (* K n))))>
#<alt (sin (+ M (* -1/2 (* K n))))>
#<alt (sin (- (* -1/2 (* K n)) (* -1 M)))>
#<alt (sin (- (* -1/2 (* K n)) (* -1 M)))>
#<alt (sin (- (* -1/2 (* K n)) (* -1 M)))>
#<alt (sin (- (* -1/2 (* K n)) (* -1 M)))>
#<alt (sin M)>
#<alt (+ (sin M) (* -1/2 (* K (* n (cos M)))))>
#<alt (+ (sin M) (* K (+ (* -1/2 (* n (cos M))) (* -1/8 (* K (* (pow n 2) (sin M)))))))>
#<alt (+ (sin M) (* K (+ (* -1/2 (* n (cos M))) (* K (+ (* -1/8 (* (pow n 2) (sin M))) (* 1/48 (* K (* (pow n 3) (cos M)))))))))>
#<alt (sin (+ M (* -1/2 (* K n))))>
#<alt (sin (+ M (* -1/2 (* K n))))>
#<alt (sin (+ M (* -1/2 (* K n))))>
#<alt (sin (+ M (* -1/2 (* K n))))>
#<alt (sin (+ M (* -1/2 (* K n))))>
#<alt (sin (+ M (* -1/2 (* K n))))>
#<alt (sin (+ M (* -1/2 (* K n))))>
#<alt (sin (+ M (* -1/2 (* K n))))>
#<alt (sin M)>
#<alt (+ (sin M) (* -1/2 (* K (* n (cos M)))))>
#<alt (+ (sin M) (* n (+ (* -1/2 (* K (cos M))) (* -1/8 (* (pow K 2) (* n (sin M)))))))>
#<alt (+ (sin M) (* n (+ (* -1/2 (* K (cos M))) (* n (+ (* -1/8 (* (pow K 2) (sin M))) (* 1/48 (* (pow K 3) (* n (cos M)))))))))>
#<alt (sin (+ M (* -1/2 (* K n))))>
#<alt (sin (+ M (* -1/2 (* K n))))>
#<alt (sin (+ M (* -1/2 (* K n))))>
#<alt (sin (+ M (* -1/2 (* K n))))>
#<alt (sin (+ M (* -1/2 (* K n))))>
#<alt (sin (+ M (* -1/2 (* K n))))>
#<alt (sin (+ M (* -1/2 (* K n))))>
#<alt (sin (+ M (* -1/2 (* K n))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin M)))>
#<alt (* K (+ (* -1/2 (* K (* m (* n (cos M))))) (* m (sin M))))>
#<alt (* K (+ (* K (+ (* -1/2 (* m (* n (cos M)))) (* -1/8 (* K (* m (* (pow n 2) (sin M))))))) (* m (sin M))))>
#<alt (* K (+ (* K (+ (* -1/2 (* m (* n (cos M)))) (* K (+ (* -1/8 (* m (* (pow n 2) (sin M)))) (* 1/48 (* K (* m (* (pow n 3) (cos M))))))))) (* m (sin M))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (* -1/2 (* K n)))))>
#<alt (+ (* K (* M (* m (cos (* -1/2 (* K n)))))) (* K (* m (sin (* -1/2 (* K n))))))>
#<alt (+ (* K (* m (sin (* -1/2 (* K n))))) (* M (+ (* -1/2 (* K (* M (* m (sin (* -1/2 (* K n))))))) (* K (* m (cos (* -1/2 (* K n))))))))>
#<alt (+ (* K (* m (sin (* -1/2 (* K n))))) (* M (+ (* K (* m (cos (* -1/2 (* K n))))) (* M (+ (* -1/2 (* K (* m (sin (* -1/2 (* K n)))))) (* -1/6 (* K (* M (* m (cos (* -1/2 (* K n))))))))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))>
#<alt (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))>
#<alt (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))>
#<alt (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))>
#<alt (* K (* m (sin M)))>
#<alt (+ (* -1/2 (* (pow K 2) (* m (* n (cos M))))) (* K (* m (sin M))))>
#<alt (+ (* K (* m (sin M))) (* n (+ (* -1/2 (* (pow K 2) (* m (cos M)))) (* -1/8 (* (pow K 3) (* m (* n (sin M))))))))>
#<alt (+ (* K (* m (sin M))) (* n (+ (* -1/2 (* (pow K 2) (* m (cos M)))) (* n (+ (* -1/8 (* (pow K 3) (* m (sin M)))) (* 1/48 (* (pow K 4) (* m (* n (cos M))))))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
#<alt (* K (* m (sin (+ M (* -1/2 (* K n))))))>
Calls

210 calls:

TimeVariablePointExpression
4.0ms
m
@inf
(/ (+ (cos (+ M (* (* -1/2 K) n))) (* 1/2 (* (* m K) (sin (+ M (* (* -1/2 K) n)))))) (exp (+ (* M M) (- l (fabs (- m n))))))
3.0ms
m
@0
(+ l (- (* 1/4 (* (+ m n) (+ m n))) (fabs (- n m))))
3.0ms
n
@0
(/ (cos (* (* -1/2 K) n)) (exp (- (+ l (* 1/4 (* n n))) (fabs (- n m)))))
2.0ms
l
@inf
(/ (+ (cos (+ M (* (* -1/2 K) n))) (* 1/2 (* (* m K) (sin (+ M (* (* -1/2 K) n)))))) (exp (+ (* M M) (- l (fabs (- m n))))))
2.0ms
n
@0
(/ (+ (cos (+ M (* (* -1/2 K) n))) (* 1/2 (* (* m K) (sin (+ M (* (* -1/2 K) n)))))) (exp (+ (* M M) (- l (fabs (- m n))))))

rewrite337.0ms (1.9%)

Algorithm
1×batch-egg-rewrite
Rules
2478×*-lowering-*.f32
2478×*-lowering-*.f64
2018×fma-lowering-fma.f32
2018×fma-lowering-fma.f64
1376×+-lowering-+.f64
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
054262
1198246
2752244
33419244
08083244
Stop Event
1×iter limit
1×node limit
Counts
26 → 875
Calls
Call 1
Inputs
(neg (+ l (- (* 1/4 (* (+ m n) (+ m n))) (fabs (- n m)))))
(exp (neg (+ l (- (* 1/4 (* (+ m n) (+ m n))) (fabs (- n m))))))
(+ l (- (* 1/4 (* (+ m n) (+ m n))) (fabs (- n m))))
(- (* 1/4 (* (+ m n) (+ m n))) (fabs (- n m)))
(/ (cos M) (exp l))
(cos M)
(exp l)
(/ 1 (/ (exp (* 1/4 (* m m))) (cos (+ M (* K (/ (+ m n) -2))))))
(/ (exp (* 1/4 (* m m))) (cos (+ M (* K (/ (+ m n) -2)))))
(exp (* 1/4 (* m m)))
(* 1/4 (* m m))
(/ (cos (* (* -1/2 K) n)) (exp (- (+ l (* 1/4 (* n n))) (fabs (- n m)))))
(cos (* (* -1/2 K) n))
(* (* -1/2 K) n)
(* -1/2 K)
(/ (+ (cos (+ M (* (* -1/2 K) n))) (* 1/2 (* (* m K) (sin (+ M (* (* -1/2 K) n)))))) (exp (+ (* M M) (- l (fabs (- m n))))))
(+ (cos (+ M (* (* -1/2 K) n))) (* 1/2 (* (* m K) (sin (+ M (* (* -1/2 K) n))))))
(cos (+ M (* (* -1/2 K) n)))
(+ M (* (* -1/2 K) n))
(* (+ m n) (+ m n))
(fabs (- n m))
(cos (+ M (* K (/ (+ m n) -2))))
(* K (/ (+ m n) -2))
(exp (- (+ l (* 1/4 (* n n))) (fabs (- n m))))
(sin (+ M (* (* -1/2 K) n)))
(* (* m K) (sin (+ M (* (* -1/2 K) n))))
Outputs
(+.f64 (fabs.f64 (-.f64 n m)) (-.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64)) l))
(+.f64 (+.f64 (fabs.f64 (-.f64 n m)) (-.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64)) l)) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (+.f64 (fabs.f64 (-.f64 n m)) (-.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64)) l)))
(+.f64 (-.f64 #s(literal 0 binary64) l) (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))))
(+.f64 (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) l))
(+.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64)) (-.f64 (fabs.f64 (-.f64 n m)) l))
(+.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64)) (neg.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))
(+.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64)) (*.f64 #s(literal -1 binary64) (-.f64 l (fabs.f64 (-.f64 n m)))))
(+.f64 (-.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64)) l) (fabs.f64 (-.f64 n m)))
(+.f64 (*.f64 #s(literal -1 binary64) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))))) (fabs.f64 (-.f64 n m)))
(+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) #s(literal -1 binary64)) (*.f64 (-.f64 l (fabs.f64 (-.f64 n m))) #s(literal -1 binary64)))
(+.f64 (*.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m))))
(-.f64 #s(literal 0 binary64) (-.f64 l (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))))))
(-.f64 #s(literal 0 binary64) (-.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))) (-.f64 #s(literal 0 binary64) l)))
(-.f64 (-.f64 #s(literal 0 binary64) l) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))
(-.f64 (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) l)
(-.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64)) (-.f64 l (fabs.f64 (-.f64 n m))))
(-.f64 (-.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64)) l) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))))
(-.f64 (+.f64 (-.f64 #s(literal 0 binary64) l) #s(literal 0 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))
(-.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) #s(literal 0 binary64)) l)
(-.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))))
(fma.f64 l #s(literal -1 binary64) (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))))
(fma.f64 #s(literal 1/4 binary64) (neg.f64 (*.f64 (+.f64 m n) (+.f64 m n))) (-.f64 (fabs.f64 (-.f64 n m)) l))
(fma.f64 #s(literal 1/4 binary64) (neg.f64 (*.f64 (+.f64 m n) (+.f64 m n))) (neg.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 #s(literal 1/4 binary64) (neg.f64 (*.f64 (+.f64 m n) (+.f64 m n))) (*.f64 #s(literal -1 binary64) (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 (+.f64 m n) (neg.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 m n))) (-.f64 (fabs.f64 (-.f64 n m)) l))
(fma.f64 (+.f64 m n) (neg.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 m n))) (neg.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 (+.f64 m n) (neg.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 m n))) (*.f64 #s(literal -1 binary64) (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64) (-.f64 (fabs.f64 (-.f64 n m)) l))
(fma.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64) (neg.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64) (*.f64 #s(literal -1 binary64) (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) #s(literal -1 binary64) (*.f64 (-.f64 l (fabs.f64 (-.f64 n m))) #s(literal -1 binary64)))
(fma.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))) #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) l))
(fma.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m))) #s(literal -1 binary64) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (fabs.f64 (-.f64 n m)) (-.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64)) l))
(fma.f64 #s(literal -1 binary64) l (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (-.f64 (fabs.f64 (-.f64 n m)) l))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (neg.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (*.f64 #s(literal -1 binary64) (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))) (-.f64 #s(literal 0 binary64) l))
(fma.f64 #s(literal -1 binary64) (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m))) #s(literal 0 binary64))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))) (-.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64)) l))
(fma.f64 #s(literal -1 binary64) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m)))
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 m n)) (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (-.f64 (fabs.f64 (-.f64 n m)) l))
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 m n)) (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (neg.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 m n)) (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (*.f64 #s(literal -1 binary64) (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))) #s(literal -1 binary64)))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (-.f64 #s(literal 0 binary64) (+.f64 m n)) (-.f64 (fabs.f64 (-.f64 n m)) l))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (-.f64 #s(literal 0 binary64) (+.f64 m n)) (neg.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (-.f64 #s(literal 0 binary64) (+.f64 m n)) (*.f64 #s(literal -1 binary64) (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)) (-.f64 (fabs.f64 (-.f64 n m)) l))
(fma.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)) (neg.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)) (*.f64 #s(literal -1 binary64) (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 (neg.f64 (*.f64 (+.f64 m n) (+.f64 m n))) #s(literal 1/4 binary64) (-.f64 (fabs.f64 (-.f64 n m)) l))
(fma.f64 (neg.f64 (*.f64 (+.f64 m n) (+.f64 m n))) #s(literal 1/4 binary64) (neg.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 (neg.f64 (*.f64 (+.f64 m n) (+.f64 m n))) #s(literal 1/4 binary64) (*.f64 #s(literal -1 binary64) (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 m n))) (+.f64 m n) (-.f64 (fabs.f64 (-.f64 n m)) l))
(fma.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 m n))) (+.f64 m n) (neg.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 m n))) (+.f64 m n) (*.f64 #s(literal -1 binary64) (-.f64 l (fabs.f64 (-.f64 n m)))))
(neg.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m))))
(*.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m))) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m))))
(exp.f64 (+.f64 (fabs.f64 (-.f64 n m)) (-.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64)) l)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m))))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal -1 binary64))) (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m)))))
(exp.f64 (+.f64 (*.f64 (log.f64 (exp.f64 l)) #s(literal -1 binary64)) (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (*.f64 (log.f64 (exp.f64 l)) #s(literal -1 binary64))))
(exp.f64 (-.f64 (*.f64 (log.f64 (exp.f64 l)) #s(literal -1 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))
(neg.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m))))))
(/.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m)))))
(/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m)))))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m))))))
(/.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))
(/.f64 (exp.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))
(/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m)))))
(/.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))))) (exp.f64 l))
(/.f64 (*.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))))) (exp.f64 l))
(/.f64 (*.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 l)))
(/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (+.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) #s(literal 0 binary64))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m)))))
(pow.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m)))) #s(literal -1 binary64))
(pow.f64 (exp.f64 #s(literal -1 binary64)) (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m))))
(pow.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m)))))) #s(literal -1 binary64))
(pow.f64 (exp.f64 (log.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m)))))) #s(literal -1 binary64))
(pow.f64 (exp.f64 (log.f64 (exp.f64 #s(literal -1 binary64)))) (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m))))
(*.f64 (exp.f64 (+.f64 (fabs.f64 (-.f64 n m)) (-.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64)) l))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (exp.f64 (+.f64 (fabs.f64 (-.f64 n m)) (-.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64)) l))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m)))))))
(*.f64 (exp.f64 (fabs.f64 (-.f64 n m))) (exp.f64 (*.f64 #s(literal -1 binary64) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))))))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (pow.f64 (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(*.f64 (exp.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))
(*.f64 (exp.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (neg.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))))
(*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))))) (exp.f64 (fabs.f64 (-.f64 n m))))
(*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))))) (/.f64 #s(literal 1 binary64) (exp.f64 l)))
(*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (exp.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64))))
(*.f64 (exp.f64 (-.f64 (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal -1/4 binary64)) l)) (exp.f64 (fabs.f64 (-.f64 n m))))
(*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (-.f64 l (fabs.f64 (-.f64 n m))))))
(*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (-.f64 (fabs.f64 (-.f64 n m)) l))))
(*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (-.f64 l (fabs.f64 (-.f64 n m))))))
(*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (-.f64 (fabs.f64 (-.f64 n m)) l))))
(*.f64 (pow.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) #s(literal -1 binary64)) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (-.f64 l (fabs.f64 (-.f64 n m))))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (neg.f64 (-.f64 (fabs.f64 (-.f64 n m)) l)))
(+.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))) l)
(+.f64 (-.f64 l (fabs.f64 (-.f64 n m))) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))))
(+.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))))
(+.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (-.f64 l (fabs.f64 (-.f64 n m)))))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (-.f64 (fabs.f64 (-.f64 n m)) l)))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (-.f64 l (fabs.f64 (-.f64 n m)))))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (-.f64 (fabs.f64 (-.f64 n m)) l)))
(-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (-.f64 (fabs.f64 (-.f64 n m)) l))
(-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (fabs.f64 (-.f64 n m)))
(-.f64 (+.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) #s(literal 0 binary64)) (fabs.f64 (-.f64 n m)))
(fma.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)) (-.f64 l (fabs.f64 (-.f64 n m))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)) (neg.f64 (-.f64 (fabs.f64 (-.f64 n m)) l)))
(fma.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n)) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n)) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (-.f64 (fabs.f64 (-.f64 n m)) l)))
(fma.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n)) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n)) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (-.f64 (fabs.f64 (-.f64 n m)) l)))
(fma.f64 m (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 m (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (-.f64 (fabs.f64 (-.f64 n m)) l)))
(fma.f64 n (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 n (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (-.f64 (fabs.f64 (-.f64 n m)) l)))
(fma.f64 (+.f64 m n) (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (-.f64 l (fabs.f64 (-.f64 n m))))
(fma.f64 (+.f64 m n) (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (neg.f64 (-.f64 (fabs.f64 (-.f64 n m)) l)))
(fma.f64 (+.f64 m n) (*.f64 #s(literal 1/4 binary64) n) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 (+.f64 m n) (*.f64 #s(literal 1/4 binary64) n) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (-.f64 (fabs.f64 (-.f64 n m)) l)))
(fma.f64 (+.f64 m n) (*.f64 #s(literal 1/4 binary64) m) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 (+.f64 m n) (*.f64 #s(literal 1/4 binary64) m) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (-.f64 (fabs.f64 (-.f64 n m)) l)))
(fma.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64) (-.f64 l (fabs.f64 (-.f64 n m))))
(fma.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64) (neg.f64 (-.f64 (fabs.f64 (-.f64 n m)) l)))
(fma.f64 (fabs.f64 (-.f64 n m)) #s(literal -1 binary64) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))))
(fma.f64 #s(literal -1 binary64) (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))))
(fma.f64 (*.f64 m (+.f64 m n)) #s(literal 1/4 binary64) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 (*.f64 m (+.f64 m n)) #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (-.f64 (fabs.f64 (-.f64 n m)) l)))
(fma.f64 (*.f64 n (+.f64 m n)) #s(literal 1/4 binary64) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 (*.f64 n (+.f64 m n)) #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (-.f64 (fabs.f64 (-.f64 n m)) l)))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) m (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) m (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (-.f64 (fabs.f64 (-.f64 n m)) l)))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) n (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) n (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (-.f64 (fabs.f64 (-.f64 n m)) l)))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (+.f64 m n) (-.f64 l (fabs.f64 (-.f64 n m))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (+.f64 m n) (neg.f64 (-.f64 (fabs.f64 (-.f64 n m)) l)))
(fma.f64 (*.f64 #s(literal 1/4 binary64) n) (+.f64 m n) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) n) (+.f64 m n) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (-.f64 (fabs.f64 (-.f64 n m)) l)))
(fma.f64 (*.f64 #s(literal 1/4 binary64) m) (+.f64 m n) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (-.f64 l (fabs.f64 (-.f64 n m)))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) m) (+.f64 m n) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (-.f64 (fabs.f64 (-.f64 n m)) l)))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))))
(+.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (fabs.f64 (-.f64 n m))))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (fabs.f64 (-.f64 n m))))
(+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))) (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n)))) (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))))
(+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))) (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n)))) (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))))
(+.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)) (neg.f64 (*.f64 (fabs.f64 (-.f64 n m)) #s(literal 1 binary64)))) (fma.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))) #s(literal 1 binary64) (*.f64 (fabs.f64 (-.f64 n m)) #s(literal 1 binary64))))
(+.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))) #s(literal -1 binary64)))) (fma.f64 (fabs.f64 (-.f64 n m)) #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))) #s(literal -1 binary64))))
(+.f64 (fma.f64 (+.f64 m n) (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (neg.f64 (*.f64 (fabs.f64 (-.f64 n m)) #s(literal 1 binary64)))) (fma.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))) #s(literal 1 binary64) (*.f64 (fabs.f64 (-.f64 n m)) #s(literal 1 binary64))))
(+.f64 (fma.f64 (+.f64 m n) (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))) #s(literal -1 binary64)))) (fma.f64 (fabs.f64 (-.f64 n m)) #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))) #s(literal -1 binary64))))
(+.f64 (fma.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64) (neg.f64 (*.f64 (fabs.f64 (-.f64 n m)) #s(literal 1 binary64)))) (fma.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))) #s(literal 1 binary64) (*.f64 (fabs.f64 (-.f64 n m)) #s(literal 1 binary64))))
(+.f64 (fma.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))) #s(literal -1 binary64)))) (fma.f64 (fabs.f64 (-.f64 n m)) #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))) #s(literal -1 binary64))))
(+.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (+.f64 m n) (neg.f64 (*.f64 (fabs.f64 (-.f64 n m)) #s(literal 1 binary64)))) (fma.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))) #s(literal 1 binary64) (*.f64 (fabs.f64 (-.f64 n m)) #s(literal 1 binary64))))
(+.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (+.f64 m n) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))) #s(literal -1 binary64)))) (fma.f64 (fabs.f64 (-.f64 n m)) #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))) #s(literal -1 binary64))))
(-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))
(-.f64 #s(literal 0 binary64) (-.f64 (fabs.f64 (-.f64 n m)) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))))
(-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) #s(literal 0 binary64)) (fabs.f64 (-.f64 n m)))
(fma.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n)) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (fabs.f64 (-.f64 n m))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n)) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (fabs.f64 (-.f64 n m))))
(fma.f64 m (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (fabs.f64 (-.f64 n m))))
(fma.f64 n (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (fabs.f64 (-.f64 n m))))
(fma.f64 (+.f64 m n) (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))))
(fma.f64 (+.f64 m n) (*.f64 #s(literal 1/4 binary64) n) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (fabs.f64 (-.f64 n m))))
(fma.f64 (+.f64 m n) (*.f64 #s(literal 1/4 binary64) m) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (fabs.f64 (-.f64 n m))))
(fma.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))))
(fma.f64 (fabs.f64 (-.f64 n m)) #s(literal -1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))))
(fma.f64 #s(literal -1 binary64) (fabs.f64 (-.f64 n m)) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))))
(fma.f64 (*.f64 m (+.f64 m n)) #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (fabs.f64 (-.f64 n m))))
(fma.f64 (*.f64 n (+.f64 m n)) #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (fabs.f64 (-.f64 n m))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) m (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (fabs.f64 (-.f64 n m))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) n (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (fabs.f64 (-.f64 n m))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 m n)) (+.f64 m n) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) n) (+.f64 m n) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m (+.f64 m n))) (fabs.f64 (-.f64 n m))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) m) (+.f64 m n) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n (+.f64 m n))) (fabs.f64 (-.f64 n m))))
(exp.f64 (*.f64 (log.f64 (/.f64 (exp.f64 l) (cos.f64 M))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (cos.f64 M) (-.f64 #s(literal 0 binary64) (exp.f64 l))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 l))) (/.f64 (cos.f64 M) (-.f64 #s(literal 0 binary64) (exp.f64 l))))
(neg.f64 (/.f64 (cos.f64 M) (-.f64 #s(literal 0 binary64) (exp.f64 l))))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 M) (-.f64 #s(literal 0 binary64) (exp.f64 l)))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (exp.f64 l) (cos.f64 M))))
(/.f64 (cos.f64 M) (exp.f64 l))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 l) (cos.f64 M)))
(/.f64 #s(literal -1 binary64) (/.f64 (exp.f64 l) (-.f64 #s(literal 0 binary64) (cos.f64 M))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 M)) (-.f64 #s(literal 0 binary64) (exp.f64 l)))
(/.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (/.f64 #s(literal 1 binary64) (cos.f64 M)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 M))) (-.f64 #s(literal 0 binary64) (exp.f64 l)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 M)) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 l)))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 M)) #s(literal -1 binary64)) (exp.f64 l))
(pow.f64 (/.f64 (cos.f64 M) (exp.f64 l)) #s(literal 1 binary64))
(pow.f64 (/.f64 (exp.f64 l) (cos.f64 M)) #s(literal -1 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (exp.f64 l) (cos.f64 M)))) #s(literal -1 binary64))
(*.f64 (cos.f64 M) (/.f64 #s(literal 1 binary64) (exp.f64 l)))
(*.f64 (/.f64 (cos.f64 M) (exp.f64 l)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 M) (exp.f64 l)))
(*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 M) (-.f64 #s(literal 0 binary64) (exp.f64 l))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 M)) (/.f64 #s(literal -1 binary64) (exp.f64 l)))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (cos.f64 M))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 M))))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 M)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 l)) (-.f64 #s(literal 0 binary64) (cos.f64 M)))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 l)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 M))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 M))) (/.f64 #s(literal 1 binary64) (exp.f64 l)))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 M))) (/.f64 #s(literal -1 binary64) (exp.f64 l)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 M))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (exp.f64 l)))
(cos.f64 M)
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 M)))
(neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 M)))
(*.f64 (cos.f64 M) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 M))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 M)))
(exp.f64 l)
(exp.f64 (neg.f64 (-.f64 #s(literal 0 binary64) l)))
(exp.f64 (neg.f64 (*.f64 (log.f64 (exp.f64 l)) #s(literal -1 binary64))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 l)))
(neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 l)))
(/.f64 (exp.f64 l) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (exp.f64 l)))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 l)) #s(literal -1 binary64))
(pow.f64 (exp.f64 l) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) #s(literal -1 binary64))
(pow.f64 (exp.f64 #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) l))
(*.f64 (exp.f64 l) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (exp.f64 l))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 l)))
(+.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (*.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))))
(+.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (neg.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (/.f64 (sin.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))))
(+.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (*.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))))
(+.f64 (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)))) (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (cos.f64 M) (/.f64 (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (neg.f64 (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)) (/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (sin.f64 M))))
(+.f64 (fma.f64 (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)) (/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)) (/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (neg.f64 (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (neg.f64 (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (sin.f64 M)))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) (sin.f64 M) (*.f64 (/.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (sin.f64 M))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (neg.f64 (*.f64 (/.f64 (sin.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (/.f64 (sin.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (fma.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (neg.f64 (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) (fma.f64 (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(exp.f64 (-.f64 (log.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(exp.f64 (*.f64 (-.f64 (log.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 (-.f64 (log.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (+.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) #s(literal -1 binary64)) (*.f64 (*.f64 m m) #s(literal -1/4 binary64))))
(exp.f64 (+.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) #s(literal -1 binary64)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) #s(literal -1 binary64))))
(exp.f64 (+.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) #s(literal -1 binary64))))
(exp.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) #s(literal -1 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) #s(literal -1 binary64))))
(exp.f64 (neg.f64 (*.f64 (-.f64 (log.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) #s(literal -1 binary64))))
(exp.f64 (-.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) #s(literal -1 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(exp.f64 (-.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) #s(literal -1 binary64)) (*.f64 (log.f64 (exp.f64 (*.f64 m m))) #s(literal 1/4 binary64))))
(exp.f64 (-.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)) (*.f64 (log.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64))))
(exp.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) #s(literal -1 binary64)) (*.f64 (log.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64))))
(-.f64 #s(literal 0 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))))
(-.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (/.f64 (sin.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))))
(-.f64 (/.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) #s(literal 1 binary64)) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (/.f64 (sin.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) #s(literal 1 binary64)))
(fma.f64 (cos.f64 M) (/.f64 (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (neg.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (/.f64 (sin.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))))
(fma.f64 (cos.f64 M) (/.f64 (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (*.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))))
(fma.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (*.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))))
(fma.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (*.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))))
(fma.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (/.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) #s(literal 1 binary64)) (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (/.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))))
(fma.f64 (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)) (/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (neg.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (/.f64 (sin.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))))
(fma.f64 (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)) (/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (*.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))))
(fma.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (/.f64 (sin.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))))
(fma.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (*.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))))
(fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) (*.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) (*.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) #s(literal 1 binary64) (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))))
(fma.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))))
(fma.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))))
(fma.f64 (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))))
(fma.f64 (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)) (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))))
(fma.f64 (*.f64 (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) #s(literal -1 binary64)) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 (*.f64 (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) #s(literal -1 binary64)) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))))
(fma.f64 (/.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) #s(literal 1 binary64)) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 (/.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) #s(literal 1 binary64)) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))))
(fma.f64 (/.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 (/.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))))
(neg.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))))
(/.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) #s(literal 1 binary64))
(/.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) #s(literal -1 binary64))
(/.f64 (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (exp.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))
(/.f64 (/.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(pow.f64 (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) #s(literal 1 binary64))
(pow.f64 (exp.f64 #s(literal -1 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) (log.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))
(*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))))
(*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (/.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) #s(literal 1 binary64)))
(*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (pow.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) #s(literal 1 binary64)))
(*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (pow.f64 (/.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (pow.f64 (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) #s(literal 1 binary64)))
(*.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) #s(literal 1 binary64))
(*.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(*.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) #s(literal -1 binary64))
(*.f64 (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(*.f64 (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) (pow.f64 (/.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(*.f64 (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(*.f64 (*.f64 (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) #s(literal -1 binary64)) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(*.f64 (/.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) #s(literal 1 binary64)) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(*.f64 (/.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (pow.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) #s(literal 1 binary64)) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(*.f64 (pow.f64 (/.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(*.f64 (pow.f64 (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (pow.f64 (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) #s(literal 1 binary64)) (pow.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(*.f64 (pow.f64 (/.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) (log.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(exp.f64 (*.f64 (-.f64 (log.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) (log.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 (-.f64 (log.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(exp.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) (*.f64 (log.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64))))
(exp.f64 (+.f64 (*.f64 (log.f64 (exp.f64 (*.f64 m m))) #s(literal 1/4 binary64)) (*.f64 (log.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64))))
(exp.f64 (+.f64 (*.f64 (log.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(exp.f64 (+.f64 (*.f64 (log.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64)) (*.f64 (log.f64 (exp.f64 (*.f64 m m))) #s(literal 1/4 binary64))))
(exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) #s(literal -1 binary64))))
(exp.f64 (-.f64 (*.f64 (log.f64 (exp.f64 (*.f64 m m))) #s(literal 1/4 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) #s(literal -1 binary64))))
(exp.f64 (-.f64 (*.f64 (log.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64)) (*.f64 (*.f64 m m) #s(literal -1/4 binary64))))
(exp.f64 (-.f64 (*.f64 (log.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) #s(literal -1 binary64))))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(/.f64 (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(pow.f64 (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64))
(pow.f64 (/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) #s(literal -1 binary64))
(pow.f64 (exp.f64 #s(literal -1 binary64)) (-.f64 (log.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(*.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (/.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (pow.f64 (/.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))
(*.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))))))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))))) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))))) (pow.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))))) (pow.f64 (/.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))))) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (pow.f64 (*.f64 (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) #s(literal -1 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(*.f64 (pow.f64 (/.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) #s(literal -1 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (*.f64 m m))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 m)) (*.f64 #s(literal 1/4 binary64) m)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (neg.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))))
(exp.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) #s(literal -1 binary64))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))
(neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) #s(literal -1 binary64))
(pow.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) #s(literal 1 binary64))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 m m))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 (*.f64 m (-.f64 #s(literal 0 binary64) m)) #s(literal -1 binary64)))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 (*.f64 (*.f64 m m) #s(literal -1 binary64)) #s(literal -1 binary64)))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (neg.f64 (*.f64 m (-.f64 #s(literal 0 binary64) m))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (neg.f64 (*.f64 (*.f64 m m) #s(literal -1 binary64))))
(pow.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) m)) m)
(pow.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) m)) (*.f64 (-.f64 #s(literal 0 binary64) m) #s(literal -1 binary64)))
(pow.f64 (exp.f64 (*.f64 m m)) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 m) (*.f64 #s(literal 1/4 binary64) m))
(pow.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (exp.f64 (log.f64 m))) (exp.f64 (log.f64 m)))
(pow.f64 (pow.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) m)) #s(literal 1 binary64)) m)
(pow.f64 (pow.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) m)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) m))
(pow.f64 (exp.f64 (log.f64 (exp.f64 (*.f64 m m)))) #s(literal 1/4 binary64))
(*.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64))))))
(log.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))
(+.f64 (log.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) (log.f64 #s(literal -1 binary64))))
(-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) #s(literal 0 binary64))
(-.f64 #s(literal 0 binary64) (log.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))))
(-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) (log.f64 #s(literal -1 binary64))) (log.f64 #s(literal -1 binary64)))
(neg.f64 (log.f64 (exp.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)))))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(*.f64 #s(literal 1/4 binary64) (log.f64 (exp.f64 (*.f64 m m))))
(*.f64 m (*.f64 #s(literal 1/4 binary64) m))
(*.f64 (*.f64 m m) #s(literal 1/4 binary64))
(*.f64 (*.f64 #s(literal 1/4 binary64) m) m)
(*.f64 (*.f64 #s(literal 1/4 binary64) m) (log.f64 (exp.f64 m)))
(exp.f64 (*.f64 (log.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (neg.f64 (/.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))))) (neg.f64 (/.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))))))
(neg.f64 (neg.f64 (/.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))))))
(neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m))))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(/.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))))
(/.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m))))))
(/.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))))) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(/.f64 (/.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m)))))
(/.f64 (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 (fabs.f64 (-.f64 n m)))) (exp.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n)))))
(/.f64 (/.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 l)) (exp.f64 (-.f64 (*.f64 n (*.f64 #s(literal 1/4 binary64) n)) (fabs.f64 (-.f64 n m)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m))))))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) #s(literal -1 binary64)) (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))))
(pow.f64 (/.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m))))) #s(literal 1 binary64))
(pow.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) #s(literal -1 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m))))))
(*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))))))
(*.f64 (/.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m))))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))))))
(*.f64 (exp.f64 (fabs.f64 (-.f64 n m))) (/.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (pow.f64 (*.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 #s(literal 1/4 binary64) n)) (fabs.f64 (-.f64 n m)))) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (pow.f64 (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 #s(literal 1/4 binary64) n)) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (pow.f64 (/.f64 (exp.f64 (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 (fabs.f64 (-.f64 n m))))) #s(literal -1 binary64)))
(*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))))) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))
(*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))))) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(*.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n)))))) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(*.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) #s(literal -1 binary64)))
(*.f64 (exp.f64 (*.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) #s(literal -1 binary64))) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 (fabs.f64 (-.f64 n m)))))
(*.f64 (exp.f64 (*.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) #s(literal -1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 (fabs.f64 (-.f64 n m))))) #s(literal -1 binary64)))
(*.f64 (exp.f64 (*.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) #s(literal -1 binary64))) (pow.f64 (/.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) #s(literal -1 binary64)))
(*.f64 (/.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))))) (exp.f64 (fabs.f64 (-.f64 n m))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))))))
(*.f64 (/.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 l)) (exp.f64 (neg.f64 (-.f64 (*.f64 n (*.f64 #s(literal 1/4 binary64) n)) (fabs.f64 (-.f64 n m))))))
(*.f64 (/.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) #s(literal 1 binary64)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))))))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n)))))))
(*.f64 (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n)))))) (exp.f64 (fabs.f64 (-.f64 n m))))
(*.f64 (exp.f64 (neg.f64 (*.f64 n (*.f64 #s(literal 1/4 binary64) n)))) (pow.f64 (/.f64 (exp.f64 l) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (exp.f64 (fabs.f64 (-.f64 n m))))) #s(literal -1 binary64)))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (exp.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))))) (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 n m)))))
(*.f64 (/.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 n m)))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) #s(literal -1 binary64)) (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n)))))))
(*.f64 (pow.f64 (/.f64 (exp.f64 l) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) #s(literal -1 binary64)) (exp.f64 (neg.f64 (-.f64 (*.f64 n (*.f64 #s(literal 1/4 binary64) n)) (fabs.f64 (-.f64 n m))))))
(*.f64 (pow.f64 (/.f64 (exp.f64 (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) #s(literal -1 binary64)) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))
(cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))
(*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(*.f64 n (*.f64 K #s(literal -1/2 binary64)))
(*.f64 K (*.f64 n #s(literal -1/2 binary64)))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(*.f64 (*.f64 n K) #s(literal -1/2 binary64))
(*.f64 (*.f64 n #s(literal -1/2 binary64)) K)
(*.f64 K #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) K)
(+.f64 (*.f64 (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m)))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (*.f64 (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m)))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))))
(+.f64 (*.f64 (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m)))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (*.f64 (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m)))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(+.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m))))) (*.f64 (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))) (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m))))))
(+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))) (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m))))) (*.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m))))))
(exp.f64 (*.f64 (log.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))) (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))
(-.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))
(-.f64 (/.f64 (+.f64 (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))
(fma.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m)))) (*.f64 (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))) (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m))))))
(fma.f64 (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))) (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m)))) (*.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m))))))
(fma.f64 (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m)))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m)))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))))
(fma.f64 (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m)))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))) (*.f64 (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m)))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))) (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))) (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (exp.f64 (*.f64 M M)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))))
(/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))
(/.f64 (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m)))) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))))))
(/.f64 (/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (exp.f64 (*.f64 M M))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))
(/.f64 (exp.f64 (*.f64 (*.f64 M M) #s(literal -1 binary64))) (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (exp.f64 (*.f64 M M)))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))
(/.f64 (/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (exp.f64 (*.f64 M M)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (exp.f64 (*.f64 M M)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))
(/.f64 (*.f64 (exp.f64 (*.f64 (*.f64 M M) #s(literal -1 binary64))) (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))
(/.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (exp.f64 (*.f64 M M))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))
(/.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) #s(literal -1 binary64)) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/.f64 (/.f64 (/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (exp.f64 (*.f64 M M))) (exp.f64 l)) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m)))))
(pow.f64 (/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) #s(literal 1 binary64))
(pow.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))) (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (exp.f64 (*.f64 M M)))) #s(literal -1 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))) (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))
(*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m)))))
(*.f64 (/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))
(*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))
(*.f64 (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m)))) (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))))
(*.f64 (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))))))
(*.f64 (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m)))) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) #s(literal -1 binary64)))
(*.f64 (/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (exp.f64 (*.f64 M M))) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))
(*.f64 (exp.f64 (*.f64 (*.f64 M M) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))))))
(*.f64 (exp.f64 (*.f64 (*.f64 M M) #s(literal -1 binary64))) (/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))
(*.f64 (exp.f64 (*.f64 (*.f64 M M) #s(literal -1 binary64))) (pow.f64 (/.f64 (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))))) (exp.f64 (+.f64 (neg.f64 (+.f64 l (*.f64 M M))) (fabs.f64 (-.f64 n m)))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))))) (exp.f64 (*.f64 (*.f64 M M) #s(literal -1 binary64))))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 M M))) (/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))))
(*.f64 (/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (exp.f64 (*.f64 (*.f64 M M) #s(literal -1 binary64))))
(*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (exp.f64 (*.f64 M M))))
(*.f64 (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (pow.f64 (*.f64 (exp.f64 (*.f64 M M)) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))))) #s(literal -1 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 M M)))) (pow.f64 (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) #s(literal -1 binary64)))
(*.f64 (/.f64 (/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (exp.f64 (*.f64 M M))) (exp.f64 l)) (exp.f64 (fabs.f64 (-.f64 n m))))
(*.f64 (/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (exp.f64 (+.f64 l (*.f64 M M)))) (exp.f64 (fabs.f64 (-.f64 n m))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))
(*.f64 (pow.f64 (/.f64 (exp.f64 (*.f64 M M)) #s(literal -1 binary64)) #s(literal -1 binary64)) (pow.f64 (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 M M))) #s(literal -1 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (exp.f64 (*.f64 M M)))) #s(literal -1 binary64)) (exp.f64 (neg.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))))
(+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))))
(+.f64 (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(+.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))))
(+.f64 (*.f64 (sin.f64 M) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (+.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(+.f64 (+.f64 (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(+.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (neg.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))))
(+.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))))
(+.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 M) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))))) (*.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))))
(-.f64 #s(literal 0 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(-.f64 (+.f64 (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 m (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 K #s(literal 1/2 binary64))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))))))
(fma.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))))
(fma.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(fma.f64 K (*.f64 m (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 K (*.f64 (*.f64 m (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) #s(literal 1/2 binary64)) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (cos.f64 M) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))))))
(fma.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (cos.f64 M) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))))
(fma.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (sin.f64 M) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))) (+.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M))) (+.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(fma.f64 (*.f64 m K) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (*.f64 m K) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M))) (+.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(fma.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) #s(literal 1/2 binary64) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(fma.f64 (sin.f64 M) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))) (+.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M)) (*.f64 m (*.f64 K #s(literal 1/2 binary64))) (+.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(fma.f64 (*.f64 m (*.f64 K #s(literal 1/2 binary64))) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (*.f64 m (*.f64 K #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M)) (+.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(fma.f64 (*.f64 K (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (*.f64 m #s(literal 1/2 binary64)) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (cos.f64 (-.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))) M))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64)))))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (cos.f64 (-.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))) M))) #s(literal 1/2 binary64) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))))
(fma.f64 (*.f64 (*.f64 m K) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M))) #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(fma.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 K (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (sin.f64 M) K)) (+.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(fma.f64 (*.f64 K #s(literal 1/2 binary64)) (*.f64 m (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (*.f64 K #s(literal 1/2 binary64)) (*.f64 m (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M))) (+.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(fma.f64 (*.f64 m (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (*.f64 K #s(literal 1/2 binary64)) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (*.f64 m K) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 K #s(literal 1/2 binary64))) m (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M)) #s(literal 1/2 binary64)) (*.f64 m K) (+.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 m (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) K (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m #s(literal 1/2 binary64))) K (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) K (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) m) K (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) K) m (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (*.f64 (*.f64 m (*.f64 K #s(literal 1/2 binary64))) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (sin.f64 M) (+.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(fma.f64 (*.f64 (*.f64 m (*.f64 K #s(literal 1/2 binary64))) (sin.f64 M)) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (+.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M)) (*.f64 m #s(literal 1/2 binary64))) K (+.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M)) (*.f64 K #s(literal 1/2 binary64))) m (+.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(neg.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))))
(*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m (*.f64 K #s(literal 1/2 binary64))))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))))
(+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(+.f64 (fma.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))) M)) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))) M)) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))) M)) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))))
(+.f64 (fma.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (cos.f64 M) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))) M)) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))) M)) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))) M)) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))))
(+.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (cos.f64 (-.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))) M))) #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))) M)) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (-.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))) M)) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))) M)) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))))
(cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))))
(fma.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(fma.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))))
(fma.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))))
(fma.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (cos.f64 M) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(fma.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (cos.f64 M) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))))
(fma.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (cos.f64 M) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))))
(fma.f64 (sin.f64 M) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)) (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (sin.f64 M) (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (cos.f64 (-.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))) M))) #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (cos.f64 (-.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))) M))) #s(literal 1/2 binary64) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (cos.f64 (-.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))) M))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 M)) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (cos.f64 (-.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))) M))) (-.f64 (cos.f64 (-.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))) M)) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (cos.f64 (-.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))) M))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))) M)) (cos.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))) #s(literal 4 binary64))
(+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))
(+.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))) M)
(fma.f64 n (*.f64 K #s(literal -1/2 binary64)) M)
(fma.f64 K (*.f64 n #s(literal -1/2 binary64)) M)
(fma.f64 #s(literal -1/2 binary64) (*.f64 n K) M)
(fma.f64 (*.f64 K #s(literal -1/2 binary64)) n M)
(fma.f64 (*.f64 n K) #s(literal -1/2 binary64) M)
(fma.f64 (*.f64 n #s(literal -1/2 binary64)) K M)
(+.f64 (*.f64 m m) (+.f64 (*.f64 m n) (*.f64 n (+.f64 m n))))
(+.f64 (*.f64 n n) (+.f64 (*.f64 m n) (*.f64 m (+.f64 m n))))
(+.f64 (*.f64 m (+.f64 m n)) (*.f64 n (+.f64 m n)))
(+.f64 (*.f64 n (+.f64 m n)) (*.f64 m (+.f64 m n)))
(+.f64 (*.f64 m n) (+.f64 (*.f64 m m) (*.f64 n (+.f64 m n))))
(+.f64 (*.f64 m n) (+.f64 (*.f64 n n) (*.f64 m (+.f64 m n))))
(+.f64 (+.f64 (*.f64 m (+.f64 m n)) (*.f64 n n)) (*.f64 m n))
(+.f64 (+.f64 (*.f64 m (+.f64 m n)) (*.f64 m n)) (*.f64 n n))
(+.f64 (+.f64 (*.f64 n (+.f64 m n)) (*.f64 m m)) (*.f64 m n))
(+.f64 (+.f64 (*.f64 n (+.f64 m n)) (*.f64 m n)) (*.f64 m m))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (+.f64 m n))))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (+.f64 m n)))) #s(literal 2 binary64)))
(exp.f64 (+.f64 (log.f64 (+.f64 m n)) (log.f64 (+.f64 m n))))
(fma.f64 m m (+.f64 (*.f64 m n) (*.f64 n (+.f64 m n))))
(fma.f64 m n (+.f64 (*.f64 m m) (*.f64 n (+.f64 m n))))
(fma.f64 m n (+.f64 (*.f64 n n) (*.f64 m (+.f64 m n))))
(fma.f64 m (+.f64 m n) (*.f64 n (+.f64 m n)))
(fma.f64 n m (+.f64 (*.f64 m m) (*.f64 n (+.f64 m n))))
(fma.f64 n m (+.f64 (*.f64 n n) (*.f64 m (+.f64 m n))))
(fma.f64 n n (+.f64 (*.f64 m n) (*.f64 m (+.f64 m n))))
(fma.f64 n (+.f64 m n) (*.f64 m (+.f64 m n)))
(fma.f64 (+.f64 m n) m (*.f64 n (+.f64 m n)))
(fma.f64 (+.f64 m n) n (*.f64 m (+.f64 m n)))
(fma.f64 (exp.f64 (log.f64 n)) (exp.f64 (log.f64 n)) (+.f64 (*.f64 m n) (*.f64 m (+.f64 m n))))
(fma.f64 (exp.f64 (log.f64 m)) (exp.f64 (log.f64 m)) (+.f64 (*.f64 m n) (*.f64 n (+.f64 m n))))
(pow.f64 (+.f64 m n) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 m n))) #s(literal 2 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (+.f64 m n)))
(*.f64 (+.f64 m n) (+.f64 m n))
(*.f64 #s(literal 1 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))
(*.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) (+.f64 m n)) #s(literal 2 binary64)))
(*.f64 (exp.f64 (log.f64 (+.f64 m n))) (exp.f64 (log.f64 (+.f64 m n))))
(fabs.f64 (-.f64 n m))
(fabs.f64 (-.f64 m n))
(fabs.f64 (-.f64 (-.f64 n m) #s(literal 0 binary64)))
(fabs.f64 (-.f64 (-.f64 m n) #s(literal 0 binary64)))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))))
(neg.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))))
(*.f64 #s(literal 1 binary64) (fabs.f64 (-.f64 n m)))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m))))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(+.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)))) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(+.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) #s(literal 1 binary64)))
(+.f64 (fma.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)) (cos.f64 M) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(+.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)))) #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (neg.f64 (*.f64 (log.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64))))
(cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(-.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) #s(literal 1 binary64)) (/.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)) (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(fma.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(fma.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(fma.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(fma.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 (sin.f64 M) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))))
(fma.f64 (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)) (cos.f64 M) (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(fma.f64 (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)) (cos.f64 M) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)) (cos.f64 M) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(fma.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M)) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (*.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal 1 binary64)))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (+.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (sin.f64 M) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)))) #s(literal 1/2 binary64) (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)))) #s(literal 1/2 binary64) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 M)) (sin.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))))
(neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)))) (-.f64 (cos.f64 (+.f64 M (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) (cos.f64 (+.f64 M (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) #s(literal 4 binary64))
(pow.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))) #s(literal -1 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))))
(*.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1 binary64)))
(neg.f64 (*.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) K))
(neg.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (+.f64 m n) K) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K)) #s(literal 1 binary64)))
(/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K))))
(/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)) #s(literal 2 binary64))
(/.f64 (neg.f64 K) (/.f64 #s(literal 2 binary64) (+.f64 m n)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K))) #s(literal -2 binary64))
(/.f64 (/.f64 K #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 m n)))
(/.f64 (*.f64 K #s(literal -1 binary64)) (/.f64 #s(literal 2 binary64) (+.f64 m n)))
(/.f64 (*.f64 #s(literal -1 binary64) K) (/.f64 #s(literal 2 binary64) (+.f64 m n)))
(pow.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (+.f64 m n) (*.f64 K #s(literal -1/2 binary64)))
(*.f64 (+.f64 m n) (/.f64 K #s(literal -2 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 m n) K) #s(literal -2 binary64)))
(*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))
(*.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) K)
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 m n) K))
(*.f64 #s(literal -1/2 binary64) (/.f64 K (/.f64 #s(literal 1 binary64) (+.f64 m n))))
(*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 m n) K)) #s(literal -1 binary64)))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) (+.f64 m n))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 m n)) (*.f64 K #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 m n)) (/.f64 K #s(literal 2 binary64)))
(*.f64 (*.f64 (+.f64 m n) K) #s(literal -1/2 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 m n) K)) #s(literal 1/2 binary64))
(*.f64 (/.f64 K #s(literal -2 binary64)) (+.f64 m n))
(*.f64 (/.f64 K #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 m n))))
(*.f64 (/.f64 K #s(literal 1 binary64)) (/.f64 (+.f64 m n) #s(literal -2 binary64)))
(*.f64 (/.f64 K #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 m n)))
(exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m))))
(exp.f64 (*.f64 (log.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n)))))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n)))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m))))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (neg.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))))))
(exp.f64 (neg.f64 (*.f64 (log.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m))))) #s(literal -1 binary64))))
(exp.f64 (neg.f64 (*.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m))) #s(literal -1 binary64))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m))))))
(/.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))))) #s(literal 1 binary64)))
(/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n)))))))
(/.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n)))) (exp.f64 (fabs.f64 (-.f64 n m))))
(/.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n)))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 n m))))))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m))))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))))) (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 n m)))))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 n m))))))
(/.f64 (*.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n)))) #s(literal 1 binary64)) (exp.f64 (fabs.f64 (-.f64 n m))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n)))))) (exp.f64 (fabs.f64 (-.f64 n m))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 n m))))))
(pow.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))) #s(literal 1 binary64))
(pow.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (exp.f64 l) (exp.f64 (-.f64 (*.f64 n (*.f64 #s(literal 1/4 binary64) n)) (fabs.f64 (-.f64 n m)))))
(*.f64 (exp.f64 l) (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 #s(literal 1/4 binary64) n)) (fabs.f64 (-.f64 n m)))) #s(literal 1 binary64)))
(*.f64 (exp.f64 l) (pow.f64 (exp.f64 (neg.f64 (-.f64 (*.f64 n (*.f64 #s(literal 1/4 binary64) n)) (fabs.f64 (-.f64 n m))))) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))))
(*.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m))))))
(*.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n)))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m)))))
(*.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n)))) (/.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m)))) #s(literal 1 binary64)))
(*.f64 (exp.f64 (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))
(*.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 #s(literal 1/4 binary64) n)) (fabs.f64 (-.f64 n m)))) (exp.f64 l))
(*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m)))) (exp.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n)))))
(*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m)))) (pow.f64 (exp.f64 (*.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) #s(literal -1 binary64))) #s(literal -1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 n m))))))
(*.f64 (pow.f64 (exp.f64 (*.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) #s(literal -1 binary64))) #s(literal -1 binary64)) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m)))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 n m))))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 n m))))))
(+.f64 (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M)) (*.f64 (cos.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(+.f64 (*.f64 (cos.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M)))
(sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))
(fma.f64 (cos.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M)))
(fma.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M) (*.f64 (cos.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (sin.f64 M) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(fma.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (cos.f64 M) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M)))
(fma.f64 (+.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 n K))))) #s(literal 1/2 binary64) (*.f64 (cos.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(+.f64 (*.f64 (*.f64 m K) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M))) (*.f64 m (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))))
(+.f64 (*.f64 m (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))) (*.f64 (*.f64 m K) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M))))
(fma.f64 m (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (sin.f64 M) K)) (*.f64 m (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))))
(fma.f64 m (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K)) (*.f64 (*.f64 m K) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M))))
(fma.f64 (cos.f64 M) (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 m K)) (*.f64 (*.f64 m K) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M))))
(fma.f64 K (*.f64 m (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M))) (*.f64 m (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))))
(fma.f64 K (*.f64 m (*.f64 (cos.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) (*.f64 (*.f64 m K) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M))))
(fma.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (sin.f64 M) (*.f64 m K)) (*.f64 m (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))))
(fma.f64 (*.f64 m K) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M)) (*.f64 m (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))))
(fma.f64 (*.f64 m K) (*.f64 (cos.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 (*.f64 m K) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M))))
(fma.f64 (sin.f64 M) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 m K)) (*.f64 m (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))))
(fma.f64 (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M)) (*.f64 m K) (*.f64 m (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))))
(fma.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) (*.f64 m K)) (*.f64 (*.f64 m K) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M))))
(fma.f64 (*.f64 (cos.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m K) (*.f64 (*.f64 m K) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M))))
(fma.f64 (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (sin.f64 M) K)) m (*.f64 m (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))))
(fma.f64 (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K)) m (*.f64 (*.f64 m K) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M))))
(fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M)) m) K (*.f64 m (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))))
(fma.f64 (*.f64 (*.f64 (cos.f64 M) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) m) K (*.f64 (*.f64 m K) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M))))
(fma.f64 (*.f64 (*.f64 m K) (cos.f64 M)) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (*.f64 m K) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M))))
(fma.f64 (*.f64 (*.f64 m K) (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (cos.f64 M) (*.f64 (*.f64 m K) (*.f64 (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (sin.f64 M))))
(fma.f64 (*.f64 (*.f64 m K) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (sin.f64 M) (*.f64 m (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))))
(fma.f64 (*.f64 (*.f64 m K) (sin.f64 M)) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 m (*.f64 (sin.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cos.f64 M) K))))
(*.f64 m (*.f64 K (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(*.f64 K (*.f64 m (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(*.f64 (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64))))) (*.f64 m K))
(*.f64 (*.f64 K (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) m)
(*.f64 (*.f64 m (sin.f64 (+.f64 M (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))) K)

simplify503.0ms (2.8%)

Algorithm
1×egg-herbie
Rules
6116×*-lowering-*.f32
6116×*-lowering-*.f64
4000×+-lowering-+.f64
4000×+-lowering-+.f32
1356×distribute-lft-in
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0141216372
1482815060
0858015060
Stop Event
1×iter limit
1×node limit
Counts
840 → 840
Calls
Call 1
Inputs
(- (fabs (- n m)) (* 1/4 (pow (+ m n) 2)))
(- (+ (fabs (- n m)) (* -1 l)) (* 1/4 (pow (+ m n) 2)))
(- (+ (fabs (- n m)) (* -1 l)) (* 1/4 (pow (+ m n) 2)))
(- (+ (fabs (- n m)) (* -1 l)) (* 1/4 (pow (+ m n) 2)))
(* -1 l)
(* l (- (/ (fabs (- n m)) l) (+ 1 (* 1/4 (/ (pow (+ m n) 2) l)))))
(* l (- (/ (fabs (- n m)) l) (+ 1 (* 1/4 (/ (pow (+ m n) 2) l)))))
(* l (- (/ (fabs (- n m)) l) (+ 1 (* 1/4 (/ (pow (+ m n) 2) l)))))
(* -1 l)
(* -1 (* l (+ 1 (* -1 (/ (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2))) l)))))
(* -1 (* l (+ 1 (* -1 (/ (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2))) l)))))
(* -1 (* l (+ 1 (* -1 (/ (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2))) l)))))
(- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))
(- (+ (fabs (- n m)) (* -1/2 (* m n))) (+ l (* 1/4 (pow n 2))))
(- (+ (fabs (- n m)) (* m (- (* -1/4 m) (* 1/2 n)))) (+ l (* 1/4 (pow n 2))))
(- (+ (fabs (- n m)) (* m (- (* -1/4 m) (* 1/2 n)))) (+ l (* 1/4 (pow n 2))))
(* -1/4 (pow m 2))
(* (pow m 2) (- (* -1/2 (/ n m)) 1/4))
(* (pow m 2) (- (/ (fabs (- n m)) (pow m 2)) (+ 1/4 (+ (* 1/4 (/ (pow n 2) (pow m 2))) (+ (* 1/2 (/ n m)) (/ l (pow m 2)))))))
(* (pow m 2) (- (/ (fabs (- n m)) (pow m 2)) (+ 1/4 (+ (* 1/4 (/ (pow n 2) (pow m 2))) (+ (* 1/2 (/ n m)) (/ l (pow m 2)))))))
(* -1/4 (pow m 2))
(* (pow m 2) (- (* -1/2 (/ n m)) 1/4))
(* (pow m 2) (- (* -1 (/ (- (* -1 (/ (- (fabs (+ n (* -1 m))) (+ l (* 1/4 (pow n 2)))) m)) (* -1/2 n)) m)) 1/4))
(* (pow m 2) (- (* -1 (/ (- (* -1 (/ (- (fabs (+ n (* -1 m))) (+ l (* 1/4 (pow n 2)))) m)) (* -1/2 n)) m)) 1/4))
(- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))
(- (+ (fabs (- n m)) (* -1/2 (* m n))) (+ l (* 1/4 (pow m 2))))
(- (+ (fabs (- n m)) (* n (- (* -1/4 n) (* 1/2 m)))) (+ l (* 1/4 (pow m 2))))
(- (+ (fabs (- n m)) (* n (- (* -1/4 n) (* 1/2 m)))) (+ l (* 1/4 (pow m 2))))
(* -1/4 (pow n 2))
(* (pow n 2) (- (* -1/2 (/ m n)) 1/4))
(* (pow n 2) (- (/ (fabs (- n m)) (pow n 2)) (+ 1/4 (+ (* 1/4 (/ (pow m 2) (pow n 2))) (+ (* 1/2 (/ m n)) (/ l (pow n 2)))))))
(* (pow n 2) (- (/ (fabs (- n m)) (pow n 2)) (+ 1/4 (+ (* 1/4 (/ (pow m 2) (pow n 2))) (+ (* 1/2 (/ m n)) (/ l (pow n 2)))))))
(* -1/4 (pow n 2))
(* (pow n 2) (- (* -1/2 (/ m n)) 1/4))
(* (pow n 2) (- (* -1 (/ (- (* -1 (/ (- (fabs (neg (+ m (* -1 n)))) (+ l (* 1/4 (pow m 2)))) n)) (* -1/2 m)) n)) 1/4))
(* (pow n 2) (- (* -1 (/ (- (* -1 (/ (- (fabs (neg (+ m (* -1 n)))) (+ l (* 1/4 (pow m 2)))) n)) (* -1/2 m)) n)) 1/4))
(exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2))))
(+ (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2)))) (* -1 (* l (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2)))))))
(+ (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2)))) (* l (+ (* -1 (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2))))) (* 1/2 (* l (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2)))))))))
(+ (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2)))) (* l (+ (* -1 (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2))))) (* l (+ (* -1/6 (* l (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2)))))) (* 1/2 (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2))))))))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp (- (+ (fabs (- n m)) (* -1 l)) (* 1/4 (pow (+ m n) 2))))
(exp (- (+ (fabs (- n m)) (* -1 l)) (* 1/4 (pow (+ m n) 2))))
(exp (- (+ (fabs (- n m)) (* -1 l)) (* 1/4 (pow (+ m n) 2))))
(exp (- (+ (fabs (- n m)) (* -1 l)) (* 1/4 (pow (+ m n) 2))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2)))))
(+ (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))) (* -1/2 (* m (* n (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2)))))))))
(+ (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))) (* m (+ (* -1/2 (* n (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))))) (* m (* (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))) (- (* 1/8 (pow n 2)) 1/4))))))
(+ (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))) (* m (+ (* -1/2 (* n (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))))) (* m (+ (* m (* (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))) (+ (* -1/48 (pow n 3)) (* 1/8 n)))) (* (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))) (- (* 1/8 (pow n 2)) 1/4)))))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp (- (fabs (+ n (* -1 m))) (+ l (* 1/4 (pow (- n (* -1 m)) 2)))))
(exp (- (fabs (+ n (* -1 m))) (+ l (* 1/4 (pow (- n (* -1 m)) 2)))))
(exp (- (fabs (+ n (* -1 m))) (+ l (* 1/4 (pow (- n (* -1 m)) 2)))))
(exp (- (fabs (+ n (* -1 m))) (+ l (* 1/4 (pow (- n (* -1 m)) 2)))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2)))))
(+ (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))) (* -1/2 (* m (* n (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2)))))))))
(+ (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))) (* n (+ (* -1/2 (* m (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))))) (* n (* (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))) (- (* 1/8 (pow m 2)) 1/4))))))
(+ (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))) (* n (+ (* -1/2 (* m (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))))) (* n (+ (* n (* (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))) (+ (* -1/48 (pow m 3)) (* 1/8 m)))) (* (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))) (- (* 1/8 (pow m 2)) 1/4)))))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp (- (fabs (neg (+ m (* -1 n)))) (+ l (* 1/4 (pow (- m (* -1 n)) 2)))))
(exp (- (fabs (neg (+ m (* -1 n)))) (+ l (* 1/4 (pow (- m (* -1 n)) 2)))))
(exp (- (fabs (neg (+ m (* -1 n)))) (+ l (* 1/4 (pow (- m (* -1 n)) 2)))))
(exp (- (fabs (neg (+ m (* -1 n)))) (+ l (* 1/4 (pow (- m (* -1 n)) 2)))))
(- (* 1/4 (pow (+ m n) 2)) (fabs (- n m)))
(- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- n m)))
(- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- n m)))
(- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- n m)))
l
(* l (- (+ 1 (* 1/4 (/ (pow (+ m n) 2) l))) (/ (fabs (- n m)) l)))
(* l (- (+ 1 (* 1/4 (/ (pow (+ m n) 2) l))) (/ (fabs (- n m)) l)))
(* l (- (+ 1 (* 1/4 (/ (pow (+ m n) 2) l))) (/ (fabs (- n m)) l)))
l
(* -1 (* l (- (* -1 (/ (- (* 1/4 (pow (+ m n) 2)) (fabs (- n m))) l)) 1)))
(* -1 (* l (- (* -1 (/ (- (* 1/4 (pow (+ m n) 2)) (fabs (- n m))) l)) 1)))
(* -1 (* l (- (* -1 (/ (- (* 1/4 (pow (+ m n) 2)) (fabs (- n m))) l)) 1)))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(- (+ l (+ (* 1/4 (pow n 2)) (* 1/2 (* m n)))) (fabs (- n m)))
(- (+ l (+ (* 1/4 (pow n 2)) (* m (+ (* 1/4 m) (* 1/2 n))))) (fabs (- n m)))
(- (+ l (+ (* 1/4 (pow n 2)) (* m (+ (* 1/4 m) (* 1/2 n))))) (fabs (- n m)))
(* 1/4 (pow m 2))
(* (pow m 2) (+ 1/4 (* 1/2 (/ n m))))
(* (pow m 2) (- (+ 1/4 (+ (* 1/4 (/ (pow n 2) (pow m 2))) (+ (* 1/2 (/ n m)) (/ l (pow m 2))))) (/ (fabs (- n m)) (pow m 2))))
(* (pow m 2) (- (+ 1/4 (+ (* 1/4 (/ (pow n 2) (pow m 2))) (+ (* 1/2 (/ n m)) (/ l (pow m 2))))) (/ (fabs (- n m)) (pow m 2))))
(* 1/4 (pow m 2))
(* (pow m 2) (+ 1/4 (* 1/2 (/ n m))))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))) m)) (* -1/2 n)) m))))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))) m)) (* -1/2 n)) m))))
(- (+ l (* 1/4 (pow m 2))) (fabs (- n m)))
(- (+ l (+ (* 1/4 (pow m 2)) (* 1/2 (* m n)))) (fabs (- n m)))
(- (+ l (+ (* 1/4 (pow m 2)) (* n (+ (* 1/4 n) (* 1/2 m))))) (fabs (- n m)))
(- (+ l (+ (* 1/4 (pow m 2)) (* n (+ (* 1/4 n) (* 1/2 m))))) (fabs (- n m)))
(* 1/4 (pow n 2))
(* (pow n 2) (+ 1/4 (* 1/2 (/ m n))))
(* (pow n 2) (- (+ 1/4 (+ (* 1/4 (/ (pow m 2) (pow n 2))) (+ (* 1/2 (/ m n)) (/ l (pow n 2))))) (/ (fabs (- n m)) (pow n 2))))
(* (pow n 2) (- (+ 1/4 (+ (* 1/4 (/ (pow m 2) (pow n 2))) (+ (* 1/2 (/ m n)) (/ l (pow n 2))))) (/ (fabs (- n m)) (pow n 2))))
(* 1/4 (pow n 2))
(* (pow n 2) (+ 1/4 (* 1/2 (/ m n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (+ l (* 1/4 (pow m 2))) (fabs (neg (+ m (* -1 n))))) n)) (* -1/2 m)) n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (+ l (* 1/4 (pow m 2))) (fabs (neg (+ m (* -1 n))))) n)) (* -1/2 m)) n))))
(- (* 1/4 (pow n 2)) (fabs (- n m)))
(- (+ (* 1/4 (pow n 2)) (* 1/2 (* m n))) (fabs (- n m)))
(- (+ (* 1/4 (pow n 2)) (* m (+ (* 1/4 m) (* 1/2 n)))) (fabs (- n m)))
(- (+ (* 1/4 (pow n 2)) (* m (+ (* 1/4 m) (* 1/2 n)))) (fabs (- n m)))
(* 1/4 (pow m 2))
(* (pow m 2) (+ 1/4 (* 1/2 (/ n m))))
(* (pow m 2) (- (+ 1/4 (+ (* 1/4 (/ (pow n 2) (pow m 2))) (* 1/2 (/ n m)))) (/ (fabs (- n m)) (pow m 2))))
(* (pow m 2) (- (+ 1/4 (+ (* 1/4 (/ (pow n 2) (pow m 2))) (* 1/2 (/ n m)))) (/ (fabs (- n m)) (pow m 2))))
(* 1/4 (pow m 2))
(* (pow m 2) (+ 1/4 (* 1/2 (/ n m))))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (* 1/4 (pow n 2)) (fabs (+ n (* -1 m)))) m)) (* -1/2 n)) m))))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (* 1/4 (pow n 2)) (fabs (+ n (* -1 m)))) m)) (* -1/2 n)) m))))
(- (* 1/4 (pow m 2)) (fabs (- n m)))
(- (+ (* 1/4 (pow m 2)) (* 1/2 (* m n))) (fabs (- n m)))
(- (+ (* 1/4 (pow m 2)) (* n (+ (* 1/4 n) (* 1/2 m)))) (fabs (- n m)))
(- (+ (* 1/4 (pow m 2)) (* n (+ (* 1/4 n) (* 1/2 m)))) (fabs (- n m)))
(* 1/4 (pow n 2))
(* (pow n 2) (+ 1/4 (* 1/2 (/ m n))))
(* (pow n 2) (- (+ 1/4 (+ (* 1/4 (/ (pow m 2) (pow n 2))) (* 1/2 (/ m n)))) (/ (fabs (- n m)) (pow n 2))))
(* (pow n 2) (- (+ 1/4 (+ (* 1/4 (/ (pow m 2) (pow n 2))) (* 1/2 (/ m n)))) (/ (fabs (- n m)) (pow n 2))))
(* 1/4 (pow n 2))
(* (pow n 2) (+ 1/4 (* 1/2 (/ m n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (* 1/4 (pow m 2)) (fabs (neg (+ m (* -1 n))))) n)) (* -1/2 m)) n))))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (* 1/4 (pow m 2)) (fabs (neg (+ m (* -1 n))))) n)) (* -1/2 m)) n))))
(/ 1 (exp l))
(+ (* -1/2 (/ (pow M 2) (exp l))) (/ 1 (exp l)))
(+ (* (pow M 2) (- (* 1/24 (/ (pow M 2) (exp l))) (* 1/2 (/ 1 (exp l))))) (/ 1 (exp l)))
(+ (* (pow M 2) (- (* (pow M 2) (+ (* -1/720 (/ (pow M 2) (exp l))) (* 1/24 (/ 1 (exp l))))) (* 1/2 (/ 1 (exp l))))) (/ 1 (exp l)))
(/ (cos M) (exp l))
(/ (cos M) (exp l))
(/ (cos M) (exp l))
(/ (cos M) (exp l))
(/ (cos M) (exp l))
(/ (cos M) (exp l))
(/ (cos M) (exp l))
(/ (cos M) (exp l))
(cos M)
(+ (cos M) (* -1 (* l (cos M))))
(+ (cos M) (* l (- (* -1 (* l (+ (* -1 (cos M)) (* 1/2 (cos M))))) (cos M))))
(+ (cos M) (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (cos M)) (* 1/2 (cos M)))) (+ (* -1/2 (cos M)) (* 1/6 (cos M)))))) (+ (* -1 (cos M)) (* 1/2 (cos M))))) (cos M))))
(/ (cos M) (exp l))
(/ (cos M) (exp l))
(/ (cos M) (exp l))
(/ (cos M) (exp l))
(/ (cos M) (exp l))
(/ (cos M) (exp l))
(/ (cos M) (exp l))
(/ (cos M) (exp l))
1
(+ 1 (* -1/2 (pow M 2)))
(+ 1 (* (pow M 2) (- (* 1/24 (pow M 2)) 1/2)))
(+ 1 (* (pow M 2) (- (* (pow M 2) (+ 1/24 (* -1/720 (pow M 2)))) 1/2)))
(cos M)
(cos M)
(cos M)
(cos M)
(cos M)
(cos M)
(cos M)
(cos M)
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)
(cos (+ M (* -1/2 (* K n))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (+ (* 1/2 (* K (sin (+ M (* -1/2 (* K n)))))) (* m (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* 1/4 (cos (+ M (* -1/2 (* K n))))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (+ (* 1/2 (* K (sin (+ M (* -1/2 (* K n)))))) (* m (- (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* m (- (* -1/48 (* (pow K 3) (sin (+ M (* -1/2 (* K n)))))) (* 1/8 (* K (sin (+ M (* -1/2 (* K n))))))))) (* 1/4 (cos (+ M (* -1/2 (* K n))))))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (* 1/4 (pow m 2))))
(/ (cos (* -1/2 (* K (+ m n)))) (exp (* 1/4 (pow m 2))))
(+ (* -1 (/ (* M (sin (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (* 1/4 (pow m 2)))))
(+ (* M (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (* 1/4 (pow m 2))))) (* -1/2 (/ (* M (cos (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (* 1/4 (pow m 2)))))
(+ (* M (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (* 1/4 (pow m 2))))) (* M (+ (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (* 1/4 (pow m 2))))) (* 1/6 (/ (* M (sin (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (* 1/4 (pow m 2)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (* 1/4 (pow m 2))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (* 1/4 (pow m 2))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (* 1/4 (pow m 2))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (* 1/4 (pow m 2))))
(/ (cos M) (exp (* 1/4 (pow m 2))))
(+ (* 1/2 (/ (* K (* (sin M) (+ m n))) (exp (* 1/4 (pow m 2))))) (/ (cos M) (exp (* 1/4 (pow m 2)))))
(+ (* K (+ (* -1/8 (/ (* K (* (cos M) (pow (+ m n) 2))) (exp (* 1/4 (pow m 2))))) (* 1/2 (/ (* (sin M) (+ m n)) (exp (* 1/4 (pow m 2))))))) (/ (cos M) (exp (* 1/4 (pow m 2)))))
(+ (* K (+ (* 1/2 (/ (* (sin M) (+ m n)) (exp (* 1/4 (pow m 2))))) (* K (+ (* -1/8 (/ (* (cos M) (pow (+ m n) 2)) (exp (* 1/4 (pow m 2))))) (* -1/48 (/ (* K (* (sin M) (pow (+ m n) 3))) (exp (* 1/4 (pow m 2))))))))) (/ (cos M) (exp (* 1/4 (pow m 2)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K m)))) (exp (* 1/4 (pow m 2))))
(+ (* 1/2 (/ (* K (* n (sin (+ M (* -1/2 (* K m)))))) (exp (* 1/4 (pow m 2))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (* 1/4 (pow m 2)))))
(+ (* n (+ (* -1/8 (/ (* (pow K 2) (* n (cos (+ M (* -1/2 (* K m)))))) (exp (* 1/4 (pow m 2))))) (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (* 1/4 (pow m 2))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (* 1/4 (pow m 2)))))
(+ (* n (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (* 1/4 (pow m 2))))) (* n (+ (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (* 1/4 (pow m 2))))) (* -1/48 (/ (* (pow K 3) (* n (sin (+ M (* -1/2 (* K m)))))) (exp (* 1/4 (pow m 2))))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (* 1/4 (pow m 2)))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (* 1/4 (pow m 2))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (* 1/4 (pow m 2))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(+ (* -1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))) (/ 1 (cos (+ M (* -1/2 (* K n))))))
(+ (* m (- (* m (- (* 1/4 (/ 1 (cos (+ M (* -1/2 (* K n)))))) (+ (* -1/4 (/ (* (pow K 2) (pow (sin (+ M (* -1/2 (* K n)))) 2)) (pow (cos (+ M (* -1/2 (* K n)))) 3))) (* -1/8 (/ (pow K 2) (cos (+ M (* -1/2 (* K n))))))))) (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))))) (/ 1 (cos (+ M (* -1/2 (* K n))))))
(+ (* m (- (* m (- (+ (* -1 (* m (+ (* -1/48 (/ (* (pow K 3) (sin (+ M (* -1/2 (* K n))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))) (+ (* 1/16 (/ (* (pow K 3) (sin (+ M (* -1/2 (* K n))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K n)))) (- (* 1/4 (/ 1 (cos (+ M (* -1/2 (* K n)))))) (+ (* -1/4 (/ (* (pow K 2) (pow (sin (+ M (* -1/2 (* K n)))) 2)) (pow (cos (+ M (* -1/2 (* K n)))) 3))) (* -1/8 (/ (pow K 2) (cos (+ M (* -1/2 (* K n)))))))))) (cos (+ M (* -1/2 (* K n)))))))))) (* 1/4 (/ 1 (cos (+ M (* -1/2 (* K n))))))) (+ (* -1/4 (/ (* (pow K 2) (pow (sin (+ M (* -1/2 (* K n)))) 2)) (pow (cos (+ M (* -1/2 (* K n)))) 3))) (* -1/8 (/ (pow K 2) (cos (+ M (* -1/2 (* K n))))))))) (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))))) (/ 1 (cos (+ M (* -1/2 (* K n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))
(/ (exp (* 1/4 (pow m 2))) (cos (* -1/2 (* K (+ m n)))))
(+ (/ (exp (* 1/4 (pow m 2))) (cos (* -1/2 (* K (+ m n))))) (/ (* M (* (exp (* 1/4 (pow m 2))) (sin (* -1/2 (* K (+ m n)))))) (pow (cos (* -1/2 (* K (+ m n)))) 2)))
(+ (* M (- (* -1 (* M (+ (* -1 (/ (* (exp (* 1/4 (pow m 2))) (pow (sin (* -1/2 (* K (+ m n)))) 2)) (pow (cos (* -1/2 (* K (+ m n)))) 3))) (* -1/2 (/ (exp (* 1/4 (pow m 2))) (cos (* -1/2 (* K (+ m n))))))))) (* -1 (/ (* (exp (* 1/4 (pow m 2))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (/ (exp (* 1/4 (pow m 2))) (cos (* -1/2 (* K (+ m n))))))
(+ (* M (- (* M (- (* -1 (* M (+ (* -1/2 (/ (* (exp (* 1/4 (pow m 2))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))) (+ (* 1/6 (/ (* (exp (* 1/4 (pow m 2))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))) (/ (* (sin (* -1/2 (* K (+ m n)))) (+ (* -1 (/ (* (exp (* 1/4 (pow m 2))) (pow (sin (* -1/2 (* K (+ m n)))) 2)) (pow (cos (* -1/2 (* K (+ m n)))) 3))) (* -1/2 (/ (exp (* 1/4 (pow m 2))) (cos (* -1/2 (* K (+ m n)))))))) (cos (* -1/2 (* K (+ m n))))))))) (+ (* -1 (/ (* (exp (* 1/4 (pow m 2))) (pow (sin (* -1/2 (* K (+ m n)))) 2)) (pow (cos (* -1/2 (* K (+ m n)))) 3))) (* -1/2 (/ (exp (* 1/4 (pow m 2))) (cos (* -1/2 (* K (+ m n))))))))) (* -1 (/ (* (exp (* 1/4 (pow m 2))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (/ (exp (* 1/4 (pow m 2))) (cos (* -1/2 (* K (+ m n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))
(/ (exp (* 1/4 (pow m 2))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))
(/ (exp (* 1/4 (pow m 2))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))
(/ (exp (* 1/4 (pow m 2))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))
(/ (exp (* 1/4 (pow m 2))) (cos M))
(+ (* -1/2 (/ (* K (* (exp (* 1/4 (pow m 2))) (* (sin M) (+ m n)))) (pow (cos M) 2))) (/ (exp (* 1/4 (pow m 2))) (cos M)))
(+ (* K (- (* -1 (* K (+ (* -1/4 (/ (* (exp (* 1/4 (pow m 2))) (* (pow (sin M) 2) (pow (+ m n) 2))) (pow (cos M) 3))) (* -1/8 (/ (* (exp (* 1/4 (pow m 2))) (pow (+ m n) 2)) (cos M)))))) (* 1/2 (/ (* (exp (* 1/4 (pow m 2))) (* (sin M) (+ m n))) (pow (cos M) 2))))) (/ (exp (* 1/4 (pow m 2))) (cos M)))
(+ (* K (- (* K (- (* -1 (* K (+ (* -1/2 (/ (* (sin M) (* (+ m n) (+ (* -1/4 (/ (* (exp (* 1/4 (pow m 2))) (* (pow (sin M) 2) (pow (+ m n) 2))) (pow (cos M) 3))) (* -1/8 (/ (* (exp (* 1/4 (pow m 2))) (pow (+ m n) 2)) (cos M)))))) (cos M))) (+ (* -1/48 (/ (* (exp (* 1/4 (pow m 2))) (* (sin M) (pow (+ m n) 3))) (pow (cos M) 2))) (* 1/16 (/ (* (exp (* 1/4 (pow m 2))) (* (sin M) (pow (+ m n) 3))) (pow (cos M) 2))))))) (+ (* -1/4 (/ (* (exp (* 1/4 (pow m 2))) (* (pow (sin M) 2) (pow (+ m n) 2))) (pow (cos M) 3))) (* -1/8 (/ (* (exp (* 1/4 (pow m 2))) (pow (+ m n) 2)) (cos M)))))) (* 1/2 (/ (* (exp (* 1/4 (pow m 2))) (* (sin M) (+ m n))) (pow (cos M) 2))))) (/ (exp (* 1/4 (pow m 2))) (cos M)))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K m)))))
(+ (* -1/2 (/ (* K (* n (* (exp (* 1/4 (pow m 2))) (sin (+ M (* -1/2 (* K m))))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))) (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K m))))))
(+ (* n (- (* -1 (* n (+ (* -1/4 (/ (* (pow K 2) (* (exp (* 1/4 (pow m 2))) (pow (sin (+ M (* -1/2 (* K m)))) 2))) (pow (cos (+ M (* -1/2 (* K m)))) 3))) (* -1/8 (/ (* (pow K 2) (exp (* 1/4 (pow m 2)))) (cos (+ M (* -1/2 (* K m))))))))) (* 1/2 (/ (* K (* (exp (* 1/4 (pow m 2))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))))) (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K m))))))
(+ (* n (- (* n (- (* -1 (* n (+ (* -1/2 (/ (* K (* (sin (+ M (* -1/2 (* K m)))) (+ (* -1/4 (/ (* (pow K 2) (* (exp (* 1/4 (pow m 2))) (pow (sin (+ M (* -1/2 (* K m)))) 2))) (pow (cos (+ M (* -1/2 (* K m)))) 3))) (* -1/8 (/ (* (pow K 2) (exp (* 1/4 (pow m 2)))) (cos (+ M (* -1/2 (* K m))))))))) (cos (+ M (* -1/2 (* K m)))))) (+ (* -1/48 (/ (* (pow K 3) (* (exp (* 1/4 (pow m 2))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))) (* 1/16 (/ (* (pow K 3) (* (exp (* 1/4 (pow m 2))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))))))) (+ (* -1/4 (/ (* (pow K 2) (* (exp (* 1/4 (pow m 2))) (pow (sin (+ M (* -1/2 (* K m)))) 2))) (pow (cos (+ M (* -1/2 (* K m)))) 3))) (* -1/8 (/ (* (pow K 2) (exp (* 1/4 (pow m 2)))) (cos (+ M (* -1/2 (* K m))))))))) (* 1/2 (/ (* K (* (exp (* 1/4 (pow m 2))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))))) (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K m))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))
1
(+ 1 (* 1/4 (pow m 2)))
(+ 1 (* (pow m 2) (+ 1/4 (* 1/32 (pow m 2)))))
(+ 1 (* (pow m 2) (+ 1/4 (* (pow m 2) (+ 1/32 (* 1/384 (pow m 2)))))))
(exp (* 1/4 (pow m 2)))
(exp (* 1/4 (pow m 2)))
(exp (* 1/4 (pow m 2)))
(exp (* 1/4 (pow m 2)))
(exp (* 1/4 (pow m 2)))
(exp (* 1/4 (pow m 2)))
(exp (* 1/4 (pow m 2)))
(exp (* 1/4 (pow m 2)))
(* 1/4 (pow m 2))
(* 1/4 (pow m 2))
(* 1/4 (pow m 2))
(* 1/4 (pow m 2))
(* 1/4 (pow m 2))
(* 1/4 (pow m 2))
(* 1/4 (pow m 2))
(* 1/4 (pow m 2))
(* 1/4 (pow m 2))
(* 1/4 (pow m 2))
(* 1/4 (pow m 2))
(* 1/4 (pow m 2))
(/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(+ (* -1/8 (/ (* (pow K 2) (pow n 2)) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))
(+ (* (pow K 2) (+ (* -1/8 (/ (pow n 2) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/384 (/ (* (pow K 2) (pow n 4)) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))) (/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))
(+ (* (pow K 2) (+ (* -1/8 (/ (pow n 2) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* (pow K 2) (+ (* -1/46080 (/ (* (pow K 2) (pow n 6)) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/384 (/ (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))))) (/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ 1 (exp (- l (fabs (- n m)))))
(+ (* (pow n 2) (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (/ 1 (exp (- l (fabs (- n m))))))
(+ (* (pow n 2) (- (+ (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* (pow n 2) (- (* 1/384 (/ (pow K 4) (exp (- l (fabs (- n m)))))) (+ (* 1/32 (/ 1 (exp (- l (fabs (- n m)))))) (* 1/4 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (/ 1 (exp (- l (fabs (- n m))))))
(+ (* (pow n 2) (- (+ (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* (pow n 2) (- (+ (* 1/384 (/ (pow K 4) (exp (- l (fabs (- n m)))))) (* (pow n 2) (- (* -1/46080 (/ (pow K 6) (exp (- l (fabs (- n m)))))) (+ (* 1/384 (/ 1 (exp (- l (fabs (- n m)))))) (+ (* 1/32 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (* 1/4 (- (* 1/384 (/ (pow K 4) (exp (- l (fabs (- n m)))))) (+ (* 1/32 (/ 1 (exp (- l (fabs (- n m)))))) (* 1/4 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))))))))))) (+ (* 1/32 (/ 1 (exp (- l (fabs (- n m)))))) (* 1/4 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (/ 1 (exp (- l (fabs (- n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))
(/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))
(+ (* -1 (/ (* l (cos (* -1/2 (* K n)))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))
(+ (* l (- (* -1 (* l (+ (* -1 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))
(+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))))) (+ (* -1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/6 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))))))) (+ (* -1 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))
(/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))
(/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))
(/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))
1
(+ 1 (* -1/8 (* (pow K 2) (pow n 2))))
(+ 1 (* (pow K 2) (+ (* -1/8 (pow n 2)) (* 1/384 (* (pow K 2) (pow n 4))))))
(+ 1 (* (pow K 2) (+ (* -1/8 (pow n 2)) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (pow n 6))) (* 1/384 (pow n 4)))))))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
1
(+ 1 (* -1/8 (* (pow K 2) (pow n 2))))
(+ 1 (* (pow n 2) (+ (* -1/8 (pow K 2)) (* 1/384 (* (pow K 4) (pow n 2))))))
(+ 1 (* (pow n 2) (+ (* -1/8 (pow K 2)) (* (pow n 2) (+ (* -1/46080 (* (pow K 6) (pow n 2))) (* 1/384 (pow K 4)))))))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -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)
(/ (+ (cos (* -1/2 (* K n))) (* 1/2 (* K (* m (sin (* -1/2 (* K n))))))) (exp (- l (fabs (- m n)))))
(+ (* 1/2 (/ (* K (* m (sin (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (+ (* M (- (* 1/2 (/ (* K (* m (cos (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (/ (sin (* -1/2 (* K n))) (exp (- l (fabs (- m n))))))) (/ (cos (* -1/2 (* K n))) (exp (- l (fabs (- m n)))))))
(+ (* 1/2 (/ (* K (* m (sin (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (+ (* M (- (+ (* 1/2 (/ (* K (* m (cos (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (* M (- (+ (* -1/2 (/ (cos (* -1/2 (* K n))) (exp (- l (fabs (- m n)))))) (* -1/4 (/ (* K (* m (sin (* -1/2 (* K n))))) (exp (- l (fabs (- m n))))))) (+ (* 1/2 (/ (* K (* m (sin (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (/ (cos (* -1/2 (* K n))) (exp (- l (fabs (- m n))))))))) (/ (sin (* -1/2 (* K n))) (exp (- l (fabs (- m n))))))) (/ (cos (* -1/2 (* K n))) (exp (- l (fabs (- m n)))))))
(+ (* 1/2 (/ (* K (* m (sin (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (+ (* M (- (+ (* 1/2 (/ (* K (* m (cos (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (* M (- (+ (* -1/2 (/ (cos (* -1/2 (* K n))) (exp (- l (fabs (- m n)))))) (+ (* -1/4 (/ (* K (* m (sin (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (* M (- (+ (* -1/12 (/ (* K (* m (cos (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (/ (sin (* -1/2 (* K n))) (exp (- l (fabs (- m n)))))) (+ (* -1/6 (/ (sin (* -1/2 (* K n))) (exp (- l (fabs (- m n)))))) (* 1/2 (/ (* K (* m (cos (* -1/2 (* K n))))) (exp (- l (fabs (- m n))))))))))) (+ (* 1/2 (/ (* K (* m (sin (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (/ (cos (* -1/2 (* K n))) (exp (- l (fabs (- m n))))))))) (/ (sin (* -1/2 (* K n))) (exp (- l (fabs (- m n))))))) (/ (cos (* -1/2 (* K n))) (exp (- l (fabs (- m n)))))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(+ (* K (- (* 1/2 (/ (* m (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* -1/2 (/ (* n (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+ (* K (- (+ (* 1/2 (/ (* m (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* K (+ (* -1/4 (/ (* m (* n (cos M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* -1/8 (/ (* (pow n 2) (cos M)) (exp (- (+ l (pow M 2)) (fabs (- m n))))))))) (* -1/2 (/ (* n (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+ (* K (- (+ (* 1/2 (/ (* m (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* K (+ (* -1/4 (/ (* m (* n (cos M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (+ (* -1/8 (/ (* (pow n 2) (cos M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* K (- (* -1/16 (/ (* m (* (pow n 2) (sin M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* 1/48 (/ (* (pow n 3) (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))))) (* -1/2 (/ (* n (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(* K (+ (* 1/2 (/ (* m (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (* K (exp (- (+ l (pow M 2)) (fabs (- m n))))))))
(* K (+ (* 1/2 (/ (* m (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (* K (exp (- (+ l (pow M 2)) (fabs (- m n))))))))
(* K (+ (* 1/2 (/ (* m (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (* K (exp (- (+ l (pow M 2)) (fabs (- m n))))))))
(* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(* -1 (* K (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (* K (exp (- (+ l (pow M 2)) (fabs (- m n))))))) (* -1/2 (/ (* m (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))
(* -1 (* K (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (* K (exp (- (+ l (pow M 2)) (fabs (- m n))))))) (* -1/2 (/ (* m (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))
(* -1 (* K (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (* K (exp (- (+ l (pow M 2)) (fabs (- m n))))))) (* -1/2 (/ (* m (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))
(/ (+ (cos M) (* 1/2 (* K (* m (sin M))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(+ (* 1/2 (/ (* K (* m (sin M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (+ (* n (- (* -1/4 (/ (* (pow K 2) (* m (cos M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* -1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))
(+ (* 1/2 (/ (* K (* m (sin M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (+ (* n (- (+ (* -1/4 (/ (* (pow K 2) (* m (cos M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* n (+ (* -1/8 (/ (* (pow K 2) (cos M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* -1/16 (/ (* (pow K 3) (* m (sin M))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))))) (* -1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))
(+ (* 1/2 (/ (* K (* m (sin M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (+ (* n (- (+ (* -1/4 (/ (* (pow K 2) (* m (cos M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* n (+ (* -1/8 (/ (* (pow K 2) (cos M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (+ (* -1/16 (/ (* (pow K 3) (* m (sin M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* n (- (* 1/96 (/ (* (pow K 4) (* m (cos M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* 1/48 (/ (* (pow K 3) (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))))) (* -1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(* m (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (* m (exp (- (+ l (pow M 2)) (fabs (- m n))))))))
(* m (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (* m (exp (- (+ l (pow M 2)) (fabs (- m n))))))))
(* m (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (* m (exp (- (+ l (pow M 2)) (fabs (- m n))))))))
(* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))))
(* -1 (* m (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (* m (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))))) (* -1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m)))))))))))
(* -1 (* m (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (* m (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))))) (* -1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m)))))))))))
(* -1 (* m (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (* m (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))))) (* -1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m)))))))))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (fabs (- m n)))))
(+ (* -1 (* l (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n)))))))) (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n)))))))
(+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (+ (* l (- (* -1 (* l (+ (* -1 (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n))))))) (* 1/2 (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (fabs (- m n))))))))) (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n)))))))
(+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n))))))) (* 1/2 (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (fabs (- m n)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n))))))) (* 1/6 (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (fabs (- m n)))))))))) (+ (* -1 (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n))))))) (* 1/2 (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (fabs (- m n))))))))) (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n)))))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))
(+ (cos (* -1/2 (* K n))) (* 1/2 (* K (* m (sin (* -1/2 (* K n)))))))
(+ (cos (* -1/2 (* K n))) (+ (* 1/2 (* K (* m (sin (* -1/2 (* K n)))))) (* M (- (* 1/2 (* K (* m (cos (* -1/2 (* K n)))))) (sin (* -1/2 (* K n)))))))
(+ (cos (* -1/2 (* K n))) (+ (* 1/2 (* K (* m (sin (* -1/2 (* K n)))))) (* M (- (+ (* 1/2 (* K (* m (cos (* -1/2 (* K n)))))) (* M (+ (* -1/2 (cos (* -1/2 (* K n)))) (* -1/4 (* K (* m (sin (* -1/2 (* K n))))))))) (sin (* -1/2 (* K n)))))))
(+ (cos (* -1/2 (* K n))) (+ (* 1/2 (* K (* m (sin (* -1/2 (* K n)))))) (* M (- (+ (* 1/2 (* K (* m (cos (* -1/2 (* K n)))))) (* M (+ (* -1/2 (cos (* -1/2 (* K n)))) (+ (* -1/4 (* K (* m (sin (* -1/2 (* K n)))))) (* M (- (* -1/12 (* K (* m (cos (* -1/2 (* K n)))))) (* -1/6 (sin (* -1/2 (* K n)))))))))) (sin (* -1/2 (* K n)))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))))
(+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))))
(+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))))
(+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))))
(cos M)
(+ (cos M) (* K (- (* 1/2 (* m (sin M))) (* -1/2 (* n (sin M))))))
(+ (cos M) (* K (- (+ (* 1/2 (* m (sin M))) (* K (+ (* -1/4 (* m (* n (cos M)))) (* -1/8 (* (pow n 2) (cos M)))))) (* -1/2 (* n (sin M))))))
(+ (cos M) (* K (- (+ (* 1/2 (* m (sin M))) (* K (+ (* -1/4 (* m (* n (cos M)))) (+ (* -1/8 (* (pow n 2) (cos M))) (* K (- (* -1/16 (* m (* (pow n 2) (sin M)))) (* 1/48 (* (pow n 3) (sin M))))))))) (* -1/2 (* n (sin M))))))
(* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))
(* K (+ (* 1/2 (* m (sin (+ M (* -1/2 (* K n)))))) (/ (cos (+ M (* -1/2 (* K n)))) K)))
(* K (+ (* 1/2 (* m (sin (+ M (* -1/2 (* K n)))))) (/ (cos (+ M (* -1/2 (* K n)))) K)))
(* K (+ (* 1/2 (* m (sin (+ M (* -1/2 (* K n)))))) (/ (cos (+ M (* -1/2 (* K n)))) K)))
(* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))
(* -1 (* K (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) K)) (* -1/2 (* m (sin (+ M (* -1/2 (* K n)))))))))
(* -1 (* K (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) K)) (* -1/2 (* m (sin (+ M (* -1/2 (* K n)))))))))
(* -1 (* K (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) K)) (* -1/2 (* m (sin (+ M (* -1/2 (* K n)))))))))
(+ (cos M) (* 1/2 (* K (* m (sin M)))))
(+ (cos M) (+ (* 1/2 (* K (* m (sin M)))) (* n (- (* -1/4 (* (pow K 2) (* m (cos M)))) (* -1/2 (* K (sin M)))))))
(+ (cos M) (+ (* 1/2 (* K (* m (sin M)))) (* n (- (+ (* -1/4 (* (pow K 2) (* m (cos M)))) (* n (+ (* -1/8 (* (pow K 2) (cos M))) (* -1/16 (* (pow K 3) (* m (sin M))))))) (* -1/2 (* K (sin M)))))))
(+ (cos M) (+ (* 1/2 (* K (* m (sin M)))) (* n (- (+ (* -1/4 (* (pow K 2) (* m (cos M)))) (* n (+ (* -1/8 (* (pow K 2) (cos M))) (+ (* -1/16 (* (pow K 3) (* m (sin M)))) (* n (- (* 1/96 (* (pow K 4) (* m (cos M)))) (* 1/48 (* (pow K 3) (sin M))))))))) (* -1/2 (* K (sin M)))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(cos (+ M (* -1/2 (* K n))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))
(* m (+ (* 1/2 (* K (sin (+ M (* -1/2 (* K n)))))) (/ (cos (+ M (* -1/2 (* K n)))) m)))
(* m (+ (* 1/2 (* K (sin (+ M (* -1/2 (* K n)))))) (/ (cos (+ M (* -1/2 (* K n)))) m)))
(* m (+ (* 1/2 (* K (sin (+ M (* -1/2 (* K n)))))) (/ (cos (+ M (* -1/2 (* K n)))) m)))
(* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))
(* -1 (* m (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) m)) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(* -1 (* m (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) m)) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(* -1 (* m (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) m)) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(cos (* -1/2 (* K n)))
(+ (cos (* -1/2 (* K n))) (* -1 (* M (sin (* -1/2 (* K n))))))
(+ (cos (* -1/2 (* K n))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K n))))) (sin (* -1/2 (* K n))))))
(+ (cos (* -1/2 (* K n))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K n)))) (* 1/6 (* M (sin (* -1/2 (* K n))))))) (sin (* -1/2 (* K n))))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos M)
(+ (cos M) (* 1/2 (* K (* n (sin M)))))
(+ (cos M) (* K (- (* -1/8 (* K (* (pow n 2) (cos M)))) (* -1/2 (* n (sin M))))))
(+ (cos M) (* K (- (* K (+ (* -1/8 (* (pow n 2) (cos M))) (* -1/48 (* K (* (pow n 3) (sin M)))))) (* -1/2 (* n (sin M))))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos M)
(+ (cos M) (* 1/2 (* K (* n (sin M)))))
(+ (cos M) (* n (- (* -1/8 (* (pow K 2) (* n (cos M)))) (* -1/2 (* K (sin M))))))
(+ (cos M) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos M))) (* -1/48 (* (pow K 3) (* n (sin M)))))) (* -1/2 (* K (sin M))))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(* -1/2 (* K n))
(+ M (* -1/2 (* K n)))
(+ M (* -1/2 (* K n)))
(+ M (* -1/2 (* K n)))
M
(* M (+ 1 (* -1/2 (/ (* K n) M))))
(* M (+ 1 (* -1/2 (/ (* K n) M))))
(* M (+ 1 (* -1/2 (/ (* K n) M))))
M
(* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))
(* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))
(* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))
M
(+ M (* -1/2 (* K n)))
(+ M (* -1/2 (* K n)))
(+ M (* -1/2 (* K n)))
(* -1/2 (* K n))
(* K (+ (* -1/2 n) (/ M K)))
(* K (+ (* -1/2 n) (/ M K)))
(* K (+ (* -1/2 n) (/ M K)))
(* -1/2 (* K n))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))
M
(+ M (* -1/2 (* K n)))
(+ M (* -1/2 (* K n)))
(+ M (* -1/2 (* K n)))
(* -1/2 (* K n))
(* n (+ (* -1/2 K) (/ M n)))
(* n (+ (* -1/2 K) (/ M n)))
(* n (+ (* -1/2 K) (/ M n)))
(* -1/2 (* K n))
(* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))
(* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))
(* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))
(pow n 2)
(+ (* 2 (* m n)) (pow n 2))
(+ (* m (+ m (* 2 n))) (pow n 2))
(+ (* m (+ m (* 2 n))) (pow n 2))
(pow m 2)
(* (pow m 2) (+ 1 (* 2 (/ n m))))
(* (pow m 2) (+ 1 (+ (* 2 (/ n m)) (/ (pow n 2) (pow m 2)))))
(* (pow m 2) (+ 1 (+ (* 2 (/ n m)) (/ (pow n 2) (pow m 2)))))
(pow m 2)
(* (pow m 2) (+ 1 (* 2 (/ n m))))
(* (pow m 2) (+ 1 (* -1 (/ (+ (* -2 n) (* -1 (/ (pow n 2) m))) m))))
(* (pow m 2) (+ 1 (* -1 (/ (+ (* -2 n) (* -1 (/ (pow n 2) m))) m))))
(pow m 2)
(+ (* 2 (* m n)) (pow m 2))
(+ (* n (+ n (* 2 m))) (pow m 2))
(+ (* n (+ n (* 2 m))) (pow m 2))
(pow n 2)
(* (pow n 2) (+ 1 (* 2 (/ m n))))
(* (pow n 2) (+ 1 (+ (* 2 (/ m n)) (/ (pow m 2) (pow n 2)))))
(* (pow n 2) (+ 1 (+ (* 2 (/ m n)) (/ (pow m 2) (pow n 2)))))
(pow n 2)
(* (pow n 2) (+ 1 (* 2 (/ m n))))
(* (pow n 2) (+ 1 (* -1 (/ (+ (* -2 m) (* -1 (/ (pow m 2) n))) n))))
(* (pow n 2) (+ 1 (* -1 (/ (+ (* -2 m) (* -1 (/ (pow m 2) n))) n))))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (neg (+ m (* -1 n))))
(fabs (neg (+ m (* -1 n))))
(fabs (neg (+ m (* -1 n))))
(fabs (neg (+ m (* -1 n))))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (+ n (* -1 m)))
(fabs (+ n (* -1 m)))
(fabs (+ n (* -1 m)))
(fabs (+ n (* -1 m)))
(cos (* -1/2 (* K (+ m n))))
(+ (cos (* -1/2 (* K (+ m n)))) (* -1 (* M (sin (* -1/2 (* K (+ m n)))))))
(+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K (+ m n)))))) (sin (* -1/2 (* K (+ m n)))))))
(+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* 1/6 (* M (sin (* -1/2 (* K (+ m n)))))))) (sin (* -1/2 (* K (+ m n)))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos M)
(+ (cos M) (* 1/2 (* K (* (sin M) (+ m n)))))
(+ (cos M) (* K (- (* -1/8 (* K (* (cos M) (pow (+ m n) 2)))) (* -1/2 (* (sin M) (+ m n))))))
(+ (cos M) (* K (- (* K (+ (* -1/8 (* (cos M) (pow (+ m n) 2))) (* -1/48 (* K (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K n))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* -1/8 (* (pow K 2) (* m (cos (+ M (* -1/2 (* K n))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/48 (* (pow K 3) (* m (sin (+ M (* -1/2 (* K n))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos (+ M (* -1/2 (* K m))))
(+ (cos (+ M (* -1/2 (* K m)))) (* 1/2 (* K (* n (sin (+ M (* -1/2 (* K m))))))))
(+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* -1/8 (* (pow K 2) (* n (cos (+ M (* -1/2 (* K m))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))
(+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/48 (* (pow K 3) (* n (sin (+ M (* -1/2 (* K m))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K (+ m n)))
(* -1/2 (* K n))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(* -1/2 (* K m))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(* -1/2 (* K m))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(* -1/2 (* K m))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(* -1/2 (* K n))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(* -1/2 (* K n))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(exp (- (* 1/4 (pow n 2)) (fabs (- n m))))
(+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))
(+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* 1/2 (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))))))
(+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (+ (* 1/6 (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))
(exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))
(exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))
(exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))
(exp (- l (fabs (- n m))))
(+ (exp (- l (fabs (- n m)))) (* 1/4 (* (pow n 2) (exp (- l (fabs (- n m)))))))
(+ (exp (- l (fabs (- n m)))) (* (pow n 2) (+ (* 1/32 (* (pow n 2) (exp (- l (fabs (- n m)))))) (* 1/4 (exp (- l (fabs (- n m))))))))
(+ (exp (- l (fabs (- n m)))) (* (pow n 2) (+ (* 1/4 (exp (- l (fabs (- n m))))) (* (pow n 2) (+ (* 1/384 (* (pow n 2) (exp (- l (fabs (- n m)))))) (* 1/32 (exp (- l (fabs (- n m))))))))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))
(sin (* -1/2 (* K n)))
(+ (sin (* -1/2 (* K n))) (* M (cos (* -1/2 (* K n)))))
(+ (sin (* -1/2 (* K n))) (* M (+ (cos (* -1/2 (* K n))) (* -1/2 (* M (sin (* -1/2 (* K n))))))))
(+ (sin (* -1/2 (* K n))) (* M (+ (cos (* -1/2 (* K n))) (* M (+ (* -1/2 (sin (* -1/2 (* K n)))) (* -1/6 (* M (cos (* -1/2 (* K n))))))))))
(sin (+ M (* -1/2 (* K n))))
(sin (+ M (* -1/2 (* K n))))
(sin (+ M (* -1/2 (* K n))))
(sin (+ M (* -1/2 (* K n))))
(sin (- (* -1/2 (* K n)) (* -1 M)))
(sin (- (* -1/2 (* K n)) (* -1 M)))
(sin (- (* -1/2 (* K n)) (* -1 M)))
(sin (- (* -1/2 (* K n)) (* -1 M)))
(sin M)
(+ (sin M) (* -1/2 (* K (* n (cos M)))))
(+ (sin M) (* K (+ (* -1/2 (* n (cos M))) (* -1/8 (* K (* (pow n 2) (sin M)))))))
(+ (sin M) (* K (+ (* -1/2 (* n (cos M))) (* K (+ (* -1/8 (* (pow n 2) (sin M))) (* 1/48 (* K (* (pow n 3) (cos M)))))))))
(sin (+ M (* -1/2 (* K n))))
(sin (+ M (* -1/2 (* K n))))
(sin (+ M (* -1/2 (* K n))))
(sin (+ M (* -1/2 (* K n))))
(sin (+ M (* -1/2 (* K n))))
(sin (+ M (* -1/2 (* K n))))
(sin (+ M (* -1/2 (* K n))))
(sin (+ M (* -1/2 (* K n))))
(sin M)
(+ (sin M) (* -1/2 (* K (* n (cos M)))))
(+ (sin M) (* n (+ (* -1/2 (* K (cos M))) (* -1/8 (* (pow K 2) (* n (sin M)))))))
(+ (sin M) (* n (+ (* -1/2 (* K (cos M))) (* n (+ (* -1/8 (* (pow K 2) (sin M))) (* 1/48 (* (pow K 3) (* n (cos M)))))))))
(sin (+ M (* -1/2 (* K n))))
(sin (+ M (* -1/2 (* K n))))
(sin (+ M (* -1/2 (* K n))))
(sin (+ M (* -1/2 (* K n))))
(sin (+ M (* -1/2 (* K n))))
(sin (+ M (* -1/2 (* K n))))
(sin (+ M (* -1/2 (* K n))))
(sin (+ M (* -1/2 (* K n))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin M)))
(* K (+ (* -1/2 (* K (* m (* n (cos M))))) (* m (sin M))))
(* K (+ (* K (+ (* -1/2 (* m (* n (cos M)))) (* -1/8 (* K (* m (* (pow n 2) (sin M))))))) (* m (sin M))))
(* K (+ (* K (+ (* -1/2 (* m (* n (cos M)))) (* K (+ (* -1/8 (* m (* (pow n 2) (sin M)))) (* 1/48 (* K (* m (* (pow n 3) (cos M))))))))) (* m (sin M))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (* -1/2 (* K n)))))
(+ (* K (* M (* m (cos (* -1/2 (* K n)))))) (* K (* m (sin (* -1/2 (* K n))))))
(+ (* K (* m (sin (* -1/2 (* K n))))) (* M (+ (* -1/2 (* K (* M (* m (sin (* -1/2 (* K n))))))) (* K (* m (cos (* -1/2 (* K n))))))))
(+ (* K (* m (sin (* -1/2 (* K n))))) (* M (+ (* K (* m (cos (* -1/2 (* K n))))) (* M (+ (* -1/2 (* K (* m (sin (* -1/2 (* K n)))))) (* -1/6 (* K (* M (* m (cos (* -1/2 (* K n))))))))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))
(* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))
(* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))
(* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))
(* K (* m (sin M)))
(+ (* -1/2 (* (pow K 2) (* m (* n (cos M))))) (* K (* m (sin M))))
(+ (* K (* m (sin M))) (* n (+ (* -1/2 (* (pow K 2) (* m (cos M)))) (* -1/8 (* (pow K 3) (* m (* n (sin M))))))))
(+ (* K (* m (sin M))) (* n (+ (* -1/2 (* (pow K 2) (* m (cos M)))) (* n (+ (* -1/8 (* (pow K 3) (* m (sin M)))) (* 1/48 (* (pow K 4) (* m (* n (cos M))))))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
Outputs
(- (fabs (- n m)) (* 1/4 (pow (+ m n) 2)))
(+.f64 (fabs.f64 (-.f64 n m)) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))
(- (+ (fabs (- n m)) (* -1 l)) (* 1/4 (pow (+ m n) 2)))
(+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))
(- (+ (fabs (- n m)) (* -1 l)) (* 1/4 (pow (+ m n) 2)))
(+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))
(- (+ (fabs (- n m)) (* -1 l)) (* 1/4 (pow (+ m n) 2)))
(+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))
(* -1 l)
(-.f64 #s(literal 0 binary64) l)
(* l (- (/ (fabs (- n m)) l) (+ 1 (* 1/4 (/ (pow (+ m n) 2) l)))))
(*.f64 l (+.f64 (+.f64 (/.f64 (fabs.f64 (-.f64 n m)) l) #s(literal -1 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 n m) (+.f64 n m)) l))))
(* l (- (/ (fabs (- n m)) l) (+ 1 (* 1/4 (/ (pow (+ m n) 2) l)))))
(*.f64 l (+.f64 (+.f64 (/.f64 (fabs.f64 (-.f64 n m)) l) #s(literal -1 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 n m) (+.f64 n m)) l))))
(* l (- (/ (fabs (- n m)) l) (+ 1 (* 1/4 (/ (pow (+ m n) 2) l)))))
(*.f64 l (+.f64 (+.f64 (/.f64 (fabs.f64 (-.f64 n m)) l) #s(literal -1 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 n m) (+.f64 n m)) l))))
(* -1 l)
(-.f64 #s(literal 0 binary64) l)
(* -1 (* l (+ 1 (* -1 (/ (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2))) l)))))
(*.f64 (-.f64 #s(literal 0 binary64) l) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 n m)) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))) l)))
(* -1 (* l (+ 1 (* -1 (/ (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2))) l)))))
(*.f64 (-.f64 #s(literal 0 binary64) l) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 n m)) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))) l)))
(* -1 (* l (+ 1 (* -1 (/ (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2))) l)))))
(*.f64 (-.f64 #s(literal 0 binary64) l) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 n m)) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))) l)))
(- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))
(-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n)))
(- (+ (fabs (- n m)) (* -1/2 (* m n))) (+ l (* 1/4 (pow n 2))))
(-.f64 (+.f64 (fabs.f64 (-.f64 n m)) (*.f64 #s(literal -1/2 binary64) (*.f64 n m))) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))
(- (+ (fabs (- n m)) (* m (- (* -1/4 m) (* 1/2 n)))) (+ l (* 1/4 (pow n 2))))
(+.f64 (fabs.f64 (-.f64 n m)) (-.f64 (*.f64 m (+.f64 (*.f64 m #s(literal -1/4 binary64)) (*.f64 n #s(literal -1/2 binary64)))) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n)))))
(- (+ (fabs (- n m)) (* m (- (* -1/4 m) (* 1/2 n)))) (+ l (* 1/4 (pow n 2))))
(+.f64 (fabs.f64 (-.f64 n m)) (-.f64 (*.f64 m (+.f64 (*.f64 m #s(literal -1/4 binary64)) (*.f64 n #s(literal -1/2 binary64)))) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n)))))
(* -1/4 (pow m 2))
(*.f64 #s(literal -1/4 binary64) (*.f64 m m))
(* (pow m 2) (- (* -1/2 (/ n m)) 1/4))
(*.f64 (*.f64 m m) (+.f64 (/.f64 (*.f64 n #s(literal -1/2 binary64)) m) #s(literal -1/4 binary64)))
(* (pow m 2) (- (/ (fabs (- n m)) (pow m 2)) (+ 1/4 (+ (* 1/4 (/ (pow n 2) (pow m 2))) (+ (* 1/2 (/ n m)) (/ l (pow m 2)))))))
(*.f64 (*.f64 m m) (-.f64 (+.f64 (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 m m)) #s(literal -1/4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (*.f64 m m)) (+.f64 (/.f64 (*.f64 n #s(literal 1/2 binary64)) m) (/.f64 l (*.f64 m m))))))
(* (pow m 2) (- (/ (fabs (- n m)) (pow m 2)) (+ 1/4 (+ (* 1/4 (/ (pow n 2) (pow m 2))) (+ (* 1/2 (/ n m)) (/ l (pow m 2)))))))
(*.f64 (*.f64 m m) (-.f64 (+.f64 (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 m m)) #s(literal -1/4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (*.f64 m m)) (+.f64 (/.f64 (*.f64 n #s(literal 1/2 binary64)) m) (/.f64 l (*.f64 m m))))))
(* -1/4 (pow m 2))
(*.f64 #s(literal -1/4 binary64) (*.f64 m m))
(* (pow m 2) (- (* -1/2 (/ n m)) 1/4))
(*.f64 (*.f64 m m) (+.f64 (/.f64 (*.f64 n #s(literal -1/2 binary64)) m) #s(literal -1/4 binary64)))
(* (pow m 2) (- (* -1 (/ (- (* -1 (/ (- (fabs (+ n (* -1 m))) (+ l (* 1/4 (pow n 2)))) m)) (* -1/2 n)) m)) 1/4))
(*.f64 (*.f64 m m) (+.f64 (/.f64 (+.f64 (/.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (-.f64 #s(literal 0 binary64) m)) (*.f64 n #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) m)) #s(literal -1/4 binary64)))
(* (pow m 2) (- (* -1 (/ (- (* -1 (/ (- (fabs (+ n (* -1 m))) (+ l (* 1/4 (pow n 2)))) m)) (* -1/2 n)) m)) 1/4))
(*.f64 (*.f64 m m) (+.f64 (/.f64 (+.f64 (/.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (-.f64 #s(literal 0 binary64) m)) (*.f64 n #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) m)) #s(literal -1/4 binary64)))
(- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))
(-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(- (+ (fabs (- n m)) (* -1/2 (* m n))) (+ l (* 1/4 (pow m 2))))
(-.f64 (+.f64 (fabs.f64 (-.f64 n m)) (*.f64 #s(literal -1/2 binary64) (*.f64 n m))) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(- (+ (fabs (- n m)) (* n (- (* -1/4 n) (* 1/2 m)))) (+ l (* 1/4 (pow m 2))))
(+.f64 (fabs.f64 (-.f64 n m)) (-.f64 (*.f64 n (+.f64 (*.f64 n #s(literal -1/4 binary64)) (*.f64 m #s(literal -1/2 binary64)))) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))
(- (+ (fabs (- n m)) (* n (- (* -1/4 n) (* 1/2 m)))) (+ l (* 1/4 (pow m 2))))
(+.f64 (fabs.f64 (-.f64 n m)) (-.f64 (*.f64 n (+.f64 (*.f64 n #s(literal -1/4 binary64)) (*.f64 m #s(literal -1/2 binary64)))) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))
(* -1/4 (pow n 2))
(*.f64 (*.f64 n n) #s(literal -1/4 binary64))
(* (pow n 2) (- (* -1/2 (/ m n)) 1/4))
(*.f64 (*.f64 n n) (+.f64 (/.f64 (*.f64 m #s(literal -1/2 binary64)) n) #s(literal -1/4 binary64)))
(* (pow n 2) (- (/ (fabs (- n m)) (pow n 2)) (+ 1/4 (+ (* 1/4 (/ (pow m 2) (pow n 2))) (+ (* 1/2 (/ m n)) (/ l (pow n 2)))))))
(*.f64 (*.f64 n n) (-.f64 (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 n n)) (+.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 (/.f64 (*.f64 m m) n) (/.f64 #s(literal 1/4 binary64) n)) (+.f64 (/.f64 (*.f64 m #s(literal 1/2 binary64)) n) (/.f64 l (*.f64 n n)))))))
(* (pow n 2) (- (/ (fabs (- n m)) (pow n 2)) (+ 1/4 (+ (* 1/4 (/ (pow m 2) (pow n 2))) (+ (* 1/2 (/ m n)) (/ l (pow n 2)))))))
(*.f64 (*.f64 n n) (-.f64 (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 n n)) (+.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 (/.f64 (*.f64 m m) n) (/.f64 #s(literal 1/4 binary64) n)) (+.f64 (/.f64 (*.f64 m #s(literal 1/2 binary64)) n) (/.f64 l (*.f64 n n)))))))
(* -1/4 (pow n 2))
(*.f64 (*.f64 n n) #s(literal -1/4 binary64))
(* (pow n 2) (- (* -1/2 (/ m n)) 1/4))
(*.f64 (*.f64 n n) (+.f64 (/.f64 (*.f64 m #s(literal -1/2 binary64)) n) #s(literal -1/4 binary64)))
(* (pow n 2) (- (* -1 (/ (- (* -1 (/ (- (fabs (neg (+ m (* -1 n)))) (+ l (* 1/4 (pow m 2)))) n)) (* -1/2 m)) n)) 1/4))
(*.f64 (*.f64 n n) (+.f64 (/.f64 (+.f64 (/.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (-.f64 #s(literal 0 binary64) n)) (*.f64 m #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) n)) #s(literal -1/4 binary64)))
(* (pow n 2) (- (* -1 (/ (- (* -1 (/ (- (fabs (neg (+ m (* -1 n)))) (+ l (* 1/4 (pow m 2)))) n)) (* -1/2 m)) n)) 1/4))
(*.f64 (*.f64 n n) (+.f64 (/.f64 (+.f64 (/.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (-.f64 #s(literal 0 binary64) n)) (*.f64 m #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) n)) #s(literal -1/4 binary64)))
(exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2))))
(exp.f64 (+.f64 (fabs.f64 (-.f64 n m)) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(+ (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2)))) (* -1 (* l (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2)))))))
(-.f64 (exp.f64 (+.f64 (fabs.f64 (-.f64 n m)) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))) (*.f64 l (exp.f64 (+.f64 (fabs.f64 (-.f64 n m)) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))))
(+ (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2)))) (* l (+ (* -1 (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2))))) (* 1/2 (* l (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2)))))))))
(+.f64 (exp.f64 (+.f64 (fabs.f64 (-.f64 n m)) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))) (*.f64 l (-.f64 (*.f64 (*.f64 l #s(literal 1/2 binary64)) (exp.f64 (+.f64 (fabs.f64 (-.f64 n m)) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))) (exp.f64 (+.f64 (fabs.f64 (-.f64 n m)) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))))))
(+ (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2)))) (* l (+ (* -1 (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2))))) (* l (+ (* -1/6 (* l (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2)))))) (* 1/2 (exp (- (fabs (- n m)) (* 1/4 (pow (+ m n) 2))))))))))
(+.f64 (exp.f64 (+.f64 (fabs.f64 (-.f64 n m)) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))) (*.f64 l (-.f64 (*.f64 l (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) l) (exp.f64 (+.f64 (fabs.f64 (-.f64 n m)) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (+.f64 (fabs.f64 (-.f64 n m)) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))))) (exp.f64 (+.f64 (fabs.f64 (-.f64 n m)) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64)))))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (+ (fabs (- n m)) (* -1 l)) (* 1/4 (pow (+ m n) 2))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (+ (fabs (- n m)) (* -1 l)) (* 1/4 (pow (+ m n) 2))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (+ (fabs (- n m)) (* -1 l)) (* 1/4 (pow (+ m n) 2))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (+ (fabs (- n m)) (* -1 l)) (* 1/4 (pow (+ m n) 2))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2)))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))
(+ (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))) (* -1/2 (* m (* n (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2)))))))))
(+.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 n m) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n)))))))
(+ (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))) (* m (+ (* -1/2 (* n (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))))) (* m (* (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))) (- (* 1/8 (pow n 2)) 1/4))))))
(+.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n)))) (*.f64 m (+.f64 (*.f64 (*.f64 n #s(literal -1/2 binary64)) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))) (*.f64 m (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n)))) (+.f64 (*.f64 (*.f64 n n) #s(literal 1/8 binary64)) #s(literal -1/4 binary64)))))))
(+ (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))) (* m (+ (* -1/2 (* n (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))))) (* m (+ (* m (* (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))) (+ (* -1/48 (pow n 3)) (* 1/8 n)))) (* (exp (- (fabs (- n m)) (+ l (* 1/4 (pow n 2))))) (- (* 1/8 (pow n 2)) 1/4)))))))
(+.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n)))) (*.f64 m (+.f64 (*.f64 (*.f64 n #s(literal -1/2 binary64)) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))) (*.f64 m (+.f64 (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n)))) (+.f64 (*.f64 (*.f64 n n) #s(literal 1/8 binary64)) #s(literal -1/4 binary64))) (*.f64 m (*.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 n (*.f64 n n))) (*.f64 n #s(literal 1/8 binary64))))))))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (fabs (+ n (* -1 m))) (+ l (* 1/4 (pow (- n (* -1 m)) 2)))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (fabs (+ n (* -1 m))) (+ l (* 1/4 (pow (- n (* -1 m)) 2)))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (fabs (+ n (* -1 m))) (+ l (* 1/4 (pow (- n (* -1 m)) 2)))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (fabs (+ n (* -1 m))) (+ l (* 1/4 (pow (- n (* -1 m)) 2)))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2)))))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))
(+ (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))) (* -1/2 (* m (* n (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2)))))))))
(+.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 n m) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))))))
(+ (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))) (* n (+ (* -1/2 (* m (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))))) (* n (* (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))) (- (* 1/8 (pow m 2)) 1/4))))))
(+.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) (*.f64 n (+.f64 (*.f64 (*.f64 m #s(literal -1/2 binary64)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))) (*.f64 n (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) (+.f64 (*.f64 (*.f64 m m) #s(literal 1/8 binary64)) #s(literal -1/4 binary64)))))))
(+ (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))) (* n (+ (* -1/2 (* m (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))))) (* n (+ (* n (* (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))) (+ (* -1/48 (pow m 3)) (* 1/8 m)))) (* (exp (- (fabs (- n m)) (+ l (* 1/4 (pow m 2))))) (- (* 1/8 (pow m 2)) 1/4)))))))
(+.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) (*.f64 n (+.f64 (*.f64 (*.f64 m #s(literal -1/2 binary64)) (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))) (*.f64 n (+.f64 (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) (+.f64 (*.f64 (*.f64 m m) #s(literal 1/8 binary64)) #s(literal -1/4 binary64))) (*.f64 n (*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 m (*.f64 m m))) (*.f64 m #s(literal 1/8 binary64))))))))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (fabs (- n m)) (+ l (* 1/4 (pow (+ m n) 2)))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (fabs (neg (+ m (* -1 n)))) (+ l (* 1/4 (pow (- m (* -1 n)) 2)))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (fabs (neg (+ m (* -1 n)))) (+ l (* 1/4 (pow (- m (* -1 n)) 2)))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (fabs (neg (+ m (* -1 n)))) (+ l (* 1/4 (pow (- m (* -1 n)) 2)))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(exp (- (fabs (neg (+ m (* -1 n)))) (+ l (* 1/4 (pow (- m (* -1 n)) 2)))))
(exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) #s(literal -1/4 binary64))))
(- (* 1/4 (pow (+ m n) 2)) (fabs (- n m)))
(-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m)))
(- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- n m)))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))))
(- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- n m)))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))))
(- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- n m)))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))))
l
(* l (- (+ 1 (* 1/4 (/ (pow (+ m n) 2) l))) (/ (fabs (- n m)) l)))
(*.f64 l (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))) l)))
(* l (- (+ 1 (* 1/4 (/ (pow (+ m n) 2) l))) (/ (fabs (- n m)) l)))
(*.f64 l (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))) l)))
(* l (- (+ 1 (* 1/4 (/ (pow (+ m n) 2) l))) (/ (fabs (- n m)) l)))
(*.f64 l (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))) l)))
l
(* -1 (* l (- (* -1 (/ (- (* 1/4 (pow (+ m n) 2)) (fabs (- n m))) l)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) l) (+.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))) (-.f64 #s(literal 0 binary64) l)) #s(literal -1 binary64)))
(* -1 (* l (- (* -1 (/ (- (* 1/4 (pow (+ m n) 2)) (fabs (- n m))) l)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) l) (+.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))) (-.f64 #s(literal 0 binary64) l)) #s(literal -1 binary64)))
(* -1 (* l (- (* -1 (/ (- (* 1/4 (pow (+ m n) 2)) (fabs (- n m))) l)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) l) (+.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 n m) (+.f64 n m))) (fabs.f64 (-.f64 n m))) (-.f64 #s(literal 0 binary64) l)) #s(literal -1 binary64)))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))
(- (+ l (+ (* 1/4 (pow n 2)) (* 1/2 (* m n)))) (fabs (- n m)))
(-.f64 (+.f64 l (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (*.f64 (*.f64 n m) #s(literal 1/2 binary64)))) (fabs.f64 (-.f64 n m)))
(- (+ l (+ (* 1/4 (pow n 2)) (* m (+ (* 1/4 m) (* 1/2 n))))) (fabs (- n m)))
(-.f64 (+.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (*.f64 m (+.f64 (*.f64 n #s(literal 1/2 binary64)) (*.f64 m #s(literal 1/4 binary64))))) (fabs.f64 (-.f64 n m)))
(- (+ l (+ (* 1/4 (pow n 2)) (* m (+ (* 1/4 m) (* 1/2 n))))) (fabs (- n m)))
(-.f64 (+.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (*.f64 m (+.f64 (*.f64 n #s(literal 1/2 binary64)) (*.f64 m #s(literal 1/4 binary64))))) (fabs.f64 (-.f64 n m)))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* (pow m 2) (+ 1/4 (* 1/2 (/ n m))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 n #s(literal 1/2 binary64)) m)))
(* (pow m 2) (- (+ 1/4 (+ (* 1/4 (/ (pow n 2) (pow m 2))) (+ (* 1/2 (/ n m)) (/ l (pow m 2))))) (/ (fabs (- n m)) (pow m 2))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (*.f64 m m)) (+.f64 (/.f64 (*.f64 n #s(literal 1/2 binary64)) m) (/.f64 l (*.f64 m m)))) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 m m)))))
(* (pow m 2) (- (+ 1/4 (+ (* 1/4 (/ (pow n 2) (pow m 2))) (+ (* 1/2 (/ n m)) (/ l (pow m 2))))) (/ (fabs (- n m)) (pow m 2))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (*.f64 m m)) (+.f64 (/.f64 (*.f64 n #s(literal 1/2 binary64)) m) (/.f64 l (*.f64 m m)))) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 m m)))))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* (pow m 2) (+ 1/4 (* 1/2 (/ n m))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 n #s(literal 1/2 binary64)) m)))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))) m)) (* -1/2 n)) m))))
(*.f64 (*.f64 m m) (-.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 n #s(literal -1/2 binary64)) (/.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))) m)) m)))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))) m)) (* -1/2 n)) m))))
(*.f64 (*.f64 m m) (-.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 n #s(literal -1/2 binary64)) (/.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))) m)) m)))
(- (+ l (* 1/4 (pow m 2))) (fabs (- n m)))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) (fabs.f64 (-.f64 n m))))
(- (+ l (+ (* 1/4 (pow m 2)) (* 1/2 (* m n)))) (fabs (- n m)))
(-.f64 (+.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (*.f64 (*.f64 n m) #s(literal 1/2 binary64))) (fabs.f64 (-.f64 n m)))
(- (+ l (+ (* 1/4 (pow m 2)) (* n (+ (* 1/4 n) (* 1/2 m))))) (fabs (- n m)))
(+.f64 l (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) (-.f64 (*.f64 n (+.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 n #s(literal 1/4 binary64)))) (fabs.f64 (-.f64 n m)))))
(- (+ l (+ (* 1/4 (pow m 2)) (* n (+ (* 1/4 n) (* 1/2 m))))) (fabs (- n m)))
(+.f64 l (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) (-.f64 (*.f64 n (+.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 n #s(literal 1/4 binary64)))) (fabs.f64 (-.f64 n m)))))
(* 1/4 (pow n 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
(* (pow n 2) (+ 1/4 (* 1/2 (/ m n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 m #s(literal 1/2 binary64)) n)))
(* (pow n 2) (- (+ 1/4 (+ (* 1/4 (/ (pow m 2) (pow n 2))) (+ (* 1/2 (/ m n)) (/ l (pow n 2))))) (/ (fabs (- n m)) (pow n 2))))
(*.f64 (*.f64 n n) (-.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 (/.f64 (*.f64 m m) n) (/.f64 #s(literal 1/4 binary64) n)) (+.f64 (/.f64 (*.f64 m #s(literal 1/2 binary64)) n) (/.f64 l (*.f64 n n))))) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 n n))))
(* (pow n 2) (- (+ 1/4 (+ (* 1/4 (/ (pow m 2) (pow n 2))) (+ (* 1/2 (/ m n)) (/ l (pow n 2))))) (/ (fabs (- n m)) (pow n 2))))
(*.f64 (*.f64 n n) (-.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 (/.f64 (*.f64 m m) n) (/.f64 #s(literal 1/4 binary64) n)) (+.f64 (/.f64 (*.f64 m #s(literal 1/2 binary64)) n) (/.f64 l (*.f64 n n))))) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 n n))))
(* 1/4 (pow n 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
(* (pow n 2) (+ 1/4 (* 1/2 (/ m n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 m #s(literal 1/2 binary64)) n)))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (+ l (* 1/4 (pow m 2))) (fabs (neg (+ m (* -1 n))))) n)) (* -1/2 m)) n))))
(*.f64 (*.f64 n n) (-.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 m #s(literal -1/2 binary64)) (/.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) (fabs.f64 (-.f64 n m)))) n)) n)))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (+ l (* 1/4 (pow m 2))) (fabs (neg (+ m (* -1 n))))) n)) (* -1/2 m)) n))))
(*.f64 (*.f64 n n) (-.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 m #s(literal -1/2 binary64)) (/.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) (fabs.f64 (-.f64 n m)))) n)) n)))
(- (* 1/4 (pow n 2)) (fabs (- n m)))
(-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))
(- (+ (* 1/4 (pow n 2)) (* 1/2 (* m n))) (fabs (- n m)))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (-.f64 (*.f64 (*.f64 n m) #s(literal 1/2 binary64)) (fabs.f64 (-.f64 n m))))
(- (+ (* 1/4 (pow n 2)) (* m (+ (* 1/4 m) (* 1/2 n)))) (fabs (- n m)))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (-.f64 (*.f64 m (+.f64 (*.f64 n #s(literal 1/2 binary64)) (*.f64 m #s(literal 1/4 binary64)))) (fabs.f64 (-.f64 n m))))
(- (+ (* 1/4 (pow n 2)) (* m (+ (* 1/4 m) (* 1/2 n)))) (fabs (- n m)))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (-.f64 (*.f64 m (+.f64 (*.f64 n #s(literal 1/2 binary64)) (*.f64 m #s(literal 1/4 binary64)))) (fabs.f64 (-.f64 n m))))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* (pow m 2) (+ 1/4 (* 1/2 (/ n m))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 n #s(literal 1/2 binary64)) m)))
(* (pow m 2) (- (+ 1/4 (+ (* 1/4 (/ (pow n 2) (pow m 2))) (* 1/2 (/ n m)))) (/ (fabs (- n m)) (pow m 2))))
(*.f64 (*.f64 m m) (-.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (*.f64 m m)) (/.f64 (*.f64 n #s(literal 1/2 binary64)) m))) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 m m))))
(* (pow m 2) (- (+ 1/4 (+ (* 1/4 (/ (pow n 2) (pow m 2))) (* 1/2 (/ n m)))) (/ (fabs (- n m)) (pow m 2))))
(*.f64 (*.f64 m m) (-.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (*.f64 m m)) (/.f64 (*.f64 n #s(literal 1/2 binary64)) m))) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 m m))))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* (pow m 2) (+ 1/4 (* 1/2 (/ n m))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 n #s(literal 1/2 binary64)) m)))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (* 1/4 (pow n 2)) (fabs (+ n (* -1 m)))) m)) (* -1/2 n)) m))))
(*.f64 (*.f64 m m) (-.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 n #s(literal -1/2 binary64)) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) m)) m)))
(* (pow m 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (* 1/4 (pow n 2)) (fabs (+ n (* -1 m)))) m)) (* -1/2 n)) m))))
(*.f64 (*.f64 m m) (-.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 n #s(literal -1/2 binary64)) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) m)) m)))
(- (* 1/4 (pow m 2)) (fabs (- n m)))
(-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) (fabs.f64 (-.f64 n m)))
(- (+ (* 1/4 (pow m 2)) (* 1/2 (* m n))) (fabs (- n m)))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) (-.f64 (*.f64 (*.f64 n m) #s(literal 1/2 binary64)) (fabs.f64 (-.f64 n m))))
(- (+ (* 1/4 (pow m 2)) (* n (+ (* 1/4 n) (* 1/2 m)))) (fabs (- n m)))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) (-.f64 (*.f64 n (+.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 n #s(literal 1/4 binary64)))) (fabs.f64 (-.f64 n m))))
(- (+ (* 1/4 (pow m 2)) (* n (+ (* 1/4 n) (* 1/2 m)))) (fabs (- n m)))
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) (-.f64 (*.f64 n (+.f64 (*.f64 m #s(literal 1/2 binary64)) (*.f64 n #s(literal 1/4 binary64)))) (fabs.f64 (-.f64 n m))))
(* 1/4 (pow n 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
(* (pow n 2) (+ 1/4 (* 1/2 (/ m n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 m #s(literal 1/2 binary64)) n)))
(* (pow n 2) (- (+ 1/4 (+ (* 1/4 (/ (pow m 2) (pow n 2))) (* 1/2 (/ m n)))) (/ (fabs (- n m)) (pow n 2))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (-.f64 (+.f64 (*.f64 (/.f64 (*.f64 m m) n) (/.f64 #s(literal 1/4 binary64) n)) (/.f64 (*.f64 m #s(literal 1/2 binary64)) n)) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 n n)))))
(* (pow n 2) (- (+ 1/4 (+ (* 1/4 (/ (pow m 2) (pow n 2))) (* 1/2 (/ m n)))) (/ (fabs (- n m)) (pow n 2))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (-.f64 (+.f64 (*.f64 (/.f64 (*.f64 m m) n) (/.f64 #s(literal 1/4 binary64) n)) (/.f64 (*.f64 m #s(literal 1/2 binary64)) n)) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 n n)))))
(* 1/4 (pow n 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
(* (pow n 2) (+ 1/4 (* 1/2 (/ m n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 m #s(literal 1/2 binary64)) n)))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (* 1/4 (pow m 2)) (fabs (neg (+ m (* -1 n))))) n)) (* -1/2 m)) n))))
(*.f64 (*.f64 n n) (-.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 m #s(literal -1/2 binary64)) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) (fabs.f64 (-.f64 n m))) n)) n)))
(* (pow n 2) (+ 1/4 (* -1 (/ (+ (* -1 (/ (- (* 1/4 (pow m 2)) (fabs (neg (+ m (* -1 n))))) n)) (* -1/2 m)) n))))
(*.f64 (*.f64 n n) (-.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 m #s(literal -1/2 binary64)) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)) (fabs.f64 (-.f64 n m))) n)) n)))
(/ 1 (exp l))
(/.f64 #s(literal 1 binary64) (exp.f64 l))
(+ (* -1/2 (/ (pow M 2) (exp l))) (/ 1 (exp l)))
(+.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 M M)) (exp.f64 l)))
(+ (* (pow M 2) (- (* 1/24 (/ (pow M 2) (exp l))) (* 1/2 (/ 1 (exp l))))) (/ 1 (exp l)))
(+.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (*.f64 (*.f64 M M) (+.f64 (/.f64 (*.f64 (*.f64 M M) #s(literal 1/24 binary64)) (exp.f64 l)) (/.f64 #s(literal -1/2 binary64) (exp.f64 l)))))
(+ (* (pow M 2) (- (* (pow M 2) (+ (* -1/720 (/ (pow M 2) (exp l))) (* 1/24 (/ 1 (exp l))))) (* 1/2 (/ 1 (exp l))))) (/ 1 (exp l)))
(+.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (+.f64 (/.f64 (*.f64 (*.f64 M M) #s(literal -1/720 binary64)) (exp.f64 l)) (/.f64 #s(literal 1/24 binary64) (exp.f64 l)))) (/.f64 #s(literal -1/2 binary64) (exp.f64 l)))))
(/ (cos M) (exp l))
(/.f64 (cos.f64 M) (exp.f64 l))
(/ (cos M) (exp l))
(/.f64 (cos.f64 M) (exp.f64 l))
(/ (cos M) (exp l))
(/.f64 (cos.f64 M) (exp.f64 l))
(/ (cos M) (exp l))
(/.f64 (cos.f64 M) (exp.f64 l))
(/ (cos M) (exp l))
(/.f64 (cos.f64 M) (exp.f64 l))
(/ (cos M) (exp l))
(/.f64 (cos.f64 M) (exp.f64 l))
(/ (cos M) (exp l))
(/.f64 (cos.f64 M) (exp.f64 l))
(/ (cos M) (exp l))
(/.f64 (cos.f64 M) (exp.f64 l))
(cos M)
(cos.f64 M)
(+ (cos M) (* -1 (* l (cos M))))
(-.f64 (cos.f64 M) (*.f64 l (cos.f64 M)))
(+ (cos M) (* l (- (* -1 (* l (+ (* -1 (cos M)) (* 1/2 (cos M))))) (cos M))))
(+.f64 (cos.f64 M) (*.f64 l (-.f64 (*.f64 l (*.f64 #s(literal 1/2 binary64) (cos.f64 M))) (cos.f64 M))))
(+ (cos M) (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (cos M)) (* 1/2 (cos M)))) (+ (* -1/2 (cos M)) (* 1/6 (cos M)))))) (+ (* -1 (cos M)) (* 1/2 (cos M))))) (cos M))))
(+.f64 (cos.f64 M) (*.f64 l (-.f64 (*.f64 l (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) l) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 M)) (*.f64 (cos.f64 M) #s(literal -1/3 binary64)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 M)))) (cos.f64 M))))
(/ (cos M) (exp l))
(/.f64 (cos.f64 M) (exp.f64 l))
(/ (cos M) (exp l))
(/.f64 (cos.f64 M) (exp.f64 l))
(/ (cos M) (exp l))
(/.f64 (cos.f64 M) (exp.f64 l))
(/ (cos M) (exp l))
(/.f64 (cos.f64 M) (exp.f64 l))
(/ (cos M) (exp l))
(/.f64 (cos.f64 M) (exp.f64 l))
(/ (cos M) (exp l))
(/.f64 (cos.f64 M) (exp.f64 l))
(/ (cos M) (exp l))
(/.f64 (cos.f64 M) (exp.f64 l))
(/ (cos M) (exp l))
(/.f64 (cos.f64 M) (exp.f64 l))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow M 2)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M)))
(+ 1 (* (pow M 2) (- (* 1/24 (pow M 2)) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) #s(literal 1/24 binary64)) #s(literal -1/2 binary64))))
(+ 1 (* (pow M 2) (- (* (pow M 2) (+ 1/24 (* -1/720 (pow M 2)))) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 M M) #s(literal -1/720 binary64)))) #s(literal -1/2 binary64))))
(cos M)
(cos.f64 M)
(cos M)
(cos.f64 M)
(cos M)
(cos.f64 M)
(cos M)
(cos.f64 M)
(cos M)
(cos.f64 M)
(cos M)
(cos.f64 M)
(cos M)
(cos.f64 M)
(cos M)
(cos.f64 M)
1
#s(literal 1 binary64)
(+ 1 l)
(+.f64 l #s(literal 1 binary64))
(+ 1 (* l (+ 1 (* 1/2 l))))
(+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l #s(literal 1/2 binary64)))))
(+ 1 (* l (+ 1 (* l (+ 1/2 (* 1/6 l))))))
(+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1/2 binary64) (*.f64 l #s(literal 1/6 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)
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (+ (* 1/2 (* K (sin (+ M (* -1/2 (* K n)))))) (* m (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* 1/4 (cos (+ M (* -1/2 (* K n))))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 m (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (*.f64 m (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 K K))) (*.f64 #s(literal -1/4 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (+ (* 1/2 (* K (sin (+ M (* -1/2 (* K n)))))) (* m (- (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* m (- (* -1/48 (* (pow K 3) (sin (+ M (* -1/2 (* K n)))))) (* 1/8 (* K (sin (+ M (* -1/2 (* K n))))))))) (* 1/4 (cos (+ M (* -1/2 (* K n))))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 m (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (*.f64 m (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 K K))) (+.f64 (*.f64 m (+.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 K (*.f64 K K))) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (*.f64 (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) #s(literal -1/8 binary64)))) (*.f64 #s(literal -1/4 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (* -1/2 (* K (+ m n)))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(+ (* -1 (/ (* M (sin (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (* 1/4 (pow m 2)))))
(-.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (/.f64 (*.f64 M (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))
(+ (* M (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (* 1/4 (pow m 2))))) (* -1/2 (/ (* M (cos (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (* 1/4 (pow m 2)))))
(+.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (*.f64 M (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) M) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))))
(+ (* M (+ (* -1 (/ (sin (* -1/2 (* K (+ m n)))) (exp (* 1/4 (pow m 2))))) (* M (+ (* -1/2 (/ (cos (* -1/2 (* K (+ m n)))) (exp (* 1/4 (pow m 2))))) (* 1/6 (/ (* M (sin (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))))))) (/ (cos (* -1/2 (* K (+ m n)))) (exp (* 1/4 (pow m 2)))))
(+.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (*.f64 M (-.f64 (*.f64 M (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (/.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) M) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos M) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(+ (* 1/2 (/ (* K (* (sin M) (+ m n))) (exp (* 1/4 (pow m 2))))) (/ (cos M) (exp (* 1/4 (pow m 2)))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 (+.f64 n m) (sin.f64 M))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))
(+ (* K (+ (* -1/8 (/ (* K (* (cos M) (pow (+ m n) 2))) (exp (* 1/4 (pow m 2))))) (* 1/2 (/ (* (sin M) (+ m n)) (exp (* 1/4 (pow m 2))))))) (/ (cos M) (exp (* 1/4 (pow m 2)))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (*.f64 K (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (cos.f64 M) K) (*.f64 (+.f64 n m) (+.f64 n m)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (sin.f64 M))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))))
(+ (* K (+ (* 1/2 (/ (* (sin M) (+ m n)) (exp (* 1/4 (pow m 2))))) (* K (+ (* -1/8 (/ (* (cos M) (pow (+ m n) 2)) (exp (* 1/4 (pow m 2))))) (* -1/48 (/ (* K (* (sin M) (pow (+ m n) 3))) (exp (* 1/4 (pow m 2))))))))) (/ (cos M) (exp (* 1/4 (pow m 2)))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (*.f64 K (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (sin.f64 M))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (*.f64 K (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 M)) (*.f64 (+.f64 n m) (+.f64 n m))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (/.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 K (sin.f64 M)) (*.f64 (+.f64 n m) (*.f64 (+.f64 n m) (+.f64 n m))))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K m)))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(+ (* 1/2 (/ (* K (* n (sin (+ M (* -1/2 (* K m)))))) (exp (* 1/4 (pow m 2))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (* 1/4 (pow m 2)))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 n K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))))
(+ (* n (+ (* -1/8 (/ (* (pow K 2) (* n (cos (+ M (* -1/2 (* K m)))))) (exp (* 1/4 (pow m 2))))) (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (* 1/4 (pow m 2))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (* 1/4 (pow m 2)))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (*.f64 n (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) n) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))))))
(+ (* n (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K m))))) (exp (* 1/4 (pow m 2))))) (* n (+ (* -1/8 (/ (* (pow K 2) (cos (+ M (* -1/2 (* K m))))) (exp (* 1/4 (pow m 2))))) (* -1/48 (/ (* (pow K 3) (* n (sin (+ M (* -1/2 (* K m)))))) (exp (* 1/4 (pow m 2))))))))) (/ (cos (+ M (* -1/2 (* K m)))) (exp (* 1/4 (pow m 2)))))
(+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (*.f64 n (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (*.f64 n (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 (*.f64 K (*.f64 K K)) n) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))))))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (+ m n))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (exp (* 1/4 (pow m 2))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(+ (* -1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))) (/ 1 (cos (+ M (* -1/2 (* K n))))))
(+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) #s(literal 2 binary64))))
(+ (* m (- (* m (- (* 1/4 (/ 1 (cos (+ M (* -1/2 (* K n)))))) (+ (* -1/4 (/ (* (pow K 2) (pow (sin (+ M (* -1/2 (* K n)))) 2)) (pow (cos (+ M (* -1/2 (* K n)))) 3))) (* -1/8 (/ (pow K 2) (cos (+ M (* -1/2 (* K n))))))))) (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))))) (/ 1 (cos (+ M (* -1/2 (* K n))))))
(+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (*.f64 m (+.f64 (*.f64 m (+.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 K K) (pow.f64 (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 K K) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) #s(literal 2 binary64)))))))
(+ (* m (- (* m (- (+ (* -1 (* m (+ (* -1/48 (/ (* (pow K 3) (sin (+ M (* -1/2 (* K n))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))) (+ (* 1/16 (/ (* (pow K 3) (sin (+ M (* -1/2 (* K n))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))) (* 1/2 (/ (* K (* (sin (+ M (* -1/2 (* K n)))) (- (* 1/4 (/ 1 (cos (+ M (* -1/2 (* K n)))))) (+ (* -1/4 (/ (* (pow K 2) (pow (sin (+ M (* -1/2 (* K n)))) 2)) (pow (cos (+ M (* -1/2 (* K n)))) 3))) (* -1/8 (/ (pow K 2) (cos (+ M (* -1/2 (* K n)))))))))) (cos (+ M (* -1/2 (* K n)))))))))) (* 1/4 (/ 1 (cos (+ M (* -1/2 (* K n))))))) (+ (* -1/4 (/ (* (pow K 2) (pow (sin (+ M (* -1/2 (* K n)))) 2)) (pow (cos (+ M (* -1/2 (* K n)))) 3))) (* -1/8 (/ (pow K 2) (cos (+ M (* -1/2 (* K n))))))))) (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (pow (cos (+ M (* -1/2 (* K n)))) 2))))) (/ 1 (cos (+ M (* -1/2 (* K n))))))
(+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (*.f64 m (+.f64 (*.f64 m (-.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (*.f64 m (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 K (*.f64 K K))) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 K (*.f64 K K)))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (+.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 K K) (pow.f64 (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 K K) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 K K) (pow.f64 (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) #s(literal 2 binary64)))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- n (* -1 m)))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (* -1/2 (* K (+ m n)))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(+ (/ (exp (* 1/4 (pow m 2))) (cos (* -1/2 (* K (+ m n))))) (/ (* M (* (exp (* 1/4 (pow m 2))) (sin (* -1/2 (* K (+ m n)))))) (pow (cos (* -1/2 (* K (+ m n)))) 2)))
(+.f64 (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (/.f64 (*.f64 M (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) #s(literal 2 binary64))))
(+ (* M (- (* -1 (* M (+ (* -1 (/ (* (exp (* 1/4 (pow m 2))) (pow (sin (* -1/2 (* K (+ m n)))) 2)) (pow (cos (* -1/2 (* K (+ m n)))) 3))) (* -1/2 (/ (exp (* 1/4 (pow m 2))) (cos (* -1/2 (* K (+ m n))))))))) (* -1 (/ (* (exp (* 1/4 (pow m 2))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (/ (exp (* 1/4 (pow m 2))) (cos (* -1/2 (* K (+ m n))))))
(+.f64 (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (*.f64 M (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) M) (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) #s(literal 3 binary64))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) #s(literal 2 binary64))))))
(+ (* M (- (* M (- (* -1 (* M (+ (* -1/2 (/ (* (exp (* 1/4 (pow m 2))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))) (+ (* 1/6 (/ (* (exp (* 1/4 (pow m 2))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))) (/ (* (sin (* -1/2 (* K (+ m n)))) (+ (* -1 (/ (* (exp (* 1/4 (pow m 2))) (pow (sin (* -1/2 (* K (+ m n)))) 2)) (pow (cos (* -1/2 (* K (+ m n)))) 3))) (* -1/2 (/ (exp (* 1/4 (pow m 2))) (cos (* -1/2 (* K (+ m n)))))))) (cos (* -1/2 (* K (+ m n))))))))) (+ (* -1 (/ (* (exp (* 1/4 (pow m 2))) (pow (sin (* -1/2 (* K (+ m n)))) 2)) (pow (cos (* -1/2 (* K (+ m n)))) 3))) (* -1/2 (/ (exp (* 1/4 (pow m 2))) (cos (* -1/2 (* K (+ m n))))))))) (* -1 (/ (* (exp (* 1/4 (pow m 2))) (sin (* -1/2 (* K (+ m n))))) (pow (cos (* -1/2 (* K (+ m n)))) 2))))) (/ (exp (* 1/4 (pow m 2))) (cos (* -1/2 (* K (+ m n))))))
(+.f64 (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (*.f64 M (+.f64 (*.f64 M (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) M) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) #s(literal 3 binary64))))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))) (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) #s(literal 2 binary64))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (- (* -1/2 (* K (+ m n))) (* -1 M))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos M))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 M))
(+ (* -1/2 (/ (* K (* (exp (* 1/4 (pow m 2))) (* (sin M) (+ m n)))) (pow (cos M) 2))) (/ (exp (* 1/4 (pow m 2))) (cos M)))
(+.f64 (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 M)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 K (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (*.f64 (+.f64 n m) (sin.f64 M))))) (pow.f64 (cos.f64 M) #s(literal 2 binary64))))
(+ (* K (- (* -1 (* K (+ (* -1/4 (/ (* (exp (* 1/4 (pow m 2))) (* (pow (sin M) 2) (pow (+ m n) 2))) (pow (cos M) 3))) (* -1/8 (/ (* (exp (* 1/4 (pow m 2))) (pow (+ m n) 2)) (cos M)))))) (* 1/2 (/ (* (exp (* 1/4 (pow m 2))) (* (sin M) (+ m n))) (pow (cos M) 2))))) (/ (exp (* 1/4 (pow m 2))) (cos M)))
(+.f64 (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 M)) (*.f64 K (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (/.f64 (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) (pow.f64 (sin.f64 M) #s(literal 2 binary64))) (pow.f64 (cos.f64 M) #s(literal 3 binary64))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (/.f64 (*.f64 (+.f64 n m) (+.f64 n m)) (cos.f64 M))))) (neg.f64 K)) (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (/.f64 (*.f64 (+.f64 n m) (sin.f64 M)) (pow.f64 (cos.f64 M) #s(literal 2 binary64))))))))
(+ (* K (- (* K (- (* -1 (* K (+ (* -1/2 (/ (* (sin M) (* (+ m n) (+ (* -1/4 (/ (* (exp (* 1/4 (pow m 2))) (* (pow (sin M) 2) (pow (+ m n) 2))) (pow (cos M) 3))) (* -1/8 (/ (* (exp (* 1/4 (pow m 2))) (pow (+ m n) 2)) (cos M)))))) (cos M))) (+ (* -1/48 (/ (* (exp (* 1/4 (pow m 2))) (* (sin M) (pow (+ m n) 3))) (pow (cos M) 2))) (* 1/16 (/ (* (exp (* 1/4 (pow m 2))) (* (sin M) (pow (+ m n) 3))) (pow (cos M) 2))))))) (+ (* -1/4 (/ (* (exp (* 1/4 (pow m 2))) (* (pow (sin M) 2) (pow (+ m n) 2))) (pow (cos M) 3))) (* -1/8 (/ (* (exp (* 1/4 (pow m 2))) (pow (+ m n) 2)) (cos M)))))) (* 1/2 (/ (* (exp (* 1/4 (pow m 2))) (* (sin M) (+ m n))) (pow (cos M) 2))))) (/ (exp (* 1/4 (pow m 2))) (cos M)))
(+.f64 (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 M)) (*.f64 K (+.f64 (*.f64 K (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 K (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 M) (*.f64 (+.f64 n m) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (/.f64 (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) (pow.f64 (sin.f64 M) #s(literal 2 binary64))) (pow.f64 (cos.f64 M) #s(literal 3 binary64))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (/.f64 (*.f64 (+.f64 n m) (+.f64 n m)) (cos.f64 M)))))))) (cos.f64 M)) (*.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (*.f64 (sin.f64 M) (*.f64 (+.f64 n m) (*.f64 (+.f64 n m) (+.f64 n m))))) (pow.f64 (cos.f64 M) #s(literal 2 binary64))) #s(literal 1/24 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (/.f64 (*.f64 (*.f64 (+.f64 n m) (+.f64 n m)) (pow.f64 (sin.f64 M) #s(literal 2 binary64))) (pow.f64 (cos.f64 M) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (/.f64 (*.f64 (+.f64 n m) (+.f64 n m)) (cos.f64 M)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (/.f64 (*.f64 (+.f64 n m) (sin.f64 M)) (pow.f64 (cos.f64 M) #s(literal 2 binary64))))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K m)))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))
(+ (* -1/2 (/ (* K (* n (* (exp (* 1/4 (pow m 2))) (sin (+ M (* -1/2 (* K m))))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))) (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K m))))))
(+.f64 (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 n K) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) #s(literal 2 binary64))))
(+ (* n (- (* -1 (* n (+ (* -1/4 (/ (* (pow K 2) (* (exp (* 1/4 (pow m 2))) (pow (sin (+ M (* -1/2 (* K m)))) 2))) (pow (cos (+ M (* -1/2 (* K m)))) 3))) (* -1/8 (/ (* (pow K 2) (exp (* 1/4 (pow m 2)))) (cos (+ M (* -1/2 (* K m))))))))) (* 1/2 (/ (* K (* (exp (* 1/4 (pow m 2))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))))) (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K m))))))
(+.f64 (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (*.f64 n (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) n) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 K K) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (pow.f64 (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 K (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) #s(literal 2 binary64)))))))
(+ (* n (- (* n (- (* -1 (* n (+ (* -1/2 (/ (* K (* (sin (+ M (* -1/2 (* K m)))) (+ (* -1/4 (/ (* (pow K 2) (* (exp (* 1/4 (pow m 2))) (pow (sin (+ M (* -1/2 (* K m)))) 2))) (pow (cos (+ M (* -1/2 (* K m)))) 3))) (* -1/8 (/ (* (pow K 2) (exp (* 1/4 (pow m 2)))) (cos (+ M (* -1/2 (* K m))))))))) (cos (+ M (* -1/2 (* K m)))))) (+ (* -1/48 (/ (* (pow K 3) (* (exp (* 1/4 (pow m 2))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))) (* 1/16 (/ (* (pow K 3) (* (exp (* 1/4 (pow m 2))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))))))) (+ (* -1/4 (/ (* (pow K 2) (* (exp (* 1/4 (pow m 2))) (pow (sin (+ M (* -1/2 (* K m)))) 2))) (pow (cos (+ M (* -1/2 (* K m)))) 3))) (* -1/8 (/ (* (pow K 2) (exp (* 1/4 (pow m 2)))) (cos (+ M (* -1/2 (* K m))))))))) (* 1/2 (/ (* K (* (exp (* 1/4 (pow m 2))) (sin (+ M (* -1/2 (* K m)))))) (pow (cos (+ M (* -1/2 (* K m)))) 2))))) (/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K m))))))
(+.f64 (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (*.f64 n (+.f64 (*.f64 n (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 n (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 K (*.f64 (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 K K) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (pow.f64 (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))))))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (*.f64 (/.f64 (*.f64 (*.f64 K (*.f64 K K)) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) #s(literal 2 binary64))) #s(literal 1/24 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 K K) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (pow.f64 (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 K K) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 K (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (pow.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) #s(literal 2 binary64)))))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (+ m n))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(/ (exp (* 1/4 (pow m 2))) (cos (+ M (* -1/2 (* K (- m (* -1 n)))))))
(/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
1
#s(literal 1 binary64)
(+ 1 (* 1/4 (pow m 2)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))
(+ 1 (* (pow m 2) (+ 1/4 (* 1/32 (pow m 2)))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 m m) #s(literal 1/32 binary64)))))
(+ 1 (* (pow m 2) (+ 1/4 (* (pow m 2) (+ 1/32 (* 1/384 (pow m 2)))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 m m) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 m m) (+.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 m m) #s(literal 1/384 binary64)))))))
(exp (* 1/4 (pow m 2)))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))
(exp (* 1/4 (pow m 2)))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))
(exp (* 1/4 (pow m 2)))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))
(exp (* 1/4 (pow m 2)))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))
(exp (* 1/4 (pow m 2)))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))
(exp (* 1/4 (pow m 2)))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))
(exp (* 1/4 (pow m 2)))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))
(exp (* 1/4 (pow m 2)))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m)))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(* 1/4 (pow m 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 m m))
(/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(exp.f64 (-.f64 #s(literal 0 binary64) (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(+ (* -1/8 (/ (* (pow K 2) (pow n 2)) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))
(+.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 n n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))))
(+ (* (pow K 2) (+ (* -1/8 (/ (pow n 2) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/384 (/ (* (pow K 2) (pow n 4)) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))) (/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))
(+.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))) (*.f64 (*.f64 K K) (+.f64 (/.f64 (*.f64 (*.f64 n n) #s(literal -1/8 binary64)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) (pow.f64 n #s(literal 4 binary64))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))))))
(+ (* (pow K 2) (+ (* -1/8 (/ (pow n 2) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* (pow K 2) (+ (* -1/46080 (/ (* (pow K 2) (pow n 6)) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/384 (/ (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))))) (/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))
(+.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))) (*.f64 (*.f64 K K) (+.f64 (/.f64 (*.f64 (*.f64 n n) #s(literal -1/8 binary64)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))) (*.f64 (*.f64 K K) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 K K)) (pow.f64 n #s(literal 6 binary64))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal 1/384 binary64) (pow.f64 n #s(literal 4 binary64))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ 1 (exp (- l (fabs (- n m)))))
(exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 l (fabs.f64 (-.f64 n m)))))
(+ (* (pow n 2) (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (/ 1 (exp (- l (fabs (- n m))))))
(+.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 (*.f64 n n) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 #s(literal -1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))))
(+ (* (pow n 2) (- (+ (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* (pow n 2) (- (* 1/384 (/ (pow K 4) (exp (- l (fabs (- n m)))))) (+ (* 1/32 (/ 1 (exp (- l (fabs (- n m)))))) (* 1/4 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (/ 1 (exp (- l (fabs (- n m))))))
(+.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 (*.f64 n n) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (*.f64 n n) (+.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/384 binary64) (pow.f64 K #s(literal 4 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 #s(literal 1/32 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))) (*.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 #s(literal -1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))))) (/.f64 #s(literal -1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))))))
(+ (* (pow n 2) (- (+ (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* (pow n 2) (- (+ (* 1/384 (/ (pow K 4) (exp (- l (fabs (- n m)))))) (* (pow n 2) (- (* -1/46080 (/ (pow K 6) (exp (- l (fabs (- n m)))))) (+ (* 1/384 (/ 1 (exp (- l (fabs (- n m)))))) (+ (* 1/32 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (* 1/4 (- (* 1/384 (/ (pow K 4) (exp (- l (fabs (- n m)))))) (+ (* 1/32 (/ 1 (exp (- l (fabs (- n m)))))) (* 1/4 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))))))))))) (+ (* 1/32 (/ 1 (exp (- l (fabs (- n m)))))) (* 1/4 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (/ 1 (exp (- l (fabs (- n m))))))
(+.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 (*.f64 n n) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (*.f64 n n) (+.f64 (/.f64 (*.f64 #s(literal 1/384 binary64) (pow.f64 K #s(literal 4 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (-.f64 (*.f64 (*.f64 n n) (-.f64 (/.f64 (*.f64 #s(literal -1/46080 binary64) (pow.f64 K #s(literal 6 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (+.f64 (+.f64 (/.f64 #s(literal 1/384 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 #s(literal 1/32 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 #s(literal -1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))))) (*.f64 #s(literal 1/4 binary64) (+.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/384 binary64) (pow.f64 K #s(literal 4 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 #s(literal 1/32 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))) (*.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 #s(literal -1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))))))))) (+.f64 (/.f64 #s(literal 1/32 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 #s(literal -1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))))))) (/.f64 #s(literal -1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(+ (* -1 (/ (* l (cos (* -1/2 (* K n)))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))
(-.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 l (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(+ (* l (- (* -1 (* l (+ (* -1 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))
(+.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (*.f64 l (-.f64 (*.f64 l (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))) (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))))
(+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))))) (+ (* -1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/6 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))))))) (+ (* -1 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))
(+.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (*.f64 l (-.f64 (*.f64 l (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) l) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) #s(literal -1/3 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))) (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l)))
(/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l)))
(/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l)))
(/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l)))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (* (pow K 2) (pow n 2))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 n n)))
(+ 1 (* (pow K 2) (+ (* -1/8 (pow n 2)) (* 1/384 (* (pow K 2) (pow n 4))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 K K) (+.f64 (*.f64 (*.f64 n n) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) (pow.f64 n #s(literal 4 binary64))))))
(+ 1 (* (pow K 2) (+ (* -1/8 (pow n 2)) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (pow n 6))) (* 1/384 (pow n 4)))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 K K) (+.f64 (*.f64 (*.f64 n n) #s(literal -1/8 binary64)) (*.f64 (*.f64 K K) (+.f64 (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 K K)) (pow.f64 n #s(literal 6 binary64))) (*.f64 #s(literal 1/384 binary64) (pow.f64 n #s(literal 4 binary64))))))))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (* (pow K 2) (pow n 2))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 n n)))
(+ 1 (* (pow n 2) (+ (* -1/8 (pow K 2)) (* 1/384 (* (pow K 4) (pow n 2))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 n n) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 (*.f64 #s(literal 1/384 binary64) (pow.f64 K #s(literal 4 binary64))) (*.f64 n n)))))
(+ 1 (* (pow n 2) (+ (* -1/8 (pow K 2)) (* (pow n 2) (+ (* -1/46080 (* (pow K 6) (pow n 2))) (* 1/384 (pow K 4)))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 n n) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 (*.f64 n n) (+.f64 (*.f64 (*.f64 #s(literal -1/46080 binary64) (pow.f64 K #s(literal 6 binary64))) (*.f64 n n)) (*.f64 #s(literal 1/384 binary64) (pow.f64 K #s(literal 4 binary64))))))))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n 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)
(/ (+ (cos (* -1/2 (* K n))) (* 1/2 (* K (* m (sin (* -1/2 (* K n))))))) (exp (- l (fabs (- m n)))))
(/.f64 (+.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))
(+ (* 1/2 (/ (* K (* m (sin (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (+ (* M (- (* 1/2 (/ (* K (* m (cos (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (/ (sin (* -1/2 (* K n))) (exp (- l (fabs (- m n))))))) (/ (cos (* -1/2 (* K n))) (exp (- l (fabs (- m n)))))))
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 M (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))) (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))))
(+ (* 1/2 (/ (* K (* m (sin (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (+ (* M (- (+ (* 1/2 (/ (* K (* m (cos (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (* M (- (+ (* -1/2 (/ (cos (* -1/2 (* K n))) (exp (- l (fabs (- m n)))))) (* -1/4 (/ (* K (* m (sin (* -1/2 (* K n))))) (exp (- l (fabs (- m n))))))) (+ (* 1/2 (/ (* K (* m (sin (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (/ (cos (* -1/2 (* K n))) (exp (- l (fabs (- m n))))))))) (/ (sin (* -1/2 (* K n))) (exp (- l (fabs (- m n))))))) (/ (cos (* -1/2 (* K n))) (exp (- l (fabs (- m n)))))))
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 M (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (-.f64 (*.f64 M (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 m K) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))))) (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))))))
(+ (* 1/2 (/ (* K (* m (sin (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (+ (* M (- (+ (* 1/2 (/ (* K (* m (cos (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (* M (- (+ (* -1/2 (/ (cos (* -1/2 (* K n))) (exp (- l (fabs (- m n)))))) (+ (* -1/4 (/ (* K (* m (sin (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (* M (- (+ (* -1/12 (/ (* K (* m (cos (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (/ (sin (* -1/2 (* K n))) (exp (- l (fabs (- m n)))))) (+ (* -1/6 (/ (sin (* -1/2 (* K n))) (exp (- l (fabs (- m n)))))) (* 1/2 (/ (* K (* m (cos (* -1/2 (* K n))))) (exp (- l (fabs (- m n))))))))))) (+ (* 1/2 (/ (* K (* m (sin (* -1/2 (* K n))))) (exp (- l (fabs (- m n)))))) (/ (cos (* -1/2 (* K n))) (exp (- l (fabs (- m n))))))))) (/ (sin (* -1/2 (* K n))) (exp (- l (fabs (- m n))))))) (/ (cos (* -1/2 (* K n))) (exp (- l (fabs (- m n)))))))
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 M (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (-.f64 (*.f64 M (-.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 m K) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))) (*.f64 M (-.f64 (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (*.f64 (*.f64 m K) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) #s(literal -1/12 binary64)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))))) (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(+ (* K (- (* 1/2 (/ (* m (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* -1/2 (/ (* n (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (*.f64 K (+.f64 (/.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (sin.f64 M)) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))))
(+ (* K (- (+ (* 1/2 (/ (* m (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* K (+ (* -1/4 (/ (* m (* n (cos M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* -1/8 (/ (* (pow n 2) (cos M)) (exp (- (+ l (pow M 2)) (fabs (- m n))))))))) (* -1/2 (/ (* n (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (*.f64 K (+.f64 (/.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (sin.f64 M)) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 K (+.f64 (/.f64 (*.f64 (*.f64 m #s(literal -1/4 binary64)) (*.f64 n (cos.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (*.f64 (*.f64 n n) #s(literal -1/8 binary64)) (cos.f64 M)) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))))))
(+ (* K (- (+ (* 1/2 (/ (* m (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* K (+ (* -1/4 (/ (* m (* n (cos M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (+ (* -1/8 (/ (* (pow n 2) (cos M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* K (- (* -1/16 (/ (* m (* (pow n 2) (sin M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* 1/48 (/ (* (pow n 3) (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))))) (* -1/2 (/ (* n (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (*.f64 K (+.f64 (/.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (sin.f64 M)) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 K (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 m #s(literal -1/4 binary64)) (*.f64 n (cos.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (*.f64 (*.f64 n n) #s(literal -1/8 binary64)) (cos.f64 M)) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))) (*.f64 K (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) m) (*.f64 (*.f64 n n) (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 n (*.f64 n n)) (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))))))
(* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(* K (+ (* 1/2 (/ (* m (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (* K (exp (- (+ l (pow M 2)) (fabs (- m n))))))))
(*.f64 K (+.f64 (/.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) K) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))))
(* K (+ (* 1/2 (/ (* m (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (* K (exp (- (+ l (pow M 2)) (fabs (- m n))))))))
(*.f64 K (+.f64 (/.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) K) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))))
(* K (+ (* 1/2 (/ (* m (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (* K (exp (- (+ l (pow M 2)) (fabs (- m n))))))))
(*.f64 K (+.f64 (/.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) K) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))))
(* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(* -1 (* K (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (* K (exp (- (+ l (pow M 2)) (fabs (- m n))))))) (* -1/2 (/ (* m (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 m #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) K) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))) (neg.f64 K))
(* -1 (* K (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (* K (exp (- (+ l (pow M 2)) (fabs (- m n))))))) (* -1/2 (/ (* m (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 m #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) K) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))) (neg.f64 K))
(* -1 (* K (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (* K (exp (- (+ l (pow M 2)) (fabs (- m n))))))) (* -1/2 (/ (* m (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 m #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) K) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))) (neg.f64 K))
(/ (+ (cos M) (* 1/2 (* K (* m (sin M))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (+.f64 (cos.f64 M) (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 m (sin.f64 M)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(+ (* 1/2 (/ (* K (* m (sin M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (+ (* n (- (* -1/4 (/ (* (pow K 2) (* m (cos M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* -1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))
(+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 m (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (+.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (*.f64 n (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 K K)) (*.f64 m (cos.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))))))
(+ (* 1/2 (/ (* K (* m (sin M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (+ (* n (- (+ (* -1/4 (/ (* (pow K 2) (* m (cos M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* n (+ (* -1/8 (/ (* (pow K 2) (cos M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* -1/16 (/ (* (pow K 3) (* m (sin M))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))))) (* -1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))
(+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 m (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (+.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (*.f64 n (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 K K)) (*.f64 m (cos.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 n (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 M)) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 K (*.f64 K K)) (*.f64 m (sin.f64 M)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))))))
(+ (* 1/2 (/ (* K (* m (sin M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (+ (* n (- (+ (* -1/4 (/ (* (pow K 2) (* m (cos M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* n (+ (* -1/8 (/ (* (pow K 2) (cos M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (+ (* -1/16 (/ (* (pow K 3) (* m (sin M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* n (- (* 1/96 (/ (* (pow K 4) (* m (cos M))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (* 1/48 (/ (* (pow K 3) (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))))))) (* -1/2 (/ (* K (sin M)) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow M 2)) (fabs (- m n)))))))
(+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 m (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (+.f64 (/.f64 (cos.f64 M) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (*.f64 n (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 K K)) (*.f64 m (cos.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 n (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 M)) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 K (*.f64 K K)) (*.f64 m (sin.f64 M)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))) (*.f64 n (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/96 binary64) (pow.f64 K #s(literal 4 binary64))) (*.f64 m (cos.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 K (*.f64 K K)) (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 M))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (+ m (* -1 n))))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))
(+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))
(+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))
(* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (- m n))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(* m (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (* m (exp (- (+ l (pow M 2)) (fabs (- m n))))))))
(*.f64 m (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 m (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))))
(* m (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (* m (exp (- (+ l (pow M 2)) (fabs (- m n))))))))
(*.f64 m (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 m (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))))
(* m (+ (* 1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (* m (exp (- (+ l (pow M 2)) (fabs (- m n))))))))
(*.f64 m (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 m (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))))
(* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(* -1 (* m (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (* m (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))))) (* -1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m)))))))))))
(*.f64 (-.f64 #s(literal 0 binary64) m) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 m (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))))
(* -1 (* m (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (* m (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))))) (* -1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m)))))))))))
(*.f64 (-.f64 #s(literal 0 binary64) m) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 m (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))))
(* -1 (* m (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) (* m (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m))))))))) (* -1/2 (/ (* K (sin (+ M (* -1/2 (* K n))))) (exp (- (+ l (pow M 2)) (fabs (neg (+ n (* -1 m)))))))))))
(*.f64 (-.f64 #s(literal 0 binary64) m) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 m (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m))))))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (fabs (- m n)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m)))))
(+ (* -1 (* l (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n)))))))) (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n)))))))
(-.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m)))))) (*.f64 l (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))))))
(+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (+ (* l (- (* -1 (* l (+ (* -1 (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n))))))) (* 1/2 (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (fabs (- m n))))))))) (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n)))))))
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))) (+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))) (*.f64 l (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) l) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m)))))))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))))))))
(+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n))))))) (* 1/2 (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (fabs (- m n)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n))))))) (* 1/6 (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (fabs (- m n)))))))))) (+ (* -1 (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n))))))) (* 1/2 (/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (fabs (- m n))))))))) (+ (* 1/2 (/ (* K (* m (sin (+ M (* -1/2 (* K n)))))) (exp (- (pow M 2) (fabs (- m n)))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n)))))))) (/ (cos (+ M (* -1/2 (* K n)))) (exp (- (pow M 2) (fabs (- m n)))))))
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))) (+.f64 (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))) (*.f64 l (-.f64 (*.f64 l (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 l (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 #s(literal 1/6 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m)))))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m)))))))))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))))))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))))))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (+ l (pow M 2)) (fabs (- m n)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 n m)))))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (+.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))) l)))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (+.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))) l)))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (+.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))) l)))
(/ (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))) (exp (- (pow M 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (+.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))) l)))
(+ (cos (* -1/2 (* K n))) (* 1/2 (* K (* m (sin (* -1/2 (* K n)))))))
(+.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))
(+ (cos (* -1/2 (* K n))) (+ (* 1/2 (* K (* m (sin (* -1/2 (* K n)))))) (* M (- (* 1/2 (* K (* m (cos (* -1/2 (* K n)))))) (sin (* -1/2 (* K n)))))))
(+.f64 (+.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (*.f64 M (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))
(+ (cos (* -1/2 (* K n))) (+ (* 1/2 (* K (* m (sin (* -1/2 (* K n)))))) (* M (- (+ (* 1/2 (* K (* m (cos (* -1/2 (* K n)))))) (* M (+ (* -1/2 (cos (* -1/2 (* K n)))) (* -1/4 (* K (* m (sin (* -1/2 (* K n))))))))) (sin (* -1/2 (* K n)))))))
(+.f64 (+.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (*.f64 M (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (-.f64 (*.f64 M (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 m K) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (cos (* -1/2 (* K n))) (+ (* 1/2 (* K (* m (sin (* -1/2 (* K n)))))) (* M (- (+ (* 1/2 (* K (* m (cos (* -1/2 (* K n)))))) (* M (+ (* -1/2 (cos (* -1/2 (* K n)))) (+ (* -1/4 (* K (* m (sin (* -1/2 (* K n)))))) (* M (- (* -1/12 (* K (* m (cos (* -1/2 (* K n)))))) (* -1/6 (sin (* -1/2 (* K n)))))))))) (sin (* -1/2 (* K n)))))))
(+.f64 (+.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (*.f64 M (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (-.f64 (*.f64 M (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 m K) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (*.f64 M (+.f64 (*.f64 (*.f64 (*.f64 m K) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) #s(literal -1/12 binary64)) (*.f64 #s(literal 1/6 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (cos (- (* -1/2 (* K n)) (* -1 M))) (* 1/2 (* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(cos M)
(cos.f64 M)
(+ (cos M) (* K (- (* 1/2 (* m (sin M))) (* -1/2 (* n (sin M))))))
(+.f64 (cos.f64 M) (*.f64 K (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (sin.f64 M)))))
(+ (cos M) (* K (- (+ (* 1/2 (* m (sin M))) (* K (+ (* -1/4 (* m (* n (cos M)))) (* -1/8 (* (pow n 2) (cos M)))))) (* -1/2 (* n (sin M))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (sin.f64 M)) (+.f64 (*.f64 K (+.f64 (*.f64 (*.f64 m #s(literal -1/4 binary64)) (*.f64 n (cos.f64 M))) (*.f64 (*.f64 (*.f64 n n) #s(literal -1/8 binary64)) (cos.f64 M)))) (*.f64 #s(literal 1/2 binary64) (*.f64 n (sin.f64 M)))))))
(+ (cos M) (* K (- (+ (* 1/2 (* m (sin M))) (* K (+ (* -1/4 (* m (* n (cos M)))) (+ (* -1/8 (* (pow n 2) (cos M))) (* K (- (* -1/16 (* m (* (pow n 2) (sin M)))) (* 1/48 (* (pow n 3) (sin M))))))))) (* -1/2 (* n (sin M))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (sin.f64 M)) (+.f64 (*.f64 K (+.f64 (+.f64 (*.f64 (*.f64 m #s(literal -1/4 binary64)) (*.f64 n (cos.f64 M))) (*.f64 (*.f64 (*.f64 n n) #s(literal -1/8 binary64)) (cos.f64 M))) (*.f64 K (-.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) m) (*.f64 (*.f64 n n) (sin.f64 M))) (*.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 n (*.f64 n n))) (sin.f64 M)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 n (sin.f64 M)))))))
(* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))
(* K (+ (* 1/2 (* m (sin (+ M (* -1/2 (* K n)))))) (/ (cos (+ M (* -1/2 (* K n)))) K)))
(*.f64 K (+.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) K)))
(* K (+ (* 1/2 (* m (sin (+ M (* -1/2 (* K n)))))) (/ (cos (+ M (* -1/2 (* K n)))) K)))
(*.f64 K (+.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) K)))
(* K (+ (* 1/2 (* m (sin (+ M (* -1/2 (* K n)))))) (/ (cos (+ M (* -1/2 (* K n)))) K)))
(*.f64 K (+.f64 (*.f64 (*.f64 m #s(literal 1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) K)))
(* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))
(* -1 (* K (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) K)) (* -1/2 (* m (sin (+ M (* -1/2 (* K n)))))))))
(*.f64 (-.f64 (*.f64 (*.f64 m #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) K)) (neg.f64 K))
(* -1 (* K (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) K)) (* -1/2 (* m (sin (+ M (* -1/2 (* K n)))))))))
(*.f64 (-.f64 (*.f64 (*.f64 m #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) K)) (neg.f64 K))
(* -1 (* K (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) K)) (* -1/2 (* m (sin (+ M (* -1/2 (* K n)))))))))
(*.f64 (-.f64 (*.f64 (*.f64 m #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) K)) (neg.f64 K))
(+ (cos M) (* 1/2 (* K (* m (sin M)))))
(+.f64 (cos.f64 M) (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 m (sin.f64 M))))
(+ (cos M) (+ (* 1/2 (* K (* m (sin M)))) (* n (- (* -1/4 (* (pow K 2) (* m (cos M)))) (* -1/2 (* K (sin M)))))))
(+.f64 (+.f64 (cos.f64 M) (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 m (sin.f64 M)))) (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 K K)) (*.f64 m (cos.f64 M))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 M))))))
(+ (cos M) (+ (* 1/2 (* K (* m (sin M)))) (* n (- (+ (* -1/4 (* (pow K 2) (* m (cos M)))) (* n (+ (* -1/8 (* (pow K 2) (cos M))) (* -1/16 (* (pow K 3) (* m (sin M))))))) (* -1/2 (* K (sin M)))))))
(+.f64 (+.f64 (cos.f64 M) (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 m (sin.f64 M)))) (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 K K)) (*.f64 m (cos.f64 M))) (+.f64 (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 M)) (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 K (*.f64 K K)) (*.f64 m (sin.f64 M)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 M)))))))
(+ (cos M) (+ (* 1/2 (* K (* m (sin M)))) (* n (- (+ (* -1/4 (* (pow K 2) (* m (cos M)))) (* n (+ (* -1/8 (* (pow K 2) (cos M))) (+ (* -1/16 (* (pow K 3) (* m (sin M)))) (* n (- (* 1/96 (* (pow K 4) (* m (cos M)))) (* 1/48 (* (pow K 3) (sin M))))))))) (* -1/2 (* K (sin M)))))))
(+.f64 (+.f64 (cos.f64 M) (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 m (sin.f64 M)))) (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 K K)) (*.f64 m (cos.f64 M))) (+.f64 (*.f64 n (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 M)) (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 K (*.f64 K K)) (*.f64 m (sin.f64 M))))) (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal 1/96 binary64) (pow.f64 K #s(literal 4 binary64))) (*.f64 m (cos.f64 M))) (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 K (*.f64 K K)) (sin.f64 M))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 M)))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))
(* m (+ (* 1/2 (* K (sin (+ M (* -1/2 (* K n)))))) (/ (cos (+ M (* -1/2 (* K n)))) m)))
(*.f64 m (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) m)))
(* m (+ (* 1/2 (* K (sin (+ M (* -1/2 (* K n)))))) (/ (cos (+ M (* -1/2 (* K n)))) m)))
(*.f64 m (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) m)))
(* m (+ (* 1/2 (* K (sin (+ M (* -1/2 (* K n)))))) (/ (cos (+ M (* -1/2 (* K n)))) m)))
(*.f64 m (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) m)))
(* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n)))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))
(* -1 (* m (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) m)) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(*.f64 (-.f64 #s(literal 0 binary64) m) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) m)))
(* -1 (* m (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) m)) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(*.f64 (-.f64 #s(literal 0 binary64) m) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) m)))
(* -1 (* m (+ (* -1 (/ (cos (+ M (* -1/2 (* K n)))) m)) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(*.f64 (-.f64 #s(literal 0 binary64) m) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) m)))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(+ (cos (* -1/2 (* K n))) (* -1 (* M (sin (* -1/2 (* K n))))))
(-.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (*.f64 M (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(+ (cos (* -1/2 (* K n))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K n))))) (sin (* -1/2 (* K n))))))
(+.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (*.f64 M (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) M) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))
(+ (cos (* -1/2 (* K n))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K n)))) (* 1/6 (* M (sin (* -1/2 (* K n))))))) (sin (* -1/2 (* K n))))))
(+.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (*.f64 M (-.f64 (*.f64 M (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 (*.f64 #s(literal 1/6 binary64) M) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos M)
(cos.f64 M)
(+ (cos M) (* 1/2 (* K (* n (sin M)))))
(+.f64 (cos.f64 M) (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 n (sin.f64 M))))
(+ (cos M) (* K (- (* -1/8 (* K (* (pow n 2) (cos M)))) (* -1/2 (* n (sin M))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) K) (*.f64 (*.f64 n n) (cos.f64 M))) (*.f64 #s(literal 1/2 binary64) (*.f64 n (sin.f64 M))))))
(+ (cos M) (* K (- (* K (+ (* -1/8 (* (pow n 2) (cos M))) (* -1/48 (* K (* (pow n 3) (sin M)))))) (* -1/2 (* n (sin M))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 K (+.f64 (*.f64 (*.f64 (*.f64 n n) #s(literal -1/8 binary64)) (cos.f64 M)) (*.f64 (*.f64 #s(literal -1/48 binary64) K) (*.f64 (*.f64 n (*.f64 n n)) (sin.f64 M))))) (*.f64 #s(literal 1/2 binary64) (*.f64 n (sin.f64 M))))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos M)
(cos.f64 M)
(+ (cos M) (* 1/2 (* K (* n (sin M)))))
(+.f64 (cos.f64 M) (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 n (sin.f64 M))))
(+ (cos M) (* n (- (* -1/8 (* (pow K 2) (* n (cos M)))) (* -1/2 (* K (sin M))))))
(+.f64 (cos.f64 M) (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 n (cos.f64 M))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 M))))))
(+ (cos M) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos M))) (* -1/48 (* (pow K 3) (* n (sin M)))))) (* -1/2 (* K (sin M))))))
(+.f64 (cos.f64 M) (*.f64 n (+.f64 (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 M)) (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 K (*.f64 K K)) (*.f64 n (sin.f64 M)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 M))))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
M
(* M (+ 1 (* -1/2 (/ (* K n) M))))
(*.f64 M (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)) M)))
(* M (+ 1 (* -1/2 (/ (* K n) M))))
(*.f64 M (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)) M)))
(* M (+ 1 (* -1/2 (/ (* K n) M))))
(*.f64 M (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)) M)))
M
(* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) M) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M) #s(literal -1 binary64)))
(* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) M) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M) #s(literal -1 binary64)))
(* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) M) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M) #s(literal -1 binary64)))
M
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* K (+ (* -1/2 n) (/ M K)))
(*.f64 K (+.f64 (*.f64 n #s(literal -1/2 binary64)) (/.f64 M K)))
(* K (+ (* -1/2 n) (/ M K)))
(*.f64 K (+.f64 (*.f64 n #s(literal -1/2 binary64)) (/.f64 M K)))
(* K (+ (* -1/2 n) (/ M K)))
(*.f64 K (+.f64 (*.f64 n #s(literal -1/2 binary64)) (/.f64 M K)))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))
(*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) (/.f64 M K)) (neg.f64 K))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))
(*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) (/.f64 M K)) (neg.f64 K))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))
(*.f64 (-.f64 (*.f64 n #s(literal 1/2 binary64)) (/.f64 M K)) (neg.f64 K))
M
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* n (+ (* -1/2 K) (/ M n)))
(*.f64 n (+.f64 (*.f64 #s(literal -1/2 binary64) K) (/.f64 M n)))
(* n (+ (* -1/2 K) (/ M n)))
(*.f64 n (+.f64 (*.f64 #s(literal -1/2 binary64) K) (/.f64 M n)))
(* n (+ (* -1/2 K) (/ M n)))
(*.f64 n (+.f64 (*.f64 #s(literal -1/2 binary64) K) (/.f64 M n)))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))
(*.f64 (-.f64 #s(literal 0 binary64) n) (-.f64 (*.f64 #s(literal 1/2 binary64) K) (/.f64 M n)))
(* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))
(*.f64 (-.f64 #s(literal 0 binary64) n) (-.f64 (*.f64 #s(literal 1/2 binary64) K) (/.f64 M n)))
(* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))
(*.f64 (-.f64 #s(literal 0 binary64) n) (-.f64 (*.f64 #s(literal 1/2 binary64) K) (/.f64 M n)))
(pow n 2)
(*.f64 n n)
(+ (* 2 (* m n)) (pow n 2))
(*.f64 n (+.f64 n (*.f64 m #s(literal 2 binary64))))
(+ (* m (+ m (* 2 n))) (pow n 2))
(+.f64 (*.f64 n n) (*.f64 m (+.f64 m (*.f64 n #s(literal 2 binary64)))))
(+ (* m (+ m (* 2 n))) (pow n 2))
(+.f64 (*.f64 n n) (*.f64 m (+.f64 m (*.f64 n #s(literal 2 binary64)))))
(pow m 2)
(*.f64 m m)
(* (pow m 2) (+ 1 (* 2 (/ n m))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 n #s(literal 2 binary64)) m)))
(* (pow m 2) (+ 1 (+ (* 2 (/ n m)) (/ (pow n 2) (pow m 2)))))
(*.f64 (*.f64 m m) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 n #s(literal 2 binary64)) m)) (/.f64 (*.f64 n n) (*.f64 m m))))
(* (pow m 2) (+ 1 (+ (* 2 (/ n m)) (/ (pow n 2) (pow m 2)))))
(*.f64 (*.f64 m m) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 n #s(literal 2 binary64)) m)) (/.f64 (*.f64 n n) (*.f64 m m))))
(pow m 2)
(*.f64 m m)
(* (pow m 2) (+ 1 (* 2 (/ n m))))
(*.f64 (*.f64 m m) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 n #s(literal 2 binary64)) m)))
(* (pow m 2) (+ 1 (* -1 (/ (+ (* -2 n) (* -1 (/ (pow n 2) m))) m))))
(*.f64 (*.f64 m m) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 n #s(literal -2 binary64)) (/.f64 (*.f64 n n) m)) m)))
(* (pow m 2) (+ 1 (* -1 (/ (+ (* -2 n) (* -1 (/ (pow n 2) m))) m))))
(*.f64 (*.f64 m m) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 n #s(literal -2 binary64)) (/.f64 (*.f64 n n) m)) m)))
(pow m 2)
(*.f64 m m)
(+ (* 2 (* m n)) (pow m 2))
(+.f64 (*.f64 m m) (*.f64 #s(literal 2 binary64) (*.f64 n m)))
(+ (* n (+ n (* 2 m))) (pow m 2))
(+.f64 (*.f64 m m) (*.f64 n (+.f64 n (*.f64 m #s(literal 2 binary64)))))
(+ (* n (+ n (* 2 m))) (pow m 2))
(+.f64 (*.f64 m m) (*.f64 n (+.f64 n (*.f64 m #s(literal 2 binary64)))))
(pow n 2)
(*.f64 n n)
(* (pow n 2) (+ 1 (* 2 (/ m n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 m n))))
(* (pow n 2) (+ 1 (+ (* 2 (/ m n)) (/ (pow m 2) (pow n 2)))))
(*.f64 (*.f64 n n) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 m n))) (/.f64 (*.f64 m m) (*.f64 n n))))
(* (pow n 2) (+ 1 (+ (* 2 (/ m n)) (/ (pow m 2) (pow n 2)))))
(*.f64 (*.f64 n n) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 m n))) (/.f64 (*.f64 m m) (*.f64 n n))))
(pow n 2)
(*.f64 n n)
(* (pow n 2) (+ 1 (* 2 (/ m n))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 m n))))
(* (pow n 2) (+ 1 (* -1 (/ (+ (* -2 m) (* -1 (/ (pow m 2) n))) n))))
(*.f64 (*.f64 n n) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 m #s(literal -2 binary64)) (/.f64 (*.f64 m m) n)) n)))
(* (pow n 2) (+ 1 (* -1 (/ (+ (* -2 m) (* -1 (/ (pow m 2) n))) n))))
(*.f64 (*.f64 n n) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 m #s(literal -2 binary64)) (/.f64 (*.f64 m m) n)) n)))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (neg (+ m (* -1 n))))
(fabs.f64 (-.f64 n m))
(fabs (neg (+ m (* -1 n))))
(fabs.f64 (-.f64 n m))
(fabs (neg (+ m (* -1 n))))
(fabs.f64 (-.f64 n m))
(fabs (neg (+ m (* -1 n))))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (+ n (* -1 m)))
(fabs.f64 (-.f64 n m))
(fabs (+ n (* -1 m)))
(fabs.f64 (-.f64 n m))
(fabs (+ n (* -1 m)))
(fabs.f64 (-.f64 n m))
(fabs (+ n (* -1 m)))
(fabs.f64 (-.f64 n m))
(cos (* -1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))
(+ (cos (* -1/2 (* K (+ m n)))) (* -1 (* M (sin (* -1/2 (* K (+ m n)))))))
(-.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (*.f64 M (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))
(+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K (+ m n)))))) (sin (* -1/2 (* K (+ m n)))))))
(+.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (*.f64 M (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) M) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))))
(+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* 1/6 (* M (sin (* -1/2 (* K (+ m n)))))))) (sin (* -1/2 (* K (+ m n)))))))
(+.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (*.f64 M (-.f64 (*.f64 M (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))) (*.f64 (*.f64 #s(literal 1/6 binary64) M) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K)))))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos M)
(cos.f64 M)
(+ (cos M) (* 1/2 (* K (* (sin M) (+ m n)))))
(+.f64 (cos.f64 M) (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 (+.f64 n m) (sin.f64 M))))
(+ (cos M) (* K (- (* -1/8 (* K (* (cos M) (pow (+ m n) 2)))) (* -1/2 (* (sin M) (+ m n))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (cos.f64 M) K) (*.f64 (+.f64 n m) (+.f64 n m)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (sin.f64 M))))))
(+ (cos M) (* K (- (* K (+ (* -1/8 (* (cos M) (pow (+ m n) 2))) (* -1/48 (* K (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 M)) (*.f64 (+.f64 n m) (+.f64 n m))) (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 K (sin.f64 M)) (*.f64 (+.f64 n m) (*.f64 (+.f64 n m) (+.f64 n m))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 n m) (sin.f64 M))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* -1/8 (* (pow K 2) (* m (cos (+ M (* -1/2 (* K n))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 m (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) m) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/48 (* (pow K 3) (* m (sin (+ M (* -1/2 (* K n))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 m (+.f64 (*.f64 m (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 K K))) (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) m) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K m))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))
(+ (cos (+ M (* -1/2 (* K m)))) (* 1/2 (* K (* n (sin (+ M (* -1/2 (* K m))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 n K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))))
(+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* -1/8 (* (pow K 2) (* n (cos (+ M (* -1/2 (* K m))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (*.f64 n (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) n) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))))))
(+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/48 (* (pow K 3) (* n (sin (+ M (* -1/2 (* K m))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (*.f64 n (+.f64 (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) n) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K (+ m n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K m))
(*.f64 #s(literal -1/2 binary64) (*.f64 m K))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(*.f64 m (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(*.f64 m (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* m (+ (* -1/2 K) (* -1/2 (/ (* K n) m))))
(*.f64 m (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* -1/2 (* K m))
(*.f64 #s(literal -1/2 binary64) (*.f64 m K))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(*.f64 (-.f64 #s(literal 0 binary64) m) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(*.f64 (-.f64 #s(literal 0 binary64) m) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* -1 (* m (+ (* 1/2 K) (* 1/2 (/ (* K n) m)))))
(*.f64 (-.f64 #s(literal 0 binary64) m) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 n K) m))))
(* -1/2 (* K m))
(*.f64 #s(literal -1/2 binary64) (*.f64 m K))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(+ (* -1/2 (* K m)) (* -1/2 (* K n)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(*.f64 n (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(*.f64 n (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(* n (+ (* -1/2 K) (* -1/2 (/ (* K m) n))))
(*.f64 n (*.f64 #s(literal -1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(* -1/2 (* K n))
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(*.f64 (-.f64 #s(literal 0 binary64) n) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(*.f64 (-.f64 #s(literal 0 binary64) n) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(* -1 (* n (+ (* 1/2 K) (* 1/2 (/ (* K m) n)))))
(*.f64 (-.f64 #s(literal 0 binary64) n) (*.f64 #s(literal 1/2 binary64) (+.f64 K (/.f64 (*.f64 m K) n))))
(exp (- (* 1/4 (pow n 2)) (fabs (- n m))))
(exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))
(+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))
(*.f64 (+.f64 l #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* 1/2 (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))) (*.f64 l (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))) (*.f64 (*.f64 l #s(literal 1/2 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))))
(+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (+ (* 1/6 (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))) (*.f64 l (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))) (*.f64 l (+.f64 (*.f64 (*.f64 l #s(literal 1/6 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))
(exp.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l))
(exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))
(exp.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l))
(exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))
(exp.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l))
(exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))
(exp.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l))
(exp (- l (fabs (- n m))))
(exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))
(+ (exp (- l (fabs (- n m)))) (* 1/4 (* (pow n 2) (exp (- l (fabs (- n m)))))))
(+.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))
(+ (exp (- l (fabs (- n m)))) (* (pow n 2) (+ (* 1/32 (* (pow n 2) (exp (- l (fabs (- n m)))))) (* 1/4 (exp (- l (fabs (- n m))))))))
(+.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (*.f64 (*.f64 n n) (+.f64 (*.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 n n)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 #s(literal 1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))))
(+ (exp (- l (fabs (- n m)))) (* (pow n 2) (+ (* 1/4 (exp (- l (fabs (- n m))))) (* (pow n 2) (+ (* 1/384 (* (pow n 2) (exp (- l (fabs (- n m)))))) (* 1/32 (exp (- l (fabs (- n m))))))))))
(+.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (*.f64 (*.f64 n n) (+.f64 (*.f64 #s(literal 1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 (*.f64 n n) (+.f64 (*.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 n n)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 #s(literal 1/32 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(sin (* -1/2 (* K n)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
(+ (sin (* -1/2 (* K n))) (* M (cos (* -1/2 (* K n)))))
(+.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (*.f64 M (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(+ (sin (* -1/2 (* K n))) (* M (+ (cos (* -1/2 (* K n))) (* -1/2 (* M (sin (* -1/2 (* K n))))))))
(+.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (*.f64 M (+.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (*.f64 (*.f64 #s(literal -1/2 binary64) M) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(+ (sin (* -1/2 (* K n))) (* M (+ (cos (* -1/2 (* K n))) (* M (+ (* -1/2 (sin (* -1/2 (* K n)))) (* -1/6 (* M (cos (* -1/2 (* K n))))))))))
(+.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (*.f64 M (+.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))) (*.f64 M (+.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 (*.f64 #s(literal -1/6 binary64) M) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))))
(sin (+ M (* -1/2 (* K n))))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin (+ M (* -1/2 (* K n))))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin (+ M (* -1/2 (* K n))))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin (+ M (* -1/2 (* K n))))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin (- (* -1/2 (* K n)) (* -1 M)))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin (- (* -1/2 (* K n)) (* -1 M)))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin (- (* -1/2 (* K n)) (* -1 M)))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin (- (* -1/2 (* K n)) (* -1 M)))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin M)
(sin.f64 M)
(+ (sin M) (* -1/2 (* K (* n (cos M)))))
(+.f64 (sin.f64 M) (*.f64 #s(literal -1/2 binary64) (*.f64 K (*.f64 n (cos.f64 M)))))
(+ (sin M) (* K (+ (* -1/2 (* n (cos M))) (* -1/8 (* K (* (pow n 2) (sin M)))))))
(+.f64 (sin.f64 M) (*.f64 K (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n (cos.f64 M))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K (*.f64 n n)) (sin.f64 M))))))
(+ (sin M) (* K (+ (* -1/2 (* n (cos M))) (* K (+ (* -1/8 (* (pow n 2) (sin M))) (* 1/48 (* K (* (pow n 3) (cos M)))))))))
(+.f64 (sin.f64 M) (*.f64 K (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n (cos.f64 M))) (*.f64 K (+.f64 (*.f64 (*.f64 (*.f64 n n) #s(literal -1/8 binary64)) (sin.f64 M)) (*.f64 (*.f64 #s(literal 1/48 binary64) K) (*.f64 (*.f64 n (*.f64 n n)) (cos.f64 M))))))))
(sin (+ M (* -1/2 (* K n))))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin (+ M (* -1/2 (* K n))))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin (+ M (* -1/2 (* K n))))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin (+ M (* -1/2 (* K n))))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin (+ M (* -1/2 (* K n))))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin (+ M (* -1/2 (* K n))))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin (+ M (* -1/2 (* K n))))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin (+ M (* -1/2 (* K n))))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin M)
(sin.f64 M)
(+ (sin M) (* -1/2 (* K (* n (cos M)))))
(+.f64 (sin.f64 M) (*.f64 #s(literal -1/2 binary64) (*.f64 K (*.f64 n (cos.f64 M)))))
(+ (sin M) (* n (+ (* -1/2 (* K (cos M))) (* -1/8 (* (pow K 2) (* n (sin M)))))))
(+.f64 (sin.f64 M) (*.f64 n (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 M) K)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 n (sin.f64 M))))))
(+ (sin M) (* n (+ (* -1/2 (* K (cos M))) (* n (+ (* -1/8 (* (pow K 2) (sin M))) (* 1/48 (* (pow K 3) (* n (cos M)))))))))
(+.f64 (sin.f64 M) (*.f64 n (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 M) K)) (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (sin.f64 M)) (*.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 K (*.f64 K K)) (*.f64 n (cos.f64 M)))))))))
(sin (+ M (* -1/2 (* K n))))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin (+ M (* -1/2 (* K n))))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin (+ M (* -1/2 (* K n))))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin (+ M (* -1/2 (* K n))))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin (+ M (* -1/2 (* K n))))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin (+ M (* -1/2 (* K n))))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin (+ M (* -1/2 (* K n))))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(sin (+ M (* -1/2 (* K n))))
(sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin M)))
(*.f64 (*.f64 m K) (sin.f64 M))
(* K (+ (* -1/2 (* K (* m (* n (cos M))))) (* m (sin M))))
(*.f64 K (+.f64 (*.f64 m (sin.f64 M)) (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 m (*.f64 n (cos.f64 M))))))
(* K (+ (* K (+ (* -1/2 (* m (* n (cos M)))) (* -1/8 (* K (* m (* (pow n 2) (sin M))))))) (* m (sin M))))
(*.f64 K (+.f64 (*.f64 m (sin.f64 M)) (*.f64 K (+.f64 (*.f64 (*.f64 m #s(literal -1/2 binary64)) (*.f64 n (cos.f64 M))) (*.f64 (*.f64 #s(literal -1/8 binary64) K) (*.f64 (*.f64 m (*.f64 n n)) (sin.f64 M)))))))
(* K (+ (* K (+ (* -1/2 (* m (* n (cos M)))) (* K (+ (* -1/8 (* m (* (pow n 2) (sin M)))) (* 1/48 (* K (* m (* (pow n 3) (cos M))))))))) (* m (sin M))))
(*.f64 K (+.f64 (*.f64 m (sin.f64 M)) (*.f64 K (+.f64 (*.f64 (*.f64 m #s(literal -1/2 binary64)) (*.f64 n (cos.f64 M))) (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) m) (*.f64 (*.f64 n n) (sin.f64 M))) (*.f64 (*.f64 #s(literal 1/48 binary64) K) (*.f64 (*.f64 m (*.f64 n (*.f64 n n))) (cos.f64 M)))))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (* -1/2 (* K n)))))
(*.f64 (*.f64 m K) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(+ (* K (* M (* m (cos (* -1/2 (* K n)))))) (* K (* m (sin (* -1/2 (* K n))))))
(*.f64 K (+.f64 (*.f64 (*.f64 M m) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 m (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))
(+ (* K (* m (sin (* -1/2 (* K n))))) (* M (+ (* -1/2 (* K (* M (* m (sin (* -1/2 (* K n))))))) (* K (* m (cos (* -1/2 (* K n))))))))
(+.f64 (*.f64 (*.f64 m K) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 M (+.f64 (*.f64 (*.f64 m K) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 (*.f64 #s(literal -1/2 binary64) K) (*.f64 (*.f64 M m) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))))
(+ (* K (* m (sin (* -1/2 (* K n))))) (* M (+ (* K (* m (cos (* -1/2 (* K n))))) (* M (+ (* -1/2 (* K (* m (sin (* -1/2 (* K n)))))) (* -1/6 (* K (* M (* m (cos (* -1/2 (* K n))))))))))))
(+.f64 (*.f64 (*.f64 m K) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 M (+.f64 (*.f64 (*.f64 m K) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 M (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))) (*.f64 (*.f64 #s(literal -1/6 binary64) K) (*.f64 (*.f64 M m) (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (- (* -1/2 (* K n)) (* -1 M)))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin M)))
(*.f64 (*.f64 m K) (sin.f64 M))
(+ (* -1/2 (* (pow K 2) (* m (* n (cos M))))) (* K (* m (sin M))))
(+.f64 (*.f64 (*.f64 m K) (sin.f64 M)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 K K)) (*.f64 m (*.f64 n (cos.f64 M)))))
(+ (* K (* m (sin M))) (* n (+ (* -1/2 (* (pow K 2) (* m (cos M)))) (* -1/8 (* (pow K 3) (* m (* n (sin M))))))))
(+.f64 (*.f64 (*.f64 m K) (sin.f64 M)) (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 K K)) (*.f64 m (cos.f64 M))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K (*.f64 K K)) (*.f64 m (*.f64 n (sin.f64 M))))))))
(+ (* K (* m (sin M))) (* n (+ (* -1/2 (* (pow K 2) (* m (cos M)))) (* n (+ (* -1/8 (* (pow K 3) (* m (sin M)))) (* 1/48 (* (pow K 4) (* m (* n (cos M))))))))))
(+.f64 (*.f64 (*.f64 m K) (sin.f64 M)) (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 K K)) (*.f64 m (cos.f64 M))) (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K (*.f64 K K))) (*.f64 m (sin.f64 M))) (*.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 K #s(literal 4 binary64))) (*.f64 m (*.f64 n (cos.f64 M)))))))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
(* K (* m (sin (+ M (* -1/2 (* K n))))))
(*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))

eval365.0ms (2%)

Compiler

Compiled 56216 to 4327 computations (92.3% saved)

prune329.0ms (1.8%)

Pruning

30 alts after pruning (30 fresh and 0 done)

PrunedKeptTotal
New1857221879
Fresh13821
Picked505
Done000
Total1875301905
Accuracy
98.4%
Counts
1905 → 30
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶77.2%
(/.f64 (fma.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
30.8%
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M))) (exp.f64 l))
49.8%
(/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
41.0%
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
38.8%
(/.f64 (cos.f64 (+.f64 M (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1 binary64))))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
26.3%
(/.f64 (cos.f64 (+.f64 M (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1 binary64))))) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
31.7%
(/.f64 (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
5.8%
(/.f64 (cos.f64 M) (+.f64 l #s(literal 1 binary64)))
34.7%
(/.f64 (cos.f64 M) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1/2 binary64) (*.f64 l #s(literal 1/6 binary64))))))))
30.3%
(/.f64 (cos.f64 M) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l #s(literal 1/2 binary64))))))
31.9%
(/.f64 (cos.f64 M) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 l))))
55.5%
(/.f64 (cos.f64 M) (exp.f64 (*.f64 M M)))
22.7%
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
▶45.6%
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
38.8%
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1 binary64)))))))
36.7%
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
40.4%
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))))
40.5%
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))
21.5%
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1 binary64)))))))
4.2%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
▶4.5%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))
4.0%
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
45.0%
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 #s(literal 1/4 binary64) (*.f64 n n)))))
56.1%
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))
▶23.6%
(exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 l (fabs.f64 (-.f64 n m)))))
49.4%
(exp.f64 (*.f64 (*.f64 n n) #s(literal -1/4 binary64)))
54.7%
(exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m)))
34.3%
(exp.f64 (neg.f64 l))
4.5%
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
▶4.8%
(cos.f64 M)
Compiler

Compiled 1366 to 946 computations (30.7% saved)

simplify457.0ms (2.6%)

Algorithm
1×egg-herbie
Localize:

Found 17 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))
✓cost-diff0
(exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m))))
✓cost-diff0
(/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64)))))
✓cost-diff128
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
✓cost-diff0
(fabs.f64 (-.f64 n m))
✓cost-diff0
(-.f64 l (fabs.f64 (-.f64 n m)))
✓cost-diff0
(exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 l (fabs.f64 (-.f64 n m)))))
✓cost-diff128
(-.f64 #s(literal 0 binary64) (-.f64 l (fabs.f64 (-.f64 n m))))
✓cost-diff0
(+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))
✓cost-diff0
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
✓cost-diff0
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
✓cost-diff256
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))
✓cost-diff0
(cos.f64 M)
✓cost-diff0
(cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))
✓cost-diff0
(-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
✓cost-diff0
(/.f64 (fma.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
✓cost-diff6272
(fma.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
Rules
2194×*-lowering-*.f32
2194×*-lowering-*.f64
1824×fma-lowering-fma.f32
1824×fma-lowering-fma.f64
1604×+-lowering-+.f64
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
057452
1126433
2255424
3626424
41938424
55926424
08299424
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(/ (+ (* (- (cos (+ M (* K (/ (+ m n) -2)))) (cos (+ M (/ K (/ 2 (+ m n)))))) 1/2) (* (cos M) (cos (/ K (/ 2 (+ m n)))))) (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))))
(+ (* (- (cos (+ M (* K (/ (+ m n) -2)))) (cos (+ M (/ K (/ 2 (+ m n)))))) 1/2) (* (cos M) (cos (/ K (/ 2 (+ m n))))))
(- (cos (+ M (* K (/ (+ m n) -2)))) (cos (+ M (/ K (/ 2 (+ m n))))))
(cos (+ M (* K (/ (+ m n) -2))))
(+ M (* K (/ (+ m n) -2)))
M
(* K (/ (+ m n) -2))
K
(/ (+ m n) -2)
(+ m n)
m
n
-2
(cos (+ M (/ K (/ 2 (+ m n)))))
(+ M (/ K (/ 2 (+ m n))))
(/ K (/ 2 (+ m n)))
(/ 2 (+ m n))
2
1/2
(* (cos M) (cos (/ K (/ 2 (+ m n)))))
(cos M)
(cos (/ K (/ 2 (+ m n))))
(exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n)))))
(+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))
(* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M))
(- (/ (+ m n) 2) M)
(/ (+ m n) 2)
(- l (fabs (- m n)))
l
(fabs (- m n))
(- m n)
(cos M)
M
(/ 1 (/ 1 (cos (+ M (* -1/2 (* n K))))))
1
(/ 1 (cos (+ M (* -1/2 (* n K)))))
(cos (+ M (* -1/2 (* n K))))
(+ M (* -1/2 (* n K)))
M
(* -1/2 (* n K))
-1/2
(* n K)
n
K
(exp (- 0 (- l (fabs (- n m)))))
(- 0 (- l (fabs (- n m))))
0
(- l (fabs (- n m)))
l
(fabs (- n m))
(- n m)
n
m
(/ 1 (/ (exp (- (+ l (* n (* 1/4 n))) (fabs (- n m)))) (cos (* n (* K -1/2)))))
1
(/ (exp (- (+ l (* n (* 1/4 n))) (fabs (- n m)))) (cos (* n (* K -1/2))))
(exp (- (+ l (* n (* 1/4 n))) (fabs (- n m))))
(- (+ l (* n (* 1/4 n))) (fabs (- n m)))
(+ l (* n (* 1/4 n)))
l
(* n (* 1/4 n))
n
(* 1/4 n)
1/4
(fabs (- n m))
(- n m)
m
(cos (* n (* K -1/2)))
(* n (* K -1/2))
(* K -1/2)
K
-1/2
Outputs
(/ (+ (* (- (cos (+ M (* K (/ (+ m n) -2)))) (cos (+ M (/ K (/ 2 (+ m n)))))) 1/2) (* (cos M) (cos (/ K (/ 2 (+ m n)))))) (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))))
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal 2 binary64)))))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal 2 binary64)))))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) l) (fabs.f64 (-.f64 m n)))))
(+ (* (- (cos (+ M (* K (/ (+ m n) -2)))) (cos (+ M (/ K (/ 2 (+ m n)))))) 1/2) (* (cos M) (cos (/ K (/ 2 (+ m n))))))
(+.f64 (*.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal 2 binary64)))))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal 2 binary64))))))
(- (cos (+ M (* K (/ (+ m n) -2)))) (cos (+ M (/ K (/ 2 (+ m n))))))
(-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal 2 binary64))))))
(cos (+ M (* K (/ (+ m n) -2))))
(cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))
(+ M (* K (/ (+ m n) -2)))
(+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))
M
(* K (/ (+ m n) -2))
(*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))
K
(/ (+ m n) -2)
(/.f64 (+.f64 m n) #s(literal -2 binary64))
(+ m n)
(+.f64 m n)
m
n
-2
#s(literal -2 binary64)
(cos (+ M (/ K (/ 2 (+ m n)))))
(cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal 2 binary64)))))
(+ M (/ K (/ 2 (+ m n))))
(+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal 2 binary64))))
(/ K (/ 2 (+ m n)))
(*.f64 K (/.f64 (+.f64 m n) #s(literal 2 binary64)))
(/ 2 (+ m n))
(/.f64 #s(literal 2 binary64) (+.f64 m n))
2
#s(literal 2 binary64)
1/2
#s(literal 1/2 binary64)
(* (cos M) (cos (/ K (/ 2 (+ m n)))))
(*.f64 (cos.f64 M) (cos.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal 2 binary64)))))
(cos M)
(cos.f64 M)
(cos (/ K (/ 2 (+ m n))))
(cos.f64 (*.f64 K (/.f64 (+.f64 m n) #s(literal 2 binary64))))
(exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n)))))
(exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) l) (fabs.f64 (-.f64 m n))))
(+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))
(-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) l) (fabs.f64 (-.f64 m n)))
(* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M))
(*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))
(- (/ (+ m n) 2) M)
(-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)
(/ (+ m n) 2)
(/.f64 (+.f64 m n) #s(literal 2 binary64))
(- l (fabs (- m n)))
(-.f64 l (fabs.f64 (-.f64 m n)))
l
(fabs (- m n))
(fabs.f64 (-.f64 m n))
(- m n)
(-.f64 m n)
(cos M)
(cos.f64 M)
M
(/ 1 (/ 1 (cos (+ M (* -1/2 (* n K))))))
(cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))
1
#s(literal 1 binary64)
(/ 1 (cos (+ M (* -1/2 (* n K)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(cos (+ M (* -1/2 (* n K))))
(cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))
(+ M (* -1/2 (* n K)))
(+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))
M
(* -1/2 (* n K))
(*.f64 K (*.f64 n #s(literal -1/2 binary64)))
-1/2
#s(literal -1/2 binary64)
(* n K)
(*.f64 K n)
n
K
(exp (- 0 (- l (fabs (- n m)))))
(exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l))
(- 0 (- l (fabs (- n m))))
(-.f64 (fabs.f64 (-.f64 m n)) l)
0
#s(literal 0 binary64)
(- l (fabs (- n m)))
(-.f64 l (fabs.f64 (-.f64 m n)))
l
(fabs (- n m))
(fabs.f64 (-.f64 m n))
(- n m)
(-.f64 n m)
n
m
(/ 1 (/ (exp (- (+ l (* n (* 1/4 n))) (fabs (- n m)))) (cos (* n (* K -1/2)))))
(/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 n (*.f64 n #s(literal 1/4 binary64))))))
1
#s(literal 1 binary64)
(/ (exp (- (+ l (* n (* 1/4 n))) (fabs (- n m)))) (cos (* n (* K -1/2))))
(/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))
(exp (- (+ l (* n (* 1/4 n))) (fabs (- n m))))
(exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))
(- (+ l (* n (* 1/4 n))) (fabs (- n m)))
(+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 n (*.f64 n #s(literal 1/4 binary64))))
(+ l (* n (* 1/4 n)))
(+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))
l
(* n (* 1/4 n))
(*.f64 n (*.f64 n #s(literal 1/4 binary64)))
n
(* 1/4 n)
(*.f64 n #s(literal 1/4 binary64))
1/4
#s(literal 1/4 binary64)
(fabs (- n m))
(fabs.f64 (-.f64 m n))
(- n m)
(-.f64 n m)
m
(cos (* n (* K -1/2)))
(cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))
(* n (* K -1/2))
(*.f64 K (*.f64 n #s(literal -1/2 binary64)))
(* K -1/2)
(*.f64 K #s(literal -1/2 binary64))
K
-1/2
#s(literal -1/2 binary64)

localize763.0ms (4.3%)

Localize:

Found 17 expressions of interest:

NewMetricScoreProgram
✓accuracy100.0%
(fabs.f64 (-.f64 n m))
✓accuracy100.0%
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
✓accuracy100.0%
(exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m))))
✓accuracy68.2%
(cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))
✓accuracy100.0%
(-.f64 l (fabs.f64 (-.f64 n m)))
✓accuracy100.0%
(-.f64 #s(literal 0 binary64) (-.f64 l (fabs.f64 (-.f64 n m))))
✓accuracy100.0%
(fabs.f64 (-.f64 n m))
✓accuracy100.0%
(exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 l (fabs.f64 (-.f64 n m)))))
✓accuracy100.0%
(*.f64 #s(literal -1/2 binary64) (*.f64 n K))
✓accuracy99.8%
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))
✓accuracy99.7%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))
✓accuracy67.8%
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
✓accuracy100.0%
(cos.f64 M)
✓accuracy70.3%
(-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
✓accuracy65.2%
(cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))
✓accuracy64.3%
(cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))
✓accuracy64.3%
(cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))
Results
266.0ms104×1valid
160.0ms55×2valid
86.0ms9×5exit
69.0ms69×0unsamplable
37.0ms19×1unsamplable
Compiler

Compiled 495 to 57 computations (88.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 301.0ms
ival-cos: 106.0ms (35.2% of total)
backward-pass: 48.0ms (15.9% of total)
ival-mult: 39.0ms (12.9% of total)
ival-add: 33.0ms (11% of total)
ival-div: 32.0ms (10.6% of total)
ival-sub: 18.0ms (6% of total)
compiled-spec: 11.0ms (3.7% of total)
ival-exp: 9.0ms (3% of total)
ival-fabs: 5.0ms (1.7% of total)
const: 2.0ms (0.7% of total)

series110.0ms (0.6%)

Counts
21 → 792
Calls
Call 1
Inputs
#<alt (+ (* (- (cos (+ M (* K (/ (+ m n) -2)))) (cos (+ M (/ K (/ 2 (+ m n)))))) 1/2) (* (cos M) (cos (/ K (/ 2 (+ m n))))))>
#<alt (/ (+ (* (- (cos (+ M (* K (/ (+ m n) -2)))) (cos (+ M (/ K (/ 2 (+ m n)))))) 1/2) (* (cos M) (cos (/ K (/ 2 (+ m n)))))) (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))))>
#<alt (- (cos (+ M (* K (/ (+ m n) -2)))) (cos (+ M (/ K (/ 2 (+ m n))))))>
#<alt (cos (+ M (* K (/ (+ m n) -2))))>
#<alt (cos M)>
#<alt (/ 1 (/ 1 (cos (+ M (* -1/2 (* n K))))))>
#<alt (/ 1 (cos (+ M (* -1/2 (* n K)))))>
#<alt (cos (+ M (* -1/2 (* n K))))>
#<alt (+ M (* -1/2 (* n K)))>
#<alt (- 0 (- l (fabs (- n m))))>
#<alt (exp (- 0 (- l (fabs (- n m)))))>
#<alt (- l (fabs (- n m)))>
#<alt (fabs (- n m))>
#<alt (/ 1 (/ (exp (- (+ l (* n (* 1/4 n))) (fabs (- n m)))) (cos (* n (* K -1/2)))))>
#<alt (/ (exp (- (+ l (* n (* 1/4 n))) (fabs (- n m)))) (cos (* n (* K -1/2))))>
#<alt (exp (- (+ l (* n (* 1/4 n))) (fabs (- n m))))>
#<alt (- (+ l (* n (* 1/4 n))) (fabs (- n m)))>
#<alt (cos (+ M (/ K (/ 2 (+ m n)))))>
#<alt (cos (/ K (/ 2 (+ m n))))>
#<alt (* -1/2 (* n K))>
#<alt (cos (* n (* K -1/2)))>
Outputs
#<alt (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))>
#<alt (+ (cos (* 1/2 (* K (+ m n)))) (+ (* 1/2 (* M (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n))))))))>
#<alt (+ (cos (* 1/2 (* K (+ m n)))) (+ (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))) (* M (+ (* 1/2 (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n)))))) (* M (+ (* -1/2 (cos (* 1/2 (* K (+ m n))))) (* 1/2 (- (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* -1/2 (cos (* 1/2 (* K (+ m n)))))))))))))>
#<alt (+ (cos (* 1/2 (* K (+ m n)))) (+ (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))) (* M (+ (* 1/2 (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n)))))) (* M (+ (* -1/2 (cos (* 1/2 (* K (+ m n))))) (+ (* 1/2 (* M (- (* -1/6 (sin (* 1/2 (* K (+ m n))))) (* -1/6 (sin (* -1/2 (* K (+ m n)))))))) (* 1/2 (- (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* -1/2 (cos (* 1/2 (* K (+ m n))))))))))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (cos M)>
#<alt (+ (cos M) (* 1/2 (* K (- (* 1/2 (* (sin M) (+ m n))) (* -1/2 (* (sin M) (+ m n)))))))>
#<alt (+ (cos M) (* K (+ (* -1/8 (* K (* (cos M) (pow (+ m n) 2)))) (* 1/2 (- (* 1/2 (* (sin M) (+ m n))) (* -1/2 (* (sin M) (+ m n))))))))>
#<alt (+ (cos M) (* K (+ (* 1/2 (- (* 1/2 (* (sin M) (+ m n))) (* -1/2 (* (sin M) (+ m n))))) (* K (+ (* -1/8 (* (cos M) (pow (+ m n) 2))) (* 1/2 (* K (- (* -1/48 (* (sin M) (pow (+ m n) 3))) (* 1/48 (* (sin M) (pow (+ m n) 3)))))))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n)))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (+ (* m (+ (* -1/2 (* K (* (cos M) (sin (* 1/2 (* K n)))))) (* 1/2 (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))) (* (cos M) (cos (* 1/2 (* K n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (+ (* m (+ (* -1/2 (* K (* (cos M) (sin (* 1/2 (* K n)))))) (+ (* 1/2 (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))) (* m (+ (* -1/8 (* (pow K 2) (* (cos M) (cos (* 1/2 (* K n)))))) (* 1/2 (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n))))))))))))) (* (cos M) (cos (* 1/2 (* K n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (+ (* m (+ (* -1/2 (* K (* (cos M) (sin (* 1/2 (* K n)))))) (+ (* 1/2 (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))) (* m (+ (* -1/8 (* (pow K 2) (* (cos M) (cos (* 1/2 (* K n)))))) (+ (* 1/2 (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n)))))))) (* m (+ (* 1/48 (* (pow K 3) (* (cos M) (sin (* 1/2 (* K n)))))) (* 1/2 (- (* -1/48 (* (pow K 3) (sin (+ M (* 1/2 (* K n)))))) (* 1/48 (* (pow K 3) (sin (+ M (* -1/2 (* K n)))))))))))))))) (* (cos M) (cos (* 1/2 (* K n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m)))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m)))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m)))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m)))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m)))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (+ (* n (+ (* -1/2 (* K (* (cos M) (sin (* 1/2 (* K m)))))) (* 1/2 (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))) (* (cos M) (cos (* 1/2 (* K m))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (+ (* n (+ (* -1/2 (* K (* (cos M) (sin (* 1/2 (* K m)))))) (+ (* 1/2 (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))) (* n (+ (* -1/8 (* (pow K 2) (* (cos M) (cos (* 1/2 (* K m)))))) (* 1/2 (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m))))))))))))) (* (cos M) (cos (* 1/2 (* K m))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (+ (* n (+ (* -1/2 (* K (* (cos M) (sin (* 1/2 (* K m)))))) (+ (* 1/2 (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))) (* n (+ (* -1/8 (* (pow K 2) (* (cos M) (cos (* 1/2 (* K m)))))) (+ (* 1/2 (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m)))))))) (* n (+ (* 1/48 (* (pow K 3) (* (cos M) (sin (* 1/2 (* K m)))))) (* 1/2 (- (* -1/48 (* (pow K 3) (sin (+ M (* 1/2 (* K m)))))) (* 1/48 (* (pow K 3) (sin (+ M (* -1/2 (* K m)))))))))))))))) (* (cos M) (cos (* 1/2 (* K m))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n)))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n)))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n)))))))>
#<alt (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n)))))))>
#<alt (/ (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))>
#<alt (+ (* 1/2 (/ (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* M (- (* 1/2 (/ (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (+ m n) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* 1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))>
#<alt (+ (* 1/2 (/ (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* M (- (+ (* 1/2 (/ (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (+ (* -1/2 (/ (cos (* 1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* -1/2 (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))) (+ (* -1 (* (+ m n) (- (* 1/2 (/ (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (+ m n) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (+ 1 (* 1/2 (pow (+ m n) 2))) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (* -1 (/ (* (+ m n) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* 1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))>
#<alt (+ (* 1/2 (/ (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* M (- (+ (* 1/2 (/ (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (+ (* -1/2 (/ (cos (* 1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* 1/2 (/ (- (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* -1/2 (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (* 1/2 (/ (- (* -1/6 (sin (* 1/2 (* K (+ m n))))) (* -1/6 (sin (* -1/2 (* K (+ m n)))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1 (* (+ m n) (- (+ (* -1/2 (/ (cos (* 1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* -1/2 (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))) (+ (* -1 (* (+ m n) (- (* 1/2 (/ (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (+ m n) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (+ 1 (* 1/2 (pow (+ m n) 2))) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (+ (* (+ 1 (* 1/2 (pow (+ m n) 2))) (- (* 1/2 (/ (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (+ m n) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (* (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n))))))) (+ (* -1 (+ m n)) (* -1/6 (pow (+ m n) 3)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))))) (+ (* -1 (* (+ m n) (- (* 1/2 (/ (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (+ m n) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (+ 1 (* 1/2 (pow (+ m n) 2))) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (* -1 (/ (* (+ m n) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* 1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))>
#<alt (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (+ (* 1/2 (/ (* K (- (* 1/2 (* (sin M) (+ m n))) (* -1/2 (* (sin M) (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))))>
#<alt (+ (* K (+ (* -1/8 (/ (* K (* (cos M) (pow (+ m n) 2))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* (sin M) (+ m n))) (* -1/2 (* (sin M) (+ m n)))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))))>
#<alt (+ (* K (+ (* 1/2 (/ (- (* 1/2 (* (sin M) (+ m n))) (* -1/2 (* (sin M) (+ m n)))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (* K (+ (* -1/8 (/ (* (cos M) (pow (+ m n) 2)) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (* K (- (* -1/48 (* (sin M) (pow (+ m n) 3))) (* 1/48 (* (sin M) (pow (+ m n) 3))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))>
#<alt (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* m (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (cos M) (cos (* 1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))>
#<alt (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* m (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* m (- (+ (* -1/8 (/ (* (pow K 2) (* (cos M) (cos (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (+ (* (- (* 1/2 n) M) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n)))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (cos M) (cos (* 1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))>
#<alt (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* m (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* m (- (+ (* -1/8 (/ (* (pow K 2) (* (cos M) (cos (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* 1/2 (/ (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* m (- (+ (* 1/48 (/ (* (pow K 3) (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/48 (* (pow K 3) (sin (+ M (* 1/2 (* K n)))))) (* 1/48 (* (pow K 3) (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (+ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (+ (* (- (* 1/2 n) M) (- (+ (* -1/8 (/ (* (pow K 2) (* (cos M) (cos (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (+ (* (- (* 1/2 n) M) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n)))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))) (/ (* (+ (* 1/6 (pow (- (* 1/2 n) M) 3)) (* 1/4 (- (* 1/2 n) M))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n)))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))))))) (+ (* (- (* 1/2 n) M) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n)))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (cos M) (cos (* 1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m))))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m))))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m))))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m))))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))>
#<alt (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* n (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (cos M) (cos (* 1/2 (* K m)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))>
#<alt (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* n (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* n (- (+ (* -1/8 (/ (* (pow K 2) (* (cos M) (cos (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (+ (* (- (* 1/2 m) M) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m)))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (cos M) (cos (* 1/2 (* K m)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))>
#<alt (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* n (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* n (- (+ (* -1/8 (/ (* (pow K 2) (* (cos M) (cos (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* 1/2 (/ (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* n (- (+ (* 1/48 (/ (* (pow K 3) (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/48 (* (pow K 3) (sin (+ M (* 1/2 (* K m)))))) (* 1/48 (* (pow K 3) (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (+ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (+ (* (- (* 1/2 m) M) (- (+ (* -1/8 (/ (* (pow K 2) (* (cos M) (cos (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (+ (* (- (* 1/2 m) M) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m)))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))) (/ (* (+ (* 1/6 (pow (- (* 1/2 m) M) 3)) (* 1/4 (- (* 1/2 m) M))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m)))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))))))) (+ (* (- (* 1/2 m) M) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m)))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (cos M) (cos (* 1/2 (* K m)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n))))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n))))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n))))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n))))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))>
#<alt (+ (* -1 (* l (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))) (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))>
#<alt (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (+ (* l (- (* -1 (* l (+ (* -1 (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (* 1/2 (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))) (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))>
#<alt (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (* 1/2 (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))) (+ (* -1/2 (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (* 1/6 (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))))) (+ (* -1 (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (* 1/2 (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))) (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))>
#<alt (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))>
#<alt (- (+ (cos (* -1/2 (* K (+ m n)))) (* M (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))))) (cos (* 1/2 (* K (+ m n)))))>
#<alt (- (+ (cos (* -1/2 (* K (+ m n)))) (* M (- (+ (sin (* 1/2 (* K (+ m n)))) (* M (- (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* -1/2 (cos (* 1/2 (* K (+ m n)))))))) (sin (* -1/2 (* K (+ m n))))))) (cos (* 1/2 (* K (+ m n)))))>
#<alt (- (+ (cos (* -1/2 (* K (+ m n)))) (* M (- (+ (sin (* 1/2 (* K (+ m n)))) (* M (- (+ (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* M (- (* -1/6 (sin (* 1/2 (* K (+ m n))))) (* -1/6 (sin (* -1/2 (* K (+ m n)))))))) (* -1/2 (cos (* 1/2 (* K (+ m n)))))))) (sin (* -1/2 (* K (+ m n))))))) (cos (* 1/2 (* K (+ m n)))))>
#<alt (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))>
#<alt (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))>
#<alt (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))>
#<alt (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))>
#<alt (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))>
#<alt (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))>
#<alt (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))>
#<alt (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))>
#<alt (* K (- (* 1/2 (* (sin M) (+ m n))) (* -1/2 (* (sin M) (+ m n)))))>
#<alt (* K (- (+ (* 1/2 (* (sin M) (+ m n))) (* (pow K 2) (- (* -1/48 (* (sin M) (pow (+ m n) 3))) (* 1/48 (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n)))))>
#<alt (* K (- (+ (* 1/2 (* (sin M) (+ m n))) (* (pow K 2) (- (+ (* -1/48 (* (sin M) (pow (+ m n) 3))) (* (pow K 2) (- (* 1/3840 (* (sin M) (pow (+ m n) 5))) (* -1/3840 (* (sin M) (pow (+ m n) 5)))))) (* 1/48 (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n)))))>
#<alt (* K (- (+ (* 1/2 (* (sin M) (+ m n))) (* (pow K 2) (- (+ (* -1/48 (* (sin M) (pow (+ m n) 3))) (* (pow K 2) (- (+ (* 1/3840 (* (sin M) (pow (+ m n) 5))) (* (pow K 2) (- (* -1/645120 (* (sin M) (pow (+ m n) 7))) (* 1/645120 (* (sin M) (pow (+ m n) 7)))))) (* -1/3840 (* (sin M) (pow (+ m n) 5)))))) (* 1/48 (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n)))))>
#<alt (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))>
#<alt (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))>
#<alt (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))>
#<alt (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))>
#<alt (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))>
#<alt (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))>
#<alt (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))>
#<alt (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))>
#<alt (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))>
#<alt (- (+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))))) (cos (+ M (* 1/2 (* K n)))))>
#<alt (- (+ (cos (+ M (* -1/2 (* K n)))) (* m (- (+ (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* m (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))))) (cos (+ M (* 1/2 (* K n)))))>
#<alt (- (+ (cos (+ M (* -1/2 (* K n)))) (* m (- (+ (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* m (- (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* m (- (* -1/48 (* (pow K 3) (sin (+ M (* 1/2 (* K n)))))) (* 1/48 (* (pow K 3) (sin (+ M (* -1/2 (* K n))))))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))))) (cos (+ M (* 1/2 (* K n)))))>
#<alt (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))>
#<alt (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))>
#<alt (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))>
#<alt (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))>
#<alt (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))>
#<alt (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))>
#<alt (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))>
#<alt (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))>
#<alt (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))>
#<alt (- (+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))))) (cos (+ M (* 1/2 (* K m)))))>
#<alt (- (+ (cos (+ M (* -1/2 (* K m)))) (* n (- (+ (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* n (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))))) (cos (+ M (* 1/2 (* K m)))))>
#<alt (- (+ (cos (+ M (* -1/2 (* K m)))) (* n (- (+ (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* n (- (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* n (- (* -1/48 (* (pow K 3) (sin (+ M (* 1/2 (* K m)))))) (* 1/48 (* (pow K 3) (sin (+ M (* -1/2 (* K m))))))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))))) (cos (+ M (* 1/2 (* K m)))))>
#<alt (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))>
#<alt (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))>
#<alt (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))>
#<alt (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))>
#<alt (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))>
#<alt (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))>
#<alt (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))>
#<alt (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))>
#<alt (cos (* -1/2 (* K (+ m n))))>
#<alt (+ (cos (* -1/2 (* K (+ m n)))) (* -1 (* M (sin (* -1/2 (* K (+ m n)))))))>
#<alt (+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K (+ m n)))))) (sin (* -1/2 (* K (+ m n)))))))>
#<alt (+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* 1/6 (* M (sin (* -1/2 (* K (+ m n)))))))) (sin (* -1/2 (* K (+ m n)))))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (- (* -1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos M)>
#<alt (+ (cos M) (* 1/2 (* K (* (sin M) (+ m n)))))>
#<alt (+ (cos M) (* K (- (* -1/8 (* K (* (cos M) (pow (+ m n) 2)))) (* -1/2 (* (sin M) (+ m n))))))>
#<alt (+ (cos M) (* K (- (* K (+ (* -1/8 (* (cos M) (pow (+ m n) 2))) (* -1/48 (* K (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n))))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* -1/8 (* (pow K 2) (* m (cos (+ M (* -1/2 (* K n))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/48 (* (pow K 3) (* m (sin (+ M (* -1/2 (* K n))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* -1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* -1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* -1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* -1/2 (* K m))))>
#<alt (+ (cos (+ M (* -1/2 (* K m)))) (* 1/2 (* K (* n (sin (+ M (* -1/2 (* K m))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* -1/8 (* (pow K 2) (* n (cos (+ M (* -1/2 (* K m))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))>
#<alt (+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/48 (* (pow K 3) (* n (sin (+ M (* -1/2 (* K m))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* -1/2 (* K (- m (* -1 n))))))>
#<alt (cos (+ M (* -1/2 (* K (- m (* -1 n))))))>
#<alt (cos (+ M (* -1/2 (* K (- m (* -1 n))))))>
#<alt (cos (+ M (* -1/2 (* K (- m (* -1 n))))))>
#<alt 1>
#<alt (+ 1 (* -1/2 (pow M 2)))>
#<alt (+ 1 (* (pow M 2) (- (* 1/24 (pow M 2)) 1/2)))>
#<alt (+ 1 (* (pow M 2) (- (* (pow M 2) (+ 1/24 (* -1/720 (pow M 2)))) 1/2)))>
#<alt (cos M)>
#<alt (cos M)>
#<alt (cos M)>
#<alt (cos M)>
#<alt (cos M)>
#<alt (cos M)>
#<alt (cos M)>
#<alt (cos M)>
#<alt (cos (* -1/2 (* K n)))>
#<alt (+ (cos (* -1/2 (* K n))) (* -1 (* M (sin (* -1/2 (* K n))))))>
#<alt (+ (cos (* -1/2 (* K n))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K n))))) (sin (* -1/2 (* K n))))))>
#<alt (+ (cos (* -1/2 (* K n))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K n)))) (* 1/6 (* M (sin (* -1/2 (* K n))))))) (sin (* -1/2 (* K n))))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (- (* -1/2 (* K n)) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K n)) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K n)) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K n)) (* -1 M)))>
#<alt (cos M)>
#<alt (+ (cos M) (* 1/2 (* K (* n (sin M)))))>
#<alt (+ (cos M) (* n (- (* -1/8 (* (pow K 2) (* n (cos M)))) (* -1/2 (* K (sin M))))))>
#<alt (+ (cos M) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos M))) (* -1/48 (* (pow K 3) (* n (sin M)))))) (* -1/2 (* K (sin M))))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos M)>
#<alt (+ (cos M) (* 1/2 (* K (* n (sin M)))))>
#<alt (+ (cos M) (* K (- (* -1/8 (* K (* (pow n 2) (cos M)))) (* -1/2 (* n (sin M))))))>
#<alt (+ (cos M) (* K (- (* K (+ (* -1/8 (* (pow n 2) (cos M))) (* -1/48 (* K (* (pow n 3) (sin M)))))) (* -1/2 (* n (sin M))))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (/ 1 (cos (* -1/2 (* K n))))>
#<alt (+ (/ 1 (cos (* -1/2 (* K n)))) (/ (* M (sin (* -1/2 (* K n)))) (pow (cos (* -1/2 (* K n))) 2)))>
#<alt (+ (* M (- (* M (- (* 1/2 (/ 1 (cos (* -1/2 (* K n))))) (* -1 (/ (pow (sin (* -1/2 (* K n))) 2) (pow (cos (* -1/2 (* K n))) 3))))) (* -1 (/ (sin (* -1/2 (* K n))) (pow (cos (* -1/2 (* K n))) 2))))) (/ 1 (cos (* -1/2 (* K n)))))>
#<alt (+ (* M (- (* M (- (+ (* -1 (* M (+ (* -1 (/ (* (sin (* -1/2 (* K n))) (- (* 1/2 (/ 1 (cos (* -1/2 (* K n))))) (* -1 (/ (pow (sin (* -1/2 (* K n))) 2) (pow (cos (* -1/2 (* K n))) 3))))) (cos (* -1/2 (* K n))))) (+ (* -1/2 (/ (sin (* -1/2 (* K n))) (pow (cos (* -1/2 (* K n))) 2))) (* 1/6 (/ (sin (* -1/2 (* K n))) (pow (cos (* -1/2 (* K n))) 2))))))) (* 1/2 (/ 1 (cos (* -1/2 (* K n)))))) (* -1 (/ (pow (sin (* -1/2 (* K n))) 2) (pow (cos (* -1/2 (* K n))) 3))))) (* -1 (/ (sin (* -1/2 (* K n))) (pow (cos (* -1/2 (* K n))) 2))))) (/ 1 (cos (* -1/2 (* K n)))))>
#<alt (/ 1 (cos (+ M (* -1/2 (* K n)))))>
#<alt (/ 1 (cos (+ M (* -1/2 (* K n)))))>
#<alt (/ 1 (cos (+ M (* -1/2 (* K n)))))>
#<alt (/ 1 (cos (+ M (* -1/2 (* K n)))))>
#<alt (/ 1 (cos (- (* -1/2 (* K n)) (* -1 M))))>
#<alt (/ 1 (cos (- (* -1/2 (* K n)) (* -1 M))))>
#<alt (/ 1 (cos (- (* -1/2 (* K n)) (* -1 M))))>
#<alt (/ 1 (cos (- (* -1/2 (* K n)) (* -1 M))))>
#<alt (/ 1 (cos M))>
#<alt (+ (* -1/2 (/ (* K (* n (sin M))) (pow (cos M) 2))) (/ 1 (cos M)))>
#<alt (+ (* n (- (* -1 (* n (+ (* -1/4 (/ (* (pow K 2) (pow (sin M) 2)) (pow (cos M) 3))) (* -1/8 (/ (pow K 2) (cos M)))))) (* 1/2 (/ (* K (sin M)) (pow (cos M) 2))))) (/ 1 (cos M)))>
#<alt (+ (* n (- (* n (- (* -1 (* n (+ (* -1/2 (/ (* K (* (sin M) (+ (* -1/4 (/ (* (pow K 2) (pow (sin M) 2)) (pow (cos M) 3))) (* -1/8 (/ (pow K 2) (cos M)))))) (cos M))) (+ (* -1/48 (/ (* (pow K 3) (sin M)) (pow (cos M) 2))) (* 1/16 (/ (* (pow K 3) (sin M)) (pow (cos M) 2))))))) (+ (* -1/4 (/ (* (pow K 2) (pow (sin M) 2)) (pow (cos M) 3))) (* -1/8 (/ (pow K 2) (cos M)))))) (* 1/2 (/ (* K (sin M)) (pow (cos M) 2))))) (/ 1 (cos M)))>
#<alt (/ 1 (cos (+ M (* -1/2 (* K n)))))>
#<alt (/ 1 (cos (+ M (* -1/2 (* K n)))))>
#<alt (/ 1 (cos (+ M (* -1/2 (* K n)))))>
#<alt (/ 1 (cos (+ M (* -1/2 (* K n)))))>
#<alt (/ 1 (cos (+ M (* -1/2 (* K n)))))>
#<alt (/ 1 (cos (+ M (* -1/2 (* K n)))))>
#<alt (/ 1 (cos (+ M (* -1/2 (* K n)))))>
#<alt (/ 1 (cos (+ M (* -1/2 (* K n)))))>
#<alt (/ 1 (cos M))>
#<alt (+ (* -1/2 (/ (* K (* n (sin M))) (pow (cos M) 2))) (/ 1 (cos M)))>
#<alt (+ (* K (- (* -1 (* K (+ (* -1/4 (/ (* (pow n 2) (pow (sin M) 2)) (pow (cos M) 3))) (* -1/8 (/ (pow n 2) (cos M)))))) (* 1/2 (/ (* n (sin M)) (pow (cos M) 2))))) (/ 1 (cos M)))>
#<alt (+ (* K (- (* K (- (* -1 (* K (+ (* -1/2 (/ (* n (* (sin M) (+ (* -1/4 (/ (* (pow n 2) (pow (sin M) 2)) (pow (cos M) 3))) (* -1/8 (/ (pow n 2) (cos M)))))) (cos M))) (+ (* -1/48 (/ (* (pow n 3) (sin M)) (pow (cos M) 2))) (* 1/16 (/ (* (pow n 3) (sin M)) (pow (cos M) 2))))))) (+ (* -1/4 (/ (* (pow n 2) (pow (sin M) 2)) (pow (cos M) 3))) (* -1/8 (/ (pow n 2) (cos M)))))) (* 1/2 (/ (* n (sin M)) (pow (cos M) 2))))) (/ 1 (cos M)))>
#<alt (/ 1 (cos (+ M (* -1/2 (* K n)))))>
#<alt (/ 1 (cos (+ M (* -1/2 (* K n)))))>
#<alt (/ 1 (cos (+ M (* -1/2 (* K n)))))>
#<alt (/ 1 (cos (+ M (* -1/2 (* K n)))))>
#<alt (/ 1 (cos (+ M (* -1/2 (* K n)))))>
#<alt (/ 1 (cos (+ M (* -1/2 (* K n)))))>
#<alt (/ 1 (cos (+ M (* -1/2 (* K n)))))>
#<alt (/ 1 (cos (+ M (* -1/2 (* K n)))))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (+ (cos (* -1/2 (* K n))) (* -1 (* M (sin (* -1/2 (* K n))))))>
#<alt (+ (cos (* -1/2 (* K n))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K n))))) (sin (* -1/2 (* K n))))))>
#<alt (+ (cos (* -1/2 (* K n))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K n)))) (* 1/6 (* M (sin (* -1/2 (* K n))))))) (sin (* -1/2 (* K n))))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (- (* -1/2 (* K n)) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K n)) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K n)) (* -1 M)))>
#<alt (cos (- (* -1/2 (* K n)) (* -1 M)))>
#<alt (cos M)>
#<alt (+ (cos M) (* 1/2 (* K (* n (sin M)))))>
#<alt (+ (cos M) (* n (- (* -1/8 (* (pow K 2) (* n (cos M)))) (* -1/2 (* K (sin M))))))>
#<alt (+ (cos M) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos M))) (* -1/48 (* (pow K 3) (* n (sin M)))))) (* -1/2 (* K (sin M))))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos M)>
#<alt (+ (cos M) (* 1/2 (* K (* n (sin M)))))>
#<alt (+ (cos M) (* K (- (* -1/8 (* K (* (pow n 2) (cos M)))) (* -1/2 (* n (sin M))))))>
#<alt (+ (cos M) (* K (- (* K (+ (* -1/8 (* (pow n 2) (cos M))) (* -1/48 (* K (* (pow n 3) (sin M)))))) (* -1/2 (* n (sin M))))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (cos (+ M (* -1/2 (* K n))))>
#<alt (* -1/2 (* K n))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt M>
#<alt (* M (+ 1 (* -1/2 (/ (* K n) M))))>
#<alt (* M (+ 1 (* -1/2 (/ (* K n) M))))>
#<alt (* M (+ 1 (* -1/2 (/ (* K n) M))))>
#<alt M>
#<alt (* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))>
#<alt (* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))>
#<alt (* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))>
#<alt M>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (* -1/2 (* K n))>
#<alt (* n (+ (* -1/2 K) (/ M n)))>
#<alt (* n (+ (* -1/2 K) (/ M n)))>
#<alt (* n (+ (* -1/2 K) (/ M n)))>
#<alt (* -1/2 (* K n))>
#<alt (* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))>
#<alt (* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))>
#<alt (* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))>
#<alt M>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (+ M (* -1/2 (* K n)))>
#<alt (* -1/2 (* K n))>
#<alt (* K (+ (* -1/2 n) (/ M K)))>
#<alt (* K (+ (* -1/2 n) (/ M K)))>
#<alt (* K (+ (* -1/2 n) (/ M K)))>
#<alt (* -1/2 (* K n))>
#<alt (* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))>
#<alt (* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))>
#<alt (* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))>
#<alt (fabs (- n m))>
#<alt (+ (fabs (- n m)) (* -1 l))>
#<alt (+ (fabs (- n m)) (* -1 l))>
#<alt (+ (fabs (- n m)) (* -1 l))>
#<alt (* -1 l)>
#<alt (* l (- (/ (fabs (- n m)) l) 1))>
#<alt (* l (- (/ (fabs (- n m)) l) 1))>
#<alt (* l (- (/ (fabs (- n m)) l) 1))>
#<alt (* -1 l)>
#<alt (* -1 (* l (+ 1 (* -1 (/ (fabs (- n m)) l)))))>
#<alt (* -1 (* l (+ 1 (* -1 (/ (fabs (- n m)) l)))))>
#<alt (* -1 (* l (+ 1 (* -1 (/ (fabs (- n m)) l)))))>
#<alt (- (fabs (- n m)) l)>
#<alt (- (fabs (- n m)) l)>
#<alt (- (fabs (- n m)) l)>
#<alt (- (fabs (- n m)) l)>
#<alt (- (fabs (- n m)) l)>
#<alt (- (fabs (- n m)) l)>
#<alt (- (fabs (- n m)) l)>
#<alt (- (fabs (- n m)) l)>
#<alt (- (fabs (neg (+ m (* -1 n)))) l)>
#<alt (- (fabs (neg (+ m (* -1 n)))) l)>
#<alt (- (fabs (neg (+ m (* -1 n)))) l)>
#<alt (- (fabs (neg (+ m (* -1 n)))) l)>
#<alt (- (fabs (- n m)) l)>
#<alt (- (fabs (- n m)) l)>
#<alt (- (fabs (- n m)) l)>
#<alt (- (fabs (- n m)) l)>
#<alt (- (fabs (- n m)) l)>
#<alt (- (fabs (- n m)) l)>
#<alt (- (fabs (- n m)) l)>
#<alt (- (fabs (- n m)) l)>
#<alt (- (fabs (+ n (* -1 m))) l)>
#<alt (- (fabs (+ n (* -1 m))) l)>
#<alt (- (fabs (+ n (* -1 m))) l)>
#<alt (- (fabs (+ n (* -1 m))) l)>
#<alt (exp (fabs (- n m)))>
#<alt (+ (exp (fabs (- n m))) (* -1 (* l (exp (fabs (- n m))))))>
#<alt (+ (exp (fabs (- n m))) (* l (+ (* -1 (exp (fabs (- n m)))) (* 1/2 (* l (exp (fabs (- n m))))))))>
#<alt (+ (exp (fabs (- n m))) (* l (+ (* -1 (exp (fabs (- n m)))) (* l (+ (* -1/6 (* l (exp (fabs (- n m))))) (* 1/2 (exp (fabs (- n m)))))))))>
#<alt (exp (- (fabs (- n m)) l))>
#<alt (exp (- (fabs (- n m)) l))>
#<alt (exp (- (fabs (- n m)) l))>
#<alt (exp (- (fabs (- n m)) l))>
#<alt (exp (+ (fabs (- n m)) (* -1 l)))>
#<alt (exp (+ (fabs (- n m)) (* -1 l)))>
#<alt (exp (+ (fabs (- n m)) (* -1 l)))>
#<alt (exp (+ (fabs (- n m)) (* -1 l)))>
#<alt (exp (- (fabs (- n m)) l))>
#<alt (exp (- (fabs (- n m)) l))>
#<alt (exp (- (fabs (- n m)) l))>
#<alt (exp (- (fabs (- n m)) l))>
#<alt (exp (- (fabs (- n m)) l))>
#<alt (exp (- (fabs (- n m)) l))>
#<alt (exp (- (fabs (- n m)) l))>
#<alt (exp (- (fabs (- n m)) l))>
#<alt (exp (- (fabs (neg (+ m (* -1 n)))) l))>
#<alt (exp (- (fabs (neg (+ m (* -1 n)))) l))>
#<alt (exp (- (fabs (neg (+ m (* -1 n)))) l))>
#<alt (exp (- (fabs (neg (+ m (* -1 n)))) l))>
#<alt (exp (- (fabs (- n m)) l))>
#<alt (exp (- (fabs (- n m)) l))>
#<alt (exp (- (fabs (- n m)) l))>
#<alt (exp (- (fabs (- n m)) l))>
#<alt (exp (- (fabs (- n m)) l))>
#<alt (exp (- (fabs (- n m)) l))>
#<alt (exp (- (fabs (- n m)) l))>
#<alt (exp (- (fabs (- n m)) l))>
#<alt (exp (- (fabs (+ n (* -1 m))) l))>
#<alt (exp (- (fabs (+ n (* -1 m))) l))>
#<alt (exp (- (fabs (+ n (* -1 m))) l))>
#<alt (exp (- (fabs (+ n (* -1 m))) l))>
#<alt (* -1 (fabs (- n m)))>
#<alt (- l (fabs (- n m)))>
#<alt (- l (fabs (- n m)))>
#<alt (- l (fabs (- n m)))>
#<alt l>
#<alt (* l (+ 1 (* -1 (/ (fabs (- n m)) l))))>
#<alt (* l (+ 1 (* -1 (/ (fabs (- n m)) l))))>
#<alt (* l (+ 1 (* -1 (/ (fabs (- n m)) l))))>
#<alt l>
#<alt (* -1 (* l (- (/ (fabs (- n m)) l) 1)))>
#<alt (* -1 (* l (- (/ (fabs (- n m)) l) 1)))>
#<alt (* -1 (* l (- (/ (fabs (- n m)) l) 1)))>
#<alt (- l (fabs (- n m)))>
#<alt (- l (fabs (- n m)))>
#<alt (- l (fabs (- n m)))>
#<alt (- l (fabs (- n m)))>
#<alt (- l (fabs (- n m)))>
#<alt (- l (fabs (- n m)))>
#<alt (- l (fabs (- n m)))>
#<alt (- l (fabs (- n m)))>
#<alt (- l (fabs (neg (+ m (* -1 n)))))>
#<alt (- l (fabs (neg (+ m (* -1 n)))))>
#<alt (- l (fabs (neg (+ m (* -1 n)))))>
#<alt (- l (fabs (neg (+ m (* -1 n)))))>
#<alt (- l (fabs (- n m)))>
#<alt (- l (fabs (- n m)))>
#<alt (- l (fabs (- n m)))>
#<alt (- l (fabs (- n m)))>
#<alt (- l (fabs (- n m)))>
#<alt (- l (fabs (- n m)))>
#<alt (- l (fabs (- n m)))>
#<alt (- l (fabs (- n m)))>
#<alt (- l (fabs (+ n (* -1 m))))>
#<alt (- l (fabs (+ n (* -1 m))))>
#<alt (- l (fabs (+ n (* -1 m))))>
#<alt (- l (fabs (+ n (* -1 m))))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (neg (+ m (* -1 n))))>
#<alt (fabs (neg (+ m (* -1 n))))>
#<alt (fabs (neg (+ m (* -1 n))))>
#<alt (fabs (neg (+ m (* -1 n))))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (- n m))>
#<alt (fabs (+ n (* -1 m)))>
#<alt (fabs (+ n (* -1 m)))>
#<alt (fabs (+ n (* -1 m)))>
#<alt (fabs (+ n (* -1 m)))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))>
#<alt (+ (* -1 (/ (* l (cos (* -1/2 (* K n)))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))>
#<alt (+ (* l (- (* -1 (* l (+ (* -1 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))>
#<alt (+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))))) (+ (* -1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/6 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))))))) (+ (* -1 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))>
#<alt (/ 1 (exp (- l (fabs (- n m)))))>
#<alt (+ (* (pow n 2) (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (/ 1 (exp (- l (fabs (- n m))))))>
#<alt (+ (* (pow n 2) (- (+ (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* (pow n 2) (- (* 1/384 (/ (pow K 4) (exp (- l (fabs (- n m)))))) (+ (* 1/32 (/ 1 (exp (- l (fabs (- n m)))))) (* 1/4 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (/ 1 (exp (- l (fabs (- n m))))))>
#<alt (+ (* (pow n 2) (- (+ (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* (pow n 2) (- (+ (* 1/384 (/ (pow K 4) (exp (- l (fabs (- n m)))))) (* (pow n 2) (- (* -1/46080 (/ (pow K 6) (exp (- l (fabs (- n m)))))) (+ (* 1/384 (/ 1 (exp (- l (fabs (- n m)))))) (+ (* 1/32 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (* 1/4 (- (* 1/384 (/ (pow K 4) (exp (- l (fabs (- n m)))))) (+ (* 1/32 (/ 1 (exp (- l (fabs (- n m)))))) (* 1/4 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))))))))))) (+ (* 1/32 (/ 1 (exp (- l (fabs (- n m)))))) (* 1/4 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (/ 1 (exp (- l (fabs (- n m))))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))>
#<alt (/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (+ (* -1/8 (/ (* (pow K 2) (pow n 2)) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))>
#<alt (+ (* (pow K 2) (+ (* -1/8 (/ (pow n 2) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/384 (/ (* (pow K 2) (pow n 4)) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))) (/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))>
#<alt (+ (* (pow K 2) (+ (* -1/8 (/ (pow n 2) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* (pow K 2) (+ (* -1/46080 (/ (* (pow K 2) (pow n 6)) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/384 (/ (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))))) (/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))>
#<alt (/ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (+ (/ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (cos (* -1/2 (* K n)))) (/ (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))) (cos (* -1/2 (* K n)))))>
#<alt (+ (* l (+ (* 1/2 (/ (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))) (cos (* -1/2 (* K n))))) (/ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (cos (* -1/2 (* K n)))))) (/ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (cos (* -1/2 (* K n)))))>
#<alt (+ (* l (+ (* l (+ (* 1/6 (/ (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))) (cos (* -1/2 (* K n))))) (* 1/2 (/ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (cos (* -1/2 (* K n))))))) (/ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (cos (* -1/2 (* K n)))))) (/ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (cos (* -1/2 (* K n)))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))) (cos (* -1/2 (* K n))))>
#<alt (exp (- l (fabs (- n m))))>
#<alt (+ (exp (- l (fabs (- n m)))) (* (pow n 2) (- (* 1/4 (exp (- l (fabs (- n m))))) (* -1/8 (* (pow K 2) (exp (- l (fabs (- n m)))))))))>
#<alt (+ (exp (- l (fabs (- n m)))) (* (pow n 2) (- (+ (* 1/4 (exp (- l (fabs (- n m))))) (* (pow n 2) (- (* 1/32 (exp (- l (fabs (- n m))))) (+ (* -1/8 (* (pow K 2) (- (* 1/4 (exp (- l (fabs (- n m))))) (* -1/8 (* (pow K 2) (exp (- l (fabs (- n m))))))))) (* 1/384 (* (pow K 4) (exp (- l (fabs (- n m)))))))))) (* -1/8 (* (pow K 2) (exp (- l (fabs (- n m)))))))))>
#<alt (+ (exp (- l (fabs (- n m)))) (* (pow n 2) (- (+ (* 1/4 (exp (- l (fabs (- n m))))) (* (pow n 2) (- (+ (* 1/32 (exp (- l (fabs (- n m))))) (* (pow n 2) (- (* 1/384 (exp (- l (fabs (- n m))))) (+ (* -1/8 (* (pow K 2) (- (* 1/32 (exp (- l (fabs (- n m))))) (+ (* -1/8 (* (pow K 2) (- (* 1/4 (exp (- l (fabs (- n m))))) (* -1/8 (* (pow K 2) (exp (- l (fabs (- n m))))))))) (* 1/384 (* (pow K 4) (exp (- l (fabs (- n m)))))))))) (+ (* -1/46080 (* (pow K 6) (exp (- l (fabs (- n m)))))) (* 1/384 (* (pow K 4) (- (* 1/4 (exp (- l (fabs (- n m))))) (* -1/8 (* (pow K 2) (exp (- l (fabs (- n m)))))))))))))) (+ (* -1/8 (* (pow K 2) (- (* 1/4 (exp (- l (fabs (- n m))))) (* -1/8 (* (pow K 2) (exp (- l (fabs (- n m))))))))) (* 1/384 (* (pow K 4) (exp (- l (fabs (- n m)))))))))) (* -1/8 (* (pow K 2) (exp (- l (fabs (- n m)))))))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))) (cos (* -1/2 (* K n))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (+ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (* 1/8 (* (pow K 2) (* (pow n 2) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))>
#<alt (+ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (* (pow K 2) (- (* -1 (* (pow K 2) (+ (* -1/64 (* (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/384 (* (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (* -1/8 (* (pow n 2) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))))>
#<alt (+ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (* (pow K 2) (- (* (pow K 2) (- (* -1 (* (pow K 2) (+ (* -1/46080 (* (pow n 6) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (+ (* 1/3072 (* (pow n 6) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/8 (* (pow n 2) (+ (* -1/64 (* (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/384 (* (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))))))) (+ (* -1/64 (* (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/384 (* (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (* -1/8 (* (pow n 2) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))>
#<alt (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))>
#<alt (+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))>
#<alt (+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* 1/2 (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))))))>
#<alt (+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (+ (* 1/6 (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))>
#<alt (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))>
#<alt (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))>
#<alt (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))>
#<alt (exp (- l (fabs (- n m))))>
#<alt (+ (exp (- l (fabs (- n m)))) (* 1/4 (* (pow n 2) (exp (- l (fabs (- n m)))))))>
#<alt (+ (exp (- l (fabs (- n m)))) (* (pow n 2) (+ (* 1/32 (* (pow n 2) (exp (- l (fabs (- n m)))))) (* 1/4 (exp (- l (fabs (- n m))))))))>
#<alt (+ (exp (- l (fabs (- n m)))) (* (pow n 2) (+ (* 1/4 (exp (- l (fabs (- n m))))) (* (pow n 2) (+ (* 1/384 (* (pow n 2) (exp (- l (fabs (- n m)))))) (* 1/32 (exp (- l (fabs (- n m))))))))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))>
#<alt (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))>
#<alt (- (* 1/4 (pow n 2)) (fabs (- n m)))>
#<alt (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))>
#<alt (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))>
#<alt (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))>
#<alt l>
#<alt (* l (- (+ 1 (* 1/4 (/ (pow n 2) l))) (/ (fabs (- n m)) l)))>
#<alt (* l (- (+ 1 (* 1/4 (/ (pow n 2) l))) (/ (fabs (- n m)) l)))>
#<alt (* l (- (+ 1 (* 1/4 (/ (pow n 2) l))) (/ (fabs (- n m)) l)))>
#<alt l>
#<alt (* -1 (* l (- (* -1 (/ (- (* 1/4 (pow n 2)) (fabs (- n m))) l)) 1)))>
#<alt (* -1 (* l (- (* -1 (/ (- (* 1/4 (pow n 2)) (fabs (- n m))) l)) 1)))>
#<alt (* -1 (* l (- (* -1 (/ (- (* 1/4 (pow n 2)) (fabs (- n m))) l)) 1)))>
#<alt (- l (fabs (- n m)))>
#<alt (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))>
#<alt (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))>
#<alt (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))>
#<alt (* 1/4 (pow n 2))>
#<alt (* (pow n 2) (- (+ 1/4 (/ l (pow n 2))) (/ (fabs (- n m)) (pow n 2))))>
#<alt (* (pow n 2) (- (+ 1/4 (/ l (pow n 2))) (/ (fabs (- n m)) (pow n 2))))>
#<alt (* (pow n 2) (- (+ 1/4 (/ l (pow n 2))) (/ (fabs (- n m)) (pow n 2))))>
#<alt (* 1/4 (pow n 2))>
#<alt (* (pow n 2) (- (+ 1/4 (/ l (pow n 2))) (/ (fabs (neg (+ m (* -1 n)))) (pow n 2))))>
#<alt (* (pow n 2) (- (+ 1/4 (/ l (pow n 2))) (/ (fabs (neg (+ m (* -1 n)))) (pow n 2))))>
#<alt (* (pow n 2) (- (+ 1/4 (/ l (pow n 2))) (/ (fabs (neg (+ m (* -1 n)))) (pow n 2))))>
#<alt (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))>
#<alt (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))>
#<alt (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))>
#<alt (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))>
#<alt (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))>
#<alt (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))>
#<alt (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))>
#<alt (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))>
#<alt (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))>
#<alt (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))>
#<alt (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))>
#<alt (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))>
#<alt (cos (* 1/2 (* K (+ m n))))>
#<alt (+ (cos (* 1/2 (* K (+ m n)))) (* -1 (* M (sin (* 1/2 (* K (+ m n)))))))>
#<alt (+ (cos (* 1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* 1/2 (* K (+ m n)))))) (sin (* 1/2 (* K (+ m n)))))))>
#<alt (+ (cos (* 1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* 1/2 (* K (+ m n))))) (* 1/6 (* M (sin (* 1/2 (* K (+ m n)))))))) (sin (* 1/2 (* K (+ m n)))))))>
#<alt (cos (+ M (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* 1/2 (* K (+ m n)))))>
#<alt (cos (- (* 1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos (- (* 1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos (- (* 1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos (- (* 1/2 (* K (+ m n))) (* -1 M)))>
#<alt (cos M)>
#<alt (+ (cos M) (* -1/2 (* K (* (sin M) (+ m n)))))>
#<alt (+ (cos M) (* K (- (* -1/8 (* K (* (cos M) (pow (+ m n) 2)))) (* 1/2 (* (sin M) (+ m n))))))>
#<alt (+ (cos M) (* K (- (* K (+ (* -1/8 (* (cos M) (pow (+ m n) 2))) (* 1/48 (* K (* (sin M) (pow (+ m n) 3)))))) (* 1/2 (* (sin M) (+ m n))))))>
#<alt (cos (+ M (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* 1/2 (* K n))))>
#<alt (+ (cos (+ M (* 1/2 (* K n)))) (* -1/2 (* K (* m (sin (+ M (* 1/2 (* K n))))))))>
#<alt (+ (cos (+ M (* 1/2 (* K n)))) (* m (- (* -1/8 (* (pow K 2) (* m (cos (+ M (* 1/2 (* K n))))))) (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))))))>
#<alt (+ (cos (+ M (* 1/2 (* K n)))) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n)))))) (* 1/48 (* (pow K 3) (* m (sin (+ M (* 1/2 (* K n))))))))) (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))))))>
#<alt (cos (+ M (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* 1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* 1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* 1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* 1/2 (* K (- n (* -1 m))))))>
#<alt (cos (+ M (* 1/2 (* K m))))>
#<alt (+ (cos (+ M (* 1/2 (* K m)))) (* -1/2 (* K (* n (sin (+ M (* 1/2 (* K m))))))))>
#<alt (+ (cos (+ M (* 1/2 (* K m)))) (* n (- (* -1/8 (* (pow K 2) (* n (cos (+ M (* 1/2 (* K m))))))) (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))))))>
#<alt (+ (cos (+ M (* 1/2 (* K m)))) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m)))))) (* 1/48 (* (pow K 3) (* n (sin (+ M (* 1/2 (* K m))))))))) (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))))))>
#<alt (cos (+ M (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* 1/2 (* K (+ m n)))))>
#<alt (cos (+ M (* 1/2 (* K (- m (* -1 n))))))>
#<alt (cos (+ M (* 1/2 (* K (- m (* -1 n))))))>
#<alt (cos (+ M (* 1/2 (* K (- m (* -1 n))))))>
#<alt (cos (+ M (* 1/2 (* K (- m (* -1 n))))))>
#<alt 1>
#<alt (+ 1 (* -1/8 (* (pow K 2) (pow (+ m n) 2))))>
#<alt (+ 1 (* (pow K 2) (+ (* -1/8 (pow (+ m n) 2)) (* 1/384 (* (pow K 2) (pow (+ m n) 4))))))>
#<alt (+ 1 (* (pow K 2) (+ (* -1/8 (pow (+ m n) 2)) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (pow (+ m n) 6))) (* 1/384 (pow (+ m n) 4)))))))>
#<alt (cos (* 1/2 (* K (+ m n))))>
#<alt (cos (* 1/2 (* K (+ m n))))>
#<alt (cos (* 1/2 (* K (+ m n))))>
#<alt (cos (* 1/2 (* K (+ m n))))>
#<alt (cos (* 1/2 (* K (+ m n))))>
#<alt (cos (* 1/2 (* K (+ m n))))>
#<alt (cos (* 1/2 (* K (+ m n))))>
#<alt (cos (* 1/2 (* K (+ m n))))>
#<alt (cos (* 1/2 (* K n)))>
#<alt (+ (cos (* 1/2 (* K n))) (* -1/2 (* K (* m (sin (* 1/2 (* K n)))))))>
#<alt (+ (cos (* 1/2 (* K n))) (* m (- (* -1/8 (* (pow K 2) (* m (cos (* 1/2 (* K n)))))) (* 1/2 (* K (sin (* 1/2 (* K n))))))))>
#<alt (+ (cos (* 1/2 (* K n))) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (* 1/2 (* K n))))) (* 1/48 (* (pow K 3) (* m (sin (* 1/2 (* K n)))))))) (* 1/2 (* K (sin (* 1/2 (* K n))))))))>
#<alt (cos (* 1/2 (* K (+ m n))))>
#<alt (cos (* 1/2 (* K (+ m n))))>
#<alt (cos (* 1/2 (* K (+ m n))))>
#<alt (cos (* 1/2 (* K (+ m n))))>
#<alt (cos (* 1/2 (* K (- n (* -1 m)))))>
#<alt (cos (* 1/2 (* K (- n (* -1 m)))))>
#<alt (cos (* 1/2 (* K (- n (* -1 m)))))>
#<alt (cos (* 1/2 (* K (- n (* -1 m)))))>
#<alt (cos (* 1/2 (* K m)))>
#<alt (+ (cos (* 1/2 (* K m))) (* -1/2 (* K (* n (sin (* 1/2 (* K m)))))))>
#<alt (+ (cos (* 1/2 (* K m))) (* n (- (* -1/8 (* (pow K 2) (* n (cos (* 1/2 (* K m)))))) (* 1/2 (* K (sin (* 1/2 (* K m))))))))>
#<alt (+ (cos (* 1/2 (* K m))) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (* 1/2 (* K m))))) (* 1/48 (* (pow K 3) (* n (sin (* 1/2 (* K m)))))))) (* 1/2 (* K (sin (* 1/2 (* K m))))))))>
#<alt (cos (* 1/2 (* K (+ m n))))>
#<alt (cos (* 1/2 (* K (+ m n))))>
#<alt (cos (* 1/2 (* K (+ m n))))>
#<alt (cos (* 1/2 (* K (+ m n))))>
#<alt (cos (* 1/2 (* K (- m (* -1 n)))))>
#<alt (cos (* 1/2 (* K (- m (* -1 n)))))>
#<alt (cos (* 1/2 (* K (- m (* -1 n)))))>
#<alt (cos (* 1/2 (* K (- m (* -1 n)))))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt (* -1/2 (* K n))>
#<alt 1>
#<alt (+ 1 (* -1/8 (* (pow K 2) (pow n 2))))>
#<alt (+ 1 (* (pow n 2) (+ (* -1/8 (pow K 2)) (* 1/384 (* (pow K 4) (pow n 2))))))>
#<alt (+ 1 (* (pow n 2) (+ (* -1/8 (pow K 2)) (* (pow n 2) (+ (* -1/46080 (* (pow K 6) (pow n 2))) (* 1/384 (pow K 4)))))))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt 1>
#<alt (+ 1 (* -1/8 (* (pow K 2) (pow n 2))))>
#<alt (+ 1 (* (pow K 2) (+ (* -1/8 (pow n 2)) (* 1/384 (* (pow K 2) (pow n 4))))))>
#<alt (+ 1 (* (pow K 2) (+ (* -1/8 (pow n 2)) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (pow n 6))) (* 1/384 (pow n 4)))))))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
#<alt (cos (* -1/2 (* K n)))>
Calls

198 calls:

TimeVariablePointExpression
5.0ms
m
@0
(/ (+ (* (- (cos (+ M (* K (/ (+ m n) -2)))) (cos (+ M (/ K (/ 2 (+ m n)))))) 1/2) (* (cos M) (cos (/ K (/ 2 (+ m n)))))) (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))))
3.0ms
n
@0
(/ (+ (* (- (cos (+ M (* K (/ (+ m n) -2)))) (cos (+ M (/ K (/ 2 (+ m n)))))) 1/2) (* (cos M) (cos (/ K (/ 2 (+ m n)))))) (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))))
2.0ms
M
@0
(/ (+ (* (- (cos (+ M (* K (/ (+ m n) -2)))) (cos (+ M (/ K (/ 2 (+ m n)))))) 1/2) (* (cos M) (cos (/ K (/ 2 (+ m n)))))) (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))))
2.0ms
l
@inf
(/ (+ (* (- (cos (+ M (* K (/ (+ m n) -2)))) (cos (+ M (/ K (/ 2 (+ m n)))))) 1/2) (* (cos M) (cos (/ K (/ 2 (+ m n)))))) (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))))
2.0ms
l
@0
(/ (+ (* (- (cos (+ M (* K (/ (+ m n) -2)))) (cos (+ M (/ K (/ 2 (+ m n)))))) 1/2) (* (cos M) (cos (/ K (/ 2 (+ m n)))))) (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))))

rewrite274.0ms (1.5%)

Algorithm
1×batch-egg-rewrite
Rules
2046×*-lowering-*.f32
2046×*-lowering-*.f64
1962×fnmadd-define
1796×sum3-define
1430×/-lowering-/.f32
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
057293
1213274
2816199
34111199
08116199
Stop Event
1×iter limit
1×node limit
Counts
21 → 612
Calls
Call 1
Inputs
(+ (* (- (cos (+ M (* K (/ (+ m n) -2)))) (cos (+ M (/ K (/ 2 (+ m n)))))) 1/2) (* (cos M) (cos (/ K (/ 2 (+ m n))))))
(/ (+ (* (- (cos (+ M (* K (/ (+ m n) -2)))) (cos (+ M (/ K (/ 2 (+ m n)))))) 1/2) (* (cos M) (cos (/ K (/ 2 (+ m n)))))) (exp (+ (* (- (/ (+ m n) 2) M) (- (/ (+ m n) 2) M)) (- l (fabs (- m n))))))
(- (cos (+ M (* K (/ (+ m n) -2)))) (cos (+ M (/ K (/ 2 (+ m n))))))
(cos (+ M (* K (/ (+ m n) -2))))
(cos M)
(/ 1 (/ 1 (cos (+ M (* -1/2 (* n K))))))
(/ 1 (cos (+ M (* -1/2 (* n K)))))
(cos (+ M (* -1/2 (* n K))))
(+ M (* -1/2 (* n K)))
(- 0 (- l (fabs (- n m))))
(exp (- 0 (- l (fabs (- n m)))))
(- l (fabs (- n m)))
(fabs (- n m))
(/ 1 (/ (exp (- (+ l (* n (* 1/4 n))) (fabs (- n m)))) (cos (* n (* K -1/2)))))
(/ (exp (- (+ l (* n (* 1/4 n))) (fabs (- n m)))) (cos (* n (* K -1/2))))
(exp (- (+ l (* n (* 1/4 n))) (fabs (- n m))))
(- (+ l (* n (* 1/4 n))) (fabs (- n m)))
(cos (+ M (/ K (/ 2 (+ m n)))))
(cos (/ K (/ 2 (+ m n))))
(* -1/2 (* n K))
(cos (* n (* K -1/2)))
Outputs
(+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))
(+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))))
(+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)))
(+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))
(+.f64 (+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))
(+.f64 (*.f64 (cos.f64 (-.f64 M (/.f64 m (/.f64 #s(literal 2 binary64) K)))) (cos.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K)))) (*.f64 (sin.f64 (-.f64 M (/.f64 m (/.f64 #s(literal 2 binary64) K)))) (sin.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K)))))
(+.f64 (*.f64 (cos.f64 (-.f64 M (/.f64 n (/.f64 #s(literal 2 binary64) K)))) (cos.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K)))) (*.f64 (sin.f64 (-.f64 M (/.f64 n (/.f64 #s(literal 2 binary64) K)))) (sin.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K)))))
(cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))
(cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))))
(-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (neg.f64 (cos.f64 M))))
(-.f64 (*.f64 (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (cos.f64 (-.f64 #s(literal 0 binary64) M))) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (sin.f64 (-.f64 #s(literal 0 binary64) M))))
(-.f64 (*.f64 (cos.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K))) (cos.f64 (-.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K)) M))) (*.f64 (sin.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K))) (sin.f64 (-.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K)) M))))
(-.f64 (*.f64 (cos.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K))) (cos.f64 (-.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K)) M))) (*.f64 (sin.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K))) (sin.f64 (-.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K)) M))))
(fma.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 1/2 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (cos.f64 M) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (cos.f64 M) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))))
(fma.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 1/2 binary64) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))) #s(literal -1/2 binary64) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))) #s(literal -1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)))) #s(literal 2 binary64))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))))) #s(literal 4 binary64))
(*.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) #s(literal 1 binary64))
(*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))))
(*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))))
(+.f64 (*.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (*.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))
(+.f64 (*.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) (*.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))))
(+.f64 (*.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))))) (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))))))
(+.f64 (*.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))))) (*.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))))))
(exp.f64 (*.f64 (log.f64 (/.f64 (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (neg.f64 (/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))) (neg.f64 (/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))))
(neg.f64 (neg.f64 (/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))))
(neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)))))
(/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))) (/.f64 #s(literal 1 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))))
(/.f64 (exp.f64 (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))) (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))))
(/.f64 (/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 (neg.f64 (/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))) #s(literal -1 binary64)) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (/.f64 (/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))) (exp.f64 l)) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(pow.f64 (/.f64 (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))) #s(literal -1 binary64))
(*.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))))
(*.f64 (/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(*.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))) (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(*.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)))
(*.f64 (exp.f64 (+.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M))))) (pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))))
(*.f64 (exp.f64 (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))) (pow.f64 (/.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))) #s(literal -1 binary64)))
(*.f64 (exp.f64 (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))) (/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)))
(*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))) (/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(*.f64 (/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) (exp.f64 (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)))) (/.f64 #s(literal -1 binary64) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n)))))))
(*.f64 (/.f64 (/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)))) (exp.f64 l)) (exp.f64 (fabs.f64 (-.f64 m n))))
(*.f64 (/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) l))) (exp.f64 (fabs.f64 (-.f64 m n))))
(+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))
(+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))))
(+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (-.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))
(+.f64 (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (neg.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (neg.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))
(+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))
(+.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)))
(+.f64 (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))
(-.f64 (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))
(-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))))
(-.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))))
(-.f64 (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(-.f64 (+.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(-.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) #s(literal 0 binary64)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))
(fma.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))))
(fma.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (neg.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (neg.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (neg.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (neg.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (neg.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (neg.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (neg.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (neg.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (cos.f64 M) (neg.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (cos.f64 M) (neg.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (neg.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (neg.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))))
(fma.f64 (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) #s(literal -2 binary64)) (neg.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))))
(fma.f64 (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))))
(fma.f64 (*.f64 (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64)))) #s(literal -2 binary64) (neg.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))))
(fma.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 1/2 binary64) (neg.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))))
(fma.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 1/2 binary64) (neg.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))))
(fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))) #s(literal -1/2 binary64) (neg.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))) #s(literal -1/2 binary64) (neg.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))))
(fma.f64 (*.f64 #s(literal -2 binary64) (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64)))) (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (neg.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))))
(fma.f64 (*.f64 #s(literal -2 binary64) (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64)))) (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64))) (neg.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))))
(/.f64 (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))))))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (/.f64 (-.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))))) #s(literal -2 binary64)) #s(literal 2 binary64))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M) (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M) (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64)))))
(*.f64 (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) #s(literal -2 binary64)))
(*.f64 (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64)))))
(*.f64 (*.f64 (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64)))) #s(literal -2 binary64))
(*.f64 (*.f64 #s(literal -2 binary64) (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64)))) (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal -2 binary64) (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64)))) (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64))))
(+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))
(+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))))
(+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)))
(+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))
(+.f64 (+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))
(+.f64 (*.f64 (cos.f64 (-.f64 M (/.f64 m (/.f64 #s(literal 2 binary64) K)))) (cos.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K)))) (*.f64 (sin.f64 (-.f64 M (/.f64 m (/.f64 #s(literal 2 binary64) K)))) (sin.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K)))))
(+.f64 (*.f64 (cos.f64 (-.f64 M (/.f64 n (/.f64 #s(literal 2 binary64) K)))) (cos.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K)))) (*.f64 (sin.f64 (-.f64 M (/.f64 n (/.f64 #s(literal 2 binary64) K)))) (sin.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K)))))
(cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))
(cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))))
(-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (neg.f64 (cos.f64 M))))
(-.f64 (*.f64 (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (cos.f64 (-.f64 #s(literal 0 binary64) M))) (*.f64 (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (sin.f64 (-.f64 #s(literal 0 binary64) M))))
(-.f64 (*.f64 (cos.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K))) (cos.f64 (-.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K)) M))) (*.f64 (sin.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K))) (sin.f64 (-.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K)) M))))
(-.f64 (*.f64 (cos.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K))) (cos.f64 (-.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K)) M))) (*.f64 (sin.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K))) (sin.f64 (-.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K)) M))))
(fma.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 1/2 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (cos.f64 M) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (cos.f64 M) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))))
(fma.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 1/2 binary64) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64)))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))) #s(literal -1/2 binary64) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))) #s(literal -1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)))) #s(literal 2 binary64))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))))) #s(literal 4 binary64))
(*.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) #s(literal 1 binary64))
(*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))))
(*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M))))
(cos.f64 M)
(+.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (*.f64 (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) #s(literal 1 binary64)))
(+.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) #s(literal 1 binary64)))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))))
(+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(exp.f64 (log.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) #s(literal 1 binary64)))
(cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))))
(fma.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(fma.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(fma.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(fma.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (cos.f64 M) (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(fma.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (cos.f64 M) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))))
(fma.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (/.f64 (cos.f64 M) #s(literal 1 binary64)) (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(fma.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (/.f64 (cos.f64 M) #s(literal 1 binary64)) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))))
(fma.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal 1 binary64) (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(fma.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal 1 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K n))))) #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K n))))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) #s(literal -1 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K n))))) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K n)))) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K n))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K n)))) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))) #s(literal 1 binary64))
(pow.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(*.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(*.f64 #s(literal -1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) #s(literal 1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) #s(literal -1 binary64))
(exp.f64 (log.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))) #s(literal 1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(/.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) #s(literal -1 binary64))
(pow.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(*.f64 #s(literal -1 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) #s(literal -1 binary64))
(+.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (*.f64 (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) #s(literal 1 binary64)))
(+.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) #s(literal 1 binary64)))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))))
(+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M)))))
(exp.f64 (log.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) #s(literal 1 binary64)))
(cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))))
(fma.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(fma.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(fma.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(fma.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (cos.f64 M) (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(fma.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (cos.f64 M) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))))
(fma.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (/.f64 (cos.f64 M) #s(literal 1 binary64)) (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(fma.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (/.f64 (cos.f64 M) #s(literal 1 binary64)) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))))
(fma.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal 1 binary64) (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(fma.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal 1 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K n))))) #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))))
(fma.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K n))))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 M))) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) #s(literal -1 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K n))))) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K n)))) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K n))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K n)))) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 M) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))) #s(literal 1 binary64))
(pow.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(*.f64 (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(*.f64 #s(literal -1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) #s(literal 1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) #s(literal -1 binary64))
(+.f64 M (*.f64 K (*.f64 n #s(literal -1/2 binary64))))
(+.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))) M)
(fma.f64 K (*.f64 n #s(literal -1/2 binary64)) M)
(fma.f64 n (/.f64 K #s(literal -2 binary64)) M)
(fma.f64 #s(literal -1/2 binary64) (*.f64 K n) M)
(fma.f64 (*.f64 K n) #s(literal -1/2 binary64) M)
(fma.f64 (/.f64 K #s(literal -2 binary64)) n M)
(fma.f64 (*.f64 n #s(literal -1/2 binary64)) K M)
(+.f64 #s(literal 0 binary64) (-.f64 (fabs.f64 (-.f64 m n)) l))
(+.f64 (fabs.f64 (-.f64 m n)) (-.f64 #s(literal 0 binary64) l))
(+.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) #s(literal 0 binary64))
(+.f64 (-.f64 #s(literal 0 binary64) l) (fabs.f64 (-.f64 m n)))
(+.f64 (-.f64 #s(literal 0 binary64) l) (+.f64 (fabs.f64 (-.f64 m n)) #s(literal 0 binary64)))
(+.f64 (*.f64 l #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))) #s(literal -1 binary64)))
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))) #s(literal -1 binary64)) (*.f64 l #s(literal -1 binary64)))
(+.f64 (+.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))) (-.f64 #s(literal 0 binary64) l))
(+.f64 (+.f64 (fabs.f64 (-.f64 m n)) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) l))
(+.f64 (-.f64 (-.f64 #s(literal 0 binary64) l) #s(literal 0 binary64)) (fabs.f64 (-.f64 m n)))
(-.f64 #s(literal 0 binary64) (-.f64 l (fabs.f64 (-.f64 m n))))
(-.f64 #s(literal 0 binary64) (-.f64 (-.f64 l (fabs.f64 (-.f64 m n))) #s(literal 0 binary64)))
(-.f64 (fabs.f64 (-.f64 m n)) l)
(-.f64 (-.f64 #s(literal 0 binary64) l) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))
(-.f64 (-.f64 #s(literal 0 binary64) l) (-.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))) #s(literal 0 binary64)))
(-.f64 (+.f64 (fabs.f64 (-.f64 m n)) #s(literal 0 binary64)) l)
(fma.f64 #s(literal 1 binary64) (fabs.f64 (-.f64 m n)) (-.f64 #s(literal 0 binary64) l))
(fma.f64 #s(literal -1 binary64) l (fabs.f64 (-.f64 m n)))
(fma.f64 #s(literal -1 binary64) l (neg.f64 (-.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))) #s(literal 0 binary64))))
(fma.f64 #s(literal -1 binary64) (-.f64 l (fabs.f64 (-.f64 m n))) #s(literal 0 binary64))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))) (-.f64 #s(literal 0 binary64) l))
(neg.f64 (-.f64 l (fabs.f64 (-.f64 m n))))
(*.f64 (-.f64 l (fabs.f64 (-.f64 m n))) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 l (fabs.f64 (-.f64 m n))))
(exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l))
(exp.f64 (*.f64 (log.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 #s(literal -1 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 #s(literal 1 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(pow.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))) #s(literal -1 binary64))
(pow.f64 (exp.f64 #s(literal -1 binary64)) (-.f64 l (fabs.f64 (-.f64 m n))))
(*.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)))
(*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))))
(*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 #s(literal 1 binary64) (exp.f64 l)))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (exp.f64 (fabs.f64 (-.f64 m n))))
(*.f64 (pow.f64 (exp.f64 l) #s(literal -1 binary64)) (pow.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))) #s(literal -1 binary64)))
(+.f64 l (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))
(+.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))) l)
(-.f64 l (fabs.f64 (-.f64 m n)))
(-.f64 #s(literal 0 binary64) (-.f64 (fabs.f64 (-.f64 m n)) l))
(-.f64 (+.f64 l #s(literal 0 binary64)) (fabs.f64 (-.f64 m n)))
(fma.f64 #s(literal -1 binary64) (fabs.f64 (-.f64 m n)) l)
(fabs.f64 (-.f64 m n))
(fabs.f64 (-.f64 n m))
(fabs.f64 (-.f64 (-.f64 n m) #s(literal 0 binary64)))
(fabs.f64 (-.f64 (-.f64 m n) #s(literal 0 binary64)))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))
(neg.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))
(*.f64 #s(literal 1 binary64) (fabs.f64 (-.f64 m n)))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))
(exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))))
(-.f64 #s(literal 0 binary64) (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))))) (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))))))
(neg.f64 (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l)))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))))))
(/.f64 (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l)))) #s(literal 1 binary64))
(/.f64 (*.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (fabs.f64 (-.f64 m n)))) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))))
(/.f64 (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))))) #s(literal -1 binary64))
(/.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(/.f64 (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(/.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))))) (/.f64 #s(literal -1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(/.f64 (/.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(/.f64 (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 l)) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (fabs.f64 (-.f64 m n)))))
(pow.f64 (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l)))) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l)))))
(*.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))))
(*.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (/.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) #s(literal 1 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))))))
(*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))))))
(*.f64 (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l)))) #s(literal 1 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 l)) (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (fabs.f64 (-.f64 m n))))))
(*.f64 (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))))) #s(literal -1 binary64))
(*.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) (*.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (fabs.f64 (-.f64 m n)))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) (/.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(*.f64 (exp.f64 (neg.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))))
(*.f64 (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) (exp.f64 (fabs.f64 (-.f64 m n))))
(*.f64 (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) #s(literal 1 binary64)))
(*.f64 (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) (/.f64 (exp.f64 (fabs.f64 (-.f64 m n))) #s(literal 1 binary64)))
(*.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))))) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(*.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))))) (pow.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal -1 binary64)))
(*.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal 1 binary64)))
(*.f64 (/.f64 (exp.f64 (neg.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) #s(literal 1 binary64)) (/.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(*.f64 (/.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) #s(literal 1 binary64)) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))
(*.f64 (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))))) (exp.f64 (fabs.f64 (-.f64 m n))))
(*.f64 (*.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))))) #s(literal -1 binary64)) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))
(*.f64 (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))))) (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 m n)))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 m n)))))
(*.f64 (/.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(exp.f64 (*.f64 (log.f64 (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))) #s(literal -1 binary64)))
(exp.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) (-.f64 #s(literal 0 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (/.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))
(/.f64 (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))))))
(/.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (*.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (fabs.f64 (-.f64 m n)))))
(/.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 m n)))) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(/.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 m n))))))
(/.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l)))) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) #s(literal -1 binary64))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) (*.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 m n))))))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (exp.f64 (fabs.f64 (-.f64 m n)))))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) (neg.f64 (*.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (fabs.f64 (-.f64 m n))))))
(/.f64 (/.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (exp.f64 (fabs.f64 (-.f64 m n))))
(/.f64 (/.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) #s(literal 1 binary64)))
(/.f64 (/.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (*.f64 #s(literal 1 binary64) (exp.f64 (fabs.f64 (-.f64 m n)))))
(/.f64 (*.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) #s(literal -1 binary64)) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) #s(literal 1 binary64)) (*.f64 (exp.f64 (fabs.f64 (-.f64 m n))) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 m n)))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 m n)))) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 m n)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))))) (*.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 m n))))))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 m n))))))
(/.f64 (neg.f64 (/.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 m n)))))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l)))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))))) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l)))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) (exp.f64 (fabs.f64 (-.f64 m n))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))))) (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 m n)))))
(/.f64 (*.f64 (/.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal 1 binary64)) (exp.f64 (fabs.f64 (-.f64 m n))))
(/.f64 (*.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (/.f64 #s(literal -1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 m n)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) (/.f64 #s(literal -1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) (exp.f64 (fabs.f64 (-.f64 m n))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))))) (exp.f64 (fabs.f64 (-.f64 m n))))
(pow.f64 (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal 1 binary64))
(pow.f64 (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l)))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(*.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(*.f64 (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(*.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (/.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(*.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(*.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (exp.f64 (fabs.f64 (-.f64 m n)))))
(*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l)))) (/.f64 #s(literal -1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l)))) (*.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal 1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l)))) (/.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal 1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l)))) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal -1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) #s(literal -1 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))))
(*.f64 (exp.f64 l) (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (fabs.f64 (-.f64 m n)))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(*.f64 (exp.f64 l) (*.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (fabs.f64 (-.f64 m n)))) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))))
(*.f64 (exp.f64 l) (/.f64 (exp.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64)))) (*.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64)))) (/.f64 (exp.f64 l) (*.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (fabs.f64 (-.f64 m n))))))
(*.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l)))))
(*.f64 (/.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(*.f64 (pow.f64 (/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) #s(literal -1 binary64)) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(*.f64 (pow.f64 (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(*.f64 (/.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) #s(literal 1 binary64)) (/.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(*.f64 (/.f64 (exp.f64 l) #s(literal 1 binary64)) (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (fabs.f64 (-.f64 m n)))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(*.f64 (/.f64 (exp.f64 l) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (fabs.f64 (-.f64 m n)))))
(*.f64 (/.f64 (exp.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64)))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))))) (/.f64 #s(literal -1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (exp.f64 l)) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (fabs.f64 (-.f64 m n)))))
(exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l)))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l)))))
(neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l)))))
(/.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) #s(literal 1 binary64)))
(/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))))))
(/.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (exp.f64 (fabs.f64 (-.f64 m n))))
(/.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 m n))))))
(/.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (*.f64 #s(literal 1 binary64) (exp.f64 (fabs.f64 (-.f64 m n)))))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l)))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 m n)))))
(/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 m n))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 m n)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))))) (exp.f64 (fabs.f64 (-.f64 m n))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 m n))))))
(pow.f64 (exp.f64 (-.f64 (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))))
(*.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l)))))
(*.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))))
(*.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64)))
(*.f64 (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))) (/.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64)))
(*.f64 (exp.f64 l) (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (fabs.f64 (-.f64 m n)))))
(*.f64 (exp.f64 l) (*.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64)))
(*.f64 (exp.f64 l) (/.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (fabs.f64 (-.f64 m n)))) #s(literal 1 binary64)))
(*.f64 (exp.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64)))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 m n)))))
(*.f64 (exp.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (fabs.f64 (-.f64 m n)))) (exp.f64 l))
(*.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (exp.f64 (fabs.f64 (-.f64 m n))))))
(*.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n)))) (exp.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))))
(+.f64 l (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (fabs.f64 (-.f64 m n))))
(+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 n (*.f64 n #s(literal 1/4 binary64))))
(+.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 l (fabs.f64 (-.f64 m n))))
(+.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))) (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))))
(+.f64 (-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 m n))) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))
(+.f64 (-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (fabs.f64 (-.f64 m n))) l)
(-.f64 #s(literal 0 binary64) (-.f64 (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64))))))
(-.f64 (*.f64 n (*.f64 n #s(literal 1/4 binary64))) (-.f64 (fabs.f64 (-.f64 m n)) l))
(-.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))) (fabs.f64 (-.f64 m n)))
(-.f64 (+.f64 (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))) #s(literal 0 binary64)) (fabs.f64 (-.f64 m n)))
(fma.f64 n (*.f64 n #s(literal 1/4 binary64)) (-.f64 l (fabs.f64 (-.f64 m n))))
(fma.f64 n (*.f64 n #s(literal 1/4 binary64)) (neg.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)))
(fma.f64 #s(literal 1/4 binary64) (*.f64 n n) (-.f64 l (fabs.f64 (-.f64 m n))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 n n) (neg.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)))
(fma.f64 (*.f64 n #s(literal 1/4 binary64)) n (-.f64 l (fabs.f64 (-.f64 m n))))
(fma.f64 (*.f64 n #s(literal 1/4 binary64)) n (neg.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)))
(fma.f64 #s(literal -1 binary64) (fabs.f64 (-.f64 m n)) (+.f64 l (*.f64 n (*.f64 n #s(literal 1/4 binary64)))))
(fma.f64 (*.f64 n n) #s(literal 1/4 binary64) (-.f64 l (fabs.f64 (-.f64 m n))))
(fma.f64 (*.f64 n n) #s(literal 1/4 binary64) (neg.f64 (-.f64 (fabs.f64 (-.f64 m n)) l)))
(+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))))
(+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)) (+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(+.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))))
(+.f64 (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))
(+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))
(cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(-.f64 (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))))
(-.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K n)))) (cos.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K)))) (*.f64 (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K n)))) (sin.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K)))))
(-.f64 (*.f64 (cos.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K))) (cos.f64 (+.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K)) M))) (*.f64 (sin.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K))) (sin.f64 (+.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K)) M))))
(-.f64 (*.f64 (cos.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K))) (cos.f64 (+.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K)) M))) (*.f64 (sin.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K))) (sin.f64 (+.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K)) M))))
(-.f64 (*.f64 (cos.f64 (+.f64 M (/.f64 m (/.f64 #s(literal 2 binary64) K)))) (cos.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K)))) (*.f64 (sin.f64 (+.f64 M (/.f64 m (/.f64 #s(literal 2 binary64) K)))) (sin.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K)))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (+.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) (+.f64 (+.f64 M M) (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 M (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(fma.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (cos.f64 M) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(fma.f64 (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (cos.f64 M) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))))))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))))))
(fma.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 1/2 binary64) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(fma.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))) #s(literal -1/2 binary64) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))) #s(literal -1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))) (+.f64 (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 M) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))))))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))) M))))) #s(literal -4 binary64))
(+.f64 (*.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 #s(literal 0 binary64)) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(+.f64 (*.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 #s(literal 0 binary64)) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(+.f64 (*.f64 (cos.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (+.f64 m n)))) (sin.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))))
(+.f64 (*.f64 (cos.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))) (*.f64 (sin.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -2 binary64) (+.f64 m n)))) (sin.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))))
(cos.f64 (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n))))
(cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))))
(-.f64 (*.f64 (cos.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K))) (cos.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K)))) (*.f64 (sin.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K))) (sin.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K)))))
(-.f64 (*.f64 (cos.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K))) (cos.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K)))) (*.f64 (sin.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K))) (sin.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K)))))
(-.f64 (*.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (cos.f64 (*.f64 (/.f64 K #s(literal -2 binary64)) m))) (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (sin.f64 (*.f64 (/.f64 K #s(literal -2 binary64)) m))))
(-.f64 (*.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (cos.f64 (*.f64 m (/.f64 K #s(literal -2 binary64))))) (*.f64 (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) (sin.f64 (*.f64 m (/.f64 K #s(literal -2 binary64))))))
(-.f64 (*.f64 (cos.f64 (neg.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K)))) (cos.f64 (neg.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K))))) (*.f64 (sin.f64 (neg.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K)))) (sin.f64 (neg.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K))))))
(-.f64 (*.f64 (cos.f64 (neg.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K)))) (cos.f64 (neg.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K))))) (*.f64 (sin.f64 (neg.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K)))) (sin.f64 (neg.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 K #s(literal -2 binary64)) m)) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (*.f64 (/.f64 K #s(literal -2 binary64)) m)) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(-.f64 (*.f64 (cos.f64 (*.f64 m (/.f64 K #s(literal -2 binary64)))) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (*.f64 m (/.f64 K #s(literal -2 binary64)))) (sin.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (-.f64 #s(literal 0 binary64) n) (/.f64 K #s(literal -2 binary64)))) (cos.f64 (*.f64 (-.f64 #s(literal 0 binary64) m) (/.f64 K #s(literal -2 binary64))))) (*.f64 (sin.f64 (*.f64 (-.f64 #s(literal 0 binary64) n) (/.f64 K #s(literal -2 binary64)))) (sin.f64 (*.f64 (-.f64 #s(literal 0 binary64) m) (/.f64 K #s(literal -2 binary64))))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1 binary64) (/.f64 m (/.f64 #s(literal 2 binary64) K)))) (cos.f64 (*.f64 #s(literal 1 binary64) (/.f64 n (/.f64 #s(literal 2 binary64) K))))) (*.f64 (sin.f64 (*.f64 #s(literal 1 binary64) (/.f64 m (/.f64 #s(literal 2 binary64) K)))) (sin.f64 (*.f64 #s(literal 1 binary64) (/.f64 n (/.f64 #s(literal 2 binary64) K))))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1 binary64) (/.f64 n (/.f64 #s(literal 2 binary64) K)))) (cos.f64 (*.f64 #s(literal 1 binary64) (/.f64 m (/.f64 #s(literal 2 binary64) K))))) (*.f64 (sin.f64 (*.f64 #s(literal 1 binary64) (/.f64 n (/.f64 #s(literal 2 binary64) K)))) (sin.f64 (*.f64 #s(literal 1 binary64) (/.f64 m (/.f64 #s(literal 2 binary64) K))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 K #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) n))) (cos.f64 (*.f64 (/.f64 K #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) m)))) (*.f64 (sin.f64 (*.f64 (/.f64 K #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) n))) (sin.f64 (*.f64 (/.f64 K #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) m)))))
(-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 K #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) m))) (cos.f64 (*.f64 (/.f64 K #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) n)))) (*.f64 (sin.f64 (*.f64 (/.f64 K #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) m))) (sin.f64 (*.f64 (/.f64 K #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) n)))))
(-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K)) #s(literal 1 binary64))) (cos.f64 (*.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K)) #s(literal 1 binary64)))) (*.f64 (sin.f64 (*.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K)) #s(literal 1 binary64))) (sin.f64 (*.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K)) #s(literal 1 binary64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K)) #s(literal 1 binary64))) (cos.f64 (*.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K)) #s(literal 1 binary64)))) (*.f64 (sin.f64 (*.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K)) #s(literal 1 binary64))) (sin.f64 (*.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K)) #s(literal 1 binary64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 (-.f64 #s(literal 0 binary64) m) (/.f64 K #s(literal -2 binary64)))) (cos.f64 (*.f64 (-.f64 #s(literal 0 binary64) n) (/.f64 K #s(literal -2 binary64))))) (*.f64 (sin.f64 (*.f64 (-.f64 #s(literal 0 binary64) m) (/.f64 K #s(literal -2 binary64)))) (sin.f64 (*.f64 (-.f64 #s(literal 0 binary64) n) (/.f64 K #s(literal -2 binary64))))))
(fma.f64 (cos.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K))) (cos.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K))) (neg.f64 (*.f64 (sin.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K))) (sin.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K))))))
(fma.f64 (cos.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K))) (cos.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K))) (neg.f64 (*.f64 (sin.f64 (/.f64 m (/.f64 #s(literal 2 binary64) K))) (sin.f64 (/.f64 n (/.f64 #s(literal 2 binary64) K))))))
(*.f64 K (*.f64 n #s(literal -1/2 binary64)))
(*.f64 n (/.f64 K #s(literal -2 binary64)))
(*.f64 #s(literal -1/2 binary64) (*.f64 K n))
(*.f64 (*.f64 K n) #s(literal -1/2 binary64))
(*.f64 (/.f64 K #s(literal -2 binary64)) n)
(*.f64 (*.f64 n #s(literal -1/2 binary64)) K)
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))) #s(literal -1 binary64)))
(cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))
(/.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal -1 binary64))
(pow.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))))
(*.f64 (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64)))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 K (*.f64 n #s(literal -1/2 binary64))))))

simplify468.0ms (2.6%)

Algorithm
1×egg-herbie
Rules
5570×*-lowering-*.f32
5570×*-lowering-*.f64
3828×+-lowering-+.f64
3828×+-lowering-+.f32
1318×distribute-lft-in
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0131220281
1432119101
0816419101
Stop Event
1×iter limit
1×node limit
Counts
792 → 792
Calls
Call 1
Inputs
(+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))
(+ (cos (* 1/2 (* K (+ m n)))) (+ (* 1/2 (* M (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n))))))))
(+ (cos (* 1/2 (* K (+ m n)))) (+ (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))) (* M (+ (* 1/2 (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n)))))) (* M (+ (* -1/2 (cos (* 1/2 (* K (+ m n))))) (* 1/2 (- (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* -1/2 (cos (* 1/2 (* K (+ m n)))))))))))))
(+ (cos (* 1/2 (* K (+ m n)))) (+ (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))) (* M (+ (* 1/2 (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n)))))) (* M (+ (* -1/2 (cos (* 1/2 (* K (+ m n))))) (+ (* 1/2 (* M (- (* -1/6 (sin (* 1/2 (* K (+ m n))))) (* -1/6 (sin (* -1/2 (* K (+ m n)))))))) (* 1/2 (- (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* -1/2 (cos (* 1/2 (* K (+ m n))))))))))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(cos M)
(+ (cos M) (* 1/2 (* K (- (* 1/2 (* (sin M) (+ m n))) (* -1/2 (* (sin M) (+ m n)))))))
(+ (cos M) (* K (+ (* -1/8 (* K (* (cos M) (pow (+ m n) 2)))) (* 1/2 (- (* 1/2 (* (sin M) (+ m n))) (* -1/2 (* (sin M) (+ m n))))))))
(+ (cos M) (* K (+ (* 1/2 (- (* 1/2 (* (sin M) (+ m n))) (* -1/2 (* (sin M) (+ m n))))) (* K (+ (* -1/8 (* (cos M) (pow (+ m n) 2))) (* 1/2 (* K (- (* -1/48 (* (sin M) (pow (+ m n) 3))) (* 1/48 (* (sin M) (pow (+ m n) 3)))))))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n)))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (+ (* m (+ (* -1/2 (* K (* (cos M) (sin (* 1/2 (* K n)))))) (* 1/2 (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))) (* (cos M) (cos (* 1/2 (* K n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (+ (* m (+ (* -1/2 (* K (* (cos M) (sin (* 1/2 (* K n)))))) (+ (* 1/2 (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))) (* m (+ (* -1/8 (* (pow K 2) (* (cos M) (cos (* 1/2 (* K n)))))) (* 1/2 (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n))))))))))))) (* (cos M) (cos (* 1/2 (* K n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (+ (* m (+ (* -1/2 (* K (* (cos M) (sin (* 1/2 (* K n)))))) (+ (* 1/2 (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))) (* m (+ (* -1/8 (* (pow K 2) (* (cos M) (cos (* 1/2 (* K n)))))) (+ (* 1/2 (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n)))))))) (* m (+ (* 1/48 (* (pow K 3) (* (cos M) (sin (* 1/2 (* K n)))))) (* 1/2 (- (* -1/48 (* (pow K 3) (sin (+ M (* 1/2 (* K n)))))) (* 1/48 (* (pow K 3) (sin (+ M (* -1/2 (* K n)))))))))))))))) (* (cos M) (cos (* 1/2 (* K n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m)))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m)))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m)))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m)))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m)))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (+ (* n (+ (* -1/2 (* K (* (cos M) (sin (* 1/2 (* K m)))))) (* 1/2 (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))) (* (cos M) (cos (* 1/2 (* K m))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (+ (* n (+ (* -1/2 (* K (* (cos M) (sin (* 1/2 (* K m)))))) (+ (* 1/2 (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))) (* n (+ (* -1/8 (* (pow K 2) (* (cos M) (cos (* 1/2 (* K m)))))) (* 1/2 (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m))))))))))))) (* (cos M) (cos (* 1/2 (* K m))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (+ (* n (+ (* -1/2 (* K (* (cos M) (sin (* 1/2 (* K m)))))) (+ (* 1/2 (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))) (* n (+ (* -1/8 (* (pow K 2) (* (cos M) (cos (* 1/2 (* K m)))))) (+ (* 1/2 (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m)))))))) (* n (+ (* 1/48 (* (pow K 3) (* (cos M) (sin (* 1/2 (* K m)))))) (* 1/2 (- (* -1/48 (* (pow K 3) (sin (+ M (* 1/2 (* K m)))))) (* 1/48 (* (pow K 3) (sin (+ M (* -1/2 (* K m)))))))))))))))) (* (cos M) (cos (* 1/2 (* K m))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n)))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n)))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n)))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n)))))))
(/ (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))
(+ (* 1/2 (/ (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* M (- (* 1/2 (/ (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (+ m n) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* 1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))
(+ (* 1/2 (/ (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* M (- (+ (* 1/2 (/ (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (+ (* -1/2 (/ (cos (* 1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* -1/2 (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))) (+ (* -1 (* (+ m n) (- (* 1/2 (/ (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (+ m n) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (+ 1 (* 1/2 (pow (+ m n) 2))) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (* -1 (/ (* (+ m n) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* 1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))
(+ (* 1/2 (/ (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* M (- (+ (* 1/2 (/ (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (+ (* -1/2 (/ (cos (* 1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* 1/2 (/ (- (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* -1/2 (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (* 1/2 (/ (- (* -1/6 (sin (* 1/2 (* K (+ m n))))) (* -1/6 (sin (* -1/2 (* K (+ m n)))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1 (* (+ m n) (- (+ (* -1/2 (/ (cos (* 1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* -1/2 (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))) (+ (* -1 (* (+ m n) (- (* 1/2 (/ (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (+ m n) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (+ 1 (* 1/2 (pow (+ m n) 2))) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (+ (* (+ 1 (* 1/2 (pow (+ m n) 2))) (- (* 1/2 (/ (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (+ m n) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (* (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n))))))) (+ (* -1 (+ m n)) (* -1/6 (pow (+ m n) 3)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))))) (+ (* -1 (* (+ m n) (- (* 1/2 (/ (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (+ m n) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (+ 1 (* 1/2 (pow (+ m n) 2))) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (* -1 (/ (* (+ m n) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* 1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(+ (* 1/2 (/ (* K (- (* 1/2 (* (sin M) (+ m n))) (* -1/2 (* (sin M) (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))))
(+ (* K (+ (* -1/8 (/ (* K (* (cos M) (pow (+ m n) 2))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* (sin M) (+ m n))) (* -1/2 (* (sin M) (+ m n)))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))))
(+ (* K (+ (* 1/2 (/ (- (* 1/2 (* (sin M) (+ m n))) (* -1/2 (* (sin M) (+ m n)))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (* K (+ (* -1/8 (/ (* (cos M) (pow (+ m n) 2)) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (* K (- (* -1/48 (* (sin M) (pow (+ m n) 3))) (* 1/48 (* (sin M) (pow (+ m n) 3))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))
(+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* m (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (cos M) (cos (* 1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))
(+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* m (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* m (- (+ (* -1/8 (/ (* (pow K 2) (* (cos M) (cos (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (+ (* (- (* 1/2 n) M) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n)))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (cos M) (cos (* 1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))
(+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* m (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* m (- (+ (* -1/8 (/ (* (pow K 2) (* (cos M) (cos (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* 1/2 (/ (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* m (- (+ (* 1/48 (/ (* (pow K 3) (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/48 (* (pow K 3) (sin (+ M (* 1/2 (* K n)))))) (* 1/48 (* (pow K 3) (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (+ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (+ (* (- (* 1/2 n) M) (- (+ (* -1/8 (/ (* (pow K 2) (* (cos M) (cos (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (+ (* (- (* 1/2 n) M) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n)))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))) (/ (* (+ (* 1/6 (pow (- (* 1/2 n) M) 3)) (* 1/4 (- (* 1/2 n) M))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n)))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))))))) (+ (* (- (* 1/2 n) M) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n)))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (cos M) (cos (* 1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m))))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m))))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m))))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m))))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))
(+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* n (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (cos M) (cos (* 1/2 (* K m)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))
(+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* n (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* n (- (+ (* -1/8 (/ (* (pow K 2) (* (cos M) (cos (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (+ (* (- (* 1/2 m) M) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m)))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (cos M) (cos (* 1/2 (* K m)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))
(+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* n (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* n (- (+ (* -1/8 (/ (* (pow K 2) (* (cos M) (cos (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* 1/2 (/ (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* n (- (+ (* 1/48 (/ (* (pow K 3) (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/48 (* (pow K 3) (sin (+ M (* 1/2 (* K m)))))) (* 1/48 (* (pow K 3) (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (+ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (+ (* (- (* 1/2 m) M) (- (+ (* -1/8 (/ (* (pow K 2) (* (cos M) (cos (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (+ (* (- (* 1/2 m) M) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m)))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))) (/ (* (+ (* 1/6 (pow (- (* 1/2 m) M) 3)) (* 1/4 (- (* 1/2 m) M))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m)))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))))))) (+ (* (- (* 1/2 m) M) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m)))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (cos M) (cos (* 1/2 (* K m)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n))))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n))))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n))))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n))))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))
(+ (* -1 (* l (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))) (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))
(+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (+ (* l (- (* -1 (* l (+ (* -1 (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (* 1/2 (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))) (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))
(+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (* 1/2 (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))) (+ (* -1/2 (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (* 1/6 (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))))) (+ (* -1 (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (* 1/2 (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))) (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))
(- (+ (cos (* -1/2 (* K (+ m n)))) (* M (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))))) (cos (* 1/2 (* K (+ m n)))))
(- (+ (cos (* -1/2 (* K (+ m n)))) (* M (- (+ (sin (* 1/2 (* K (+ m n)))) (* M (- (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* -1/2 (cos (* 1/2 (* K (+ m n)))))))) (sin (* -1/2 (* K (+ m n))))))) (cos (* 1/2 (* K (+ m n)))))
(- (+ (cos (* -1/2 (* K (+ m n)))) (* M (- (+ (sin (* 1/2 (* K (+ m n)))) (* M (- (+ (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* M (- (* -1/6 (sin (* 1/2 (* K (+ m n))))) (* -1/6 (sin (* -1/2 (* K (+ m n)))))))) (* -1/2 (cos (* 1/2 (* K (+ m n)))))))) (sin (* -1/2 (* K (+ m n))))))) (cos (* 1/2 (* K (+ m n)))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))
(- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))
(- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))
(- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))
(* K (- (* 1/2 (* (sin M) (+ m n))) (* -1/2 (* (sin M) (+ m n)))))
(* K (- (+ (* 1/2 (* (sin M) (+ m n))) (* (pow K 2) (- (* -1/48 (* (sin M) (pow (+ m n) 3))) (* 1/48 (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n)))))
(* K (- (+ (* 1/2 (* (sin M) (+ m n))) (* (pow K 2) (- (+ (* -1/48 (* (sin M) (pow (+ m n) 3))) (* (pow K 2) (- (* 1/3840 (* (sin M) (pow (+ m n) 5))) (* -1/3840 (* (sin M) (pow (+ m n) 5)))))) (* 1/48 (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n)))))
(* K (- (+ (* 1/2 (* (sin M) (+ m n))) (* (pow K 2) (- (+ (* -1/48 (* (sin M) (pow (+ m n) 3))) (* (pow K 2) (- (+ (* 1/3840 (* (sin M) (pow (+ m n) 5))) (* (pow K 2) (- (* -1/645120 (* (sin M) (pow (+ m n) 7))) (* 1/645120 (* (sin M) (pow (+ m n) 7)))))) (* -1/3840 (* (sin M) (pow (+ m n) 5)))))) (* 1/48 (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n)))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))
(- (+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))))) (cos (+ M (* 1/2 (* K n)))))
(- (+ (cos (+ M (* -1/2 (* K n)))) (* m (- (+ (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* m (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))))) (cos (+ M (* 1/2 (* K n)))))
(- (+ (cos (+ M (* -1/2 (* K n)))) (* m (- (+ (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* m (- (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* m (- (* -1/48 (* (pow K 3) (sin (+ M (* 1/2 (* K n)))))) (* 1/48 (* (pow K 3) (sin (+ M (* -1/2 (* K n))))))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))))) (cos (+ M (* 1/2 (* K n)))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))
(- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))
(- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))
(- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))
(- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))
(- (+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))))) (cos (+ M (* 1/2 (* K m)))))
(- (+ (cos (+ M (* -1/2 (* K m)))) (* n (- (+ (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* n (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))))) (cos (+ M (* 1/2 (* K m)))))
(- (+ (cos (+ M (* -1/2 (* K m)))) (* n (- (+ (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* n (- (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* n (- (* -1/48 (* (pow K 3) (sin (+ M (* 1/2 (* K m)))))) (* 1/48 (* (pow K 3) (sin (+ M (* -1/2 (* K m))))))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))))) (cos (+ M (* 1/2 (* K m)))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))
(- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))
(- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))
(- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))
(cos (* -1/2 (* K (+ m n))))
(+ (cos (* -1/2 (* K (+ m n)))) (* -1 (* M (sin (* -1/2 (* K (+ m n)))))))
(+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K (+ m n)))))) (sin (* -1/2 (* K (+ m n)))))))
(+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* 1/6 (* M (sin (* -1/2 (* K (+ m n)))))))) (sin (* -1/2 (* K (+ m n)))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos M)
(+ (cos M) (* 1/2 (* K (* (sin M) (+ m n)))))
(+ (cos M) (* K (- (* -1/8 (* K (* (cos M) (pow (+ m n) 2)))) (* -1/2 (* (sin M) (+ m n))))))
(+ (cos M) (* K (- (* K (+ (* -1/8 (* (cos M) (pow (+ m n) 2))) (* -1/48 (* K (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K n))))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* -1/8 (* (pow K 2) (* m (cos (+ M (* -1/2 (* K n))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/48 (* (pow K 3) (* m (sin (+ M (* -1/2 (* K n))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos (+ M (* -1/2 (* K m))))
(+ (cos (+ M (* -1/2 (* K m)))) (* 1/2 (* K (* n (sin (+ M (* -1/2 (* K m))))))))
(+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* -1/8 (* (pow K 2) (* n (cos (+ M (* -1/2 (* K m))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))
(+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/48 (* (pow K 3) (* n (sin (+ M (* -1/2 (* K m))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
1
(+ 1 (* -1/2 (pow M 2)))
(+ 1 (* (pow M 2) (- (* 1/24 (pow M 2)) 1/2)))
(+ 1 (* (pow M 2) (- (* (pow M 2) (+ 1/24 (* -1/720 (pow M 2)))) 1/2)))
(cos M)
(cos M)
(cos M)
(cos M)
(cos M)
(cos M)
(cos M)
(cos M)
(cos (* -1/2 (* K n)))
(+ (cos (* -1/2 (* K n))) (* -1 (* M (sin (* -1/2 (* K n))))))
(+ (cos (* -1/2 (* K n))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K n))))) (sin (* -1/2 (* K n))))))
(+ (cos (* -1/2 (* K n))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K n)))) (* 1/6 (* M (sin (* -1/2 (* K n))))))) (sin (* -1/2 (* K n))))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos M)
(+ (cos M) (* 1/2 (* K (* n (sin M)))))
(+ (cos M) (* n (- (* -1/8 (* (pow K 2) (* n (cos M)))) (* -1/2 (* K (sin M))))))
(+ (cos M) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos M))) (* -1/48 (* (pow K 3) (* n (sin M)))))) (* -1/2 (* K (sin M))))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos M)
(+ (cos M) (* 1/2 (* K (* n (sin M)))))
(+ (cos M) (* K (- (* -1/8 (* K (* (pow n 2) (cos M)))) (* -1/2 (* n (sin M))))))
(+ (cos M) (* K (- (* K (+ (* -1/8 (* (pow n 2) (cos M))) (* -1/48 (* K (* (pow n 3) (sin M)))))) (* -1/2 (* n (sin M))))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(/ 1 (cos (* -1/2 (* K n))))
(+ (/ 1 (cos (* -1/2 (* K n)))) (/ (* M (sin (* -1/2 (* K n)))) (pow (cos (* -1/2 (* K n))) 2)))
(+ (* M (- (* M (- (* 1/2 (/ 1 (cos (* -1/2 (* K n))))) (* -1 (/ (pow (sin (* -1/2 (* K n))) 2) (pow (cos (* -1/2 (* K n))) 3))))) (* -1 (/ (sin (* -1/2 (* K n))) (pow (cos (* -1/2 (* K n))) 2))))) (/ 1 (cos (* -1/2 (* K n)))))
(+ (* M (- (* M (- (+ (* -1 (* M (+ (* -1 (/ (* (sin (* -1/2 (* K n))) (- (* 1/2 (/ 1 (cos (* -1/2 (* K n))))) (* -1 (/ (pow (sin (* -1/2 (* K n))) 2) (pow (cos (* -1/2 (* K n))) 3))))) (cos (* -1/2 (* K n))))) (+ (* -1/2 (/ (sin (* -1/2 (* K n))) (pow (cos (* -1/2 (* K n))) 2))) (* 1/6 (/ (sin (* -1/2 (* K n))) (pow (cos (* -1/2 (* K n))) 2))))))) (* 1/2 (/ 1 (cos (* -1/2 (* K n)))))) (* -1 (/ (pow (sin (* -1/2 (* K n))) 2) (pow (cos (* -1/2 (* K n))) 3))))) (* -1 (/ (sin (* -1/2 (* K n))) (pow (cos (* -1/2 (* K n))) 2))))) (/ 1 (cos (* -1/2 (* K n)))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/ 1 (cos (- (* -1/2 (* K n)) (* -1 M))))
(/ 1 (cos (- (* -1/2 (* K n)) (* -1 M))))
(/ 1 (cos (- (* -1/2 (* K n)) (* -1 M))))
(/ 1 (cos (- (* -1/2 (* K n)) (* -1 M))))
(/ 1 (cos M))
(+ (* -1/2 (/ (* K (* n (sin M))) (pow (cos M) 2))) (/ 1 (cos M)))
(+ (* n (- (* -1 (* n (+ (* -1/4 (/ (* (pow K 2) (pow (sin M) 2)) (pow (cos M) 3))) (* -1/8 (/ (pow K 2) (cos M)))))) (* 1/2 (/ (* K (sin M)) (pow (cos M) 2))))) (/ 1 (cos M)))
(+ (* n (- (* n (- (* -1 (* n (+ (* -1/2 (/ (* K (* (sin M) (+ (* -1/4 (/ (* (pow K 2) (pow (sin M) 2)) (pow (cos M) 3))) (* -1/8 (/ (pow K 2) (cos M)))))) (cos M))) (+ (* -1/48 (/ (* (pow K 3) (sin M)) (pow (cos M) 2))) (* 1/16 (/ (* (pow K 3) (sin M)) (pow (cos M) 2))))))) (+ (* -1/4 (/ (* (pow K 2) (pow (sin M) 2)) (pow (cos M) 3))) (* -1/8 (/ (pow K 2) (cos M)))))) (* 1/2 (/ (* K (sin M)) (pow (cos M) 2))))) (/ 1 (cos M)))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/ 1 (cos M))
(+ (* -1/2 (/ (* K (* n (sin M))) (pow (cos M) 2))) (/ 1 (cos M)))
(+ (* K (- (* -1 (* K (+ (* -1/4 (/ (* (pow n 2) (pow (sin M) 2)) (pow (cos M) 3))) (* -1/8 (/ (pow n 2) (cos M)))))) (* 1/2 (/ (* n (sin M)) (pow (cos M) 2))))) (/ 1 (cos M)))
(+ (* K (- (* K (- (* -1 (* K (+ (* -1/2 (/ (* n (* (sin M) (+ (* -1/4 (/ (* (pow n 2) (pow (sin M) 2)) (pow (cos M) 3))) (* -1/8 (/ (pow n 2) (cos M)))))) (cos M))) (+ (* -1/48 (/ (* (pow n 3) (sin M)) (pow (cos M) 2))) (* 1/16 (/ (* (pow n 3) (sin M)) (pow (cos M) 2))))))) (+ (* -1/4 (/ (* (pow n 2) (pow (sin M) 2)) (pow (cos M) 3))) (* -1/8 (/ (pow n 2) (cos M)))))) (* 1/2 (/ (* n (sin M)) (pow (cos M) 2))))) (/ 1 (cos M)))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(cos (* -1/2 (* K n)))
(+ (cos (* -1/2 (* K n))) (* -1 (* M (sin (* -1/2 (* K n))))))
(+ (cos (* -1/2 (* K n))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K n))))) (sin (* -1/2 (* K n))))))
(+ (cos (* -1/2 (* K n))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K n)))) (* 1/6 (* M (sin (* -1/2 (* K n))))))) (sin (* -1/2 (* K n))))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos M)
(+ (cos M) (* 1/2 (* K (* n (sin M)))))
(+ (cos M) (* n (- (* -1/8 (* (pow K 2) (* n (cos M)))) (* -1/2 (* K (sin M))))))
(+ (cos M) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos M))) (* -1/48 (* (pow K 3) (* n (sin M)))))) (* -1/2 (* K (sin M))))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos M)
(+ (cos M) (* 1/2 (* K (* n (sin M)))))
(+ (cos M) (* K (- (* -1/8 (* K (* (pow n 2) (cos M)))) (* -1/2 (* n (sin M))))))
(+ (cos M) (* K (- (* K (+ (* -1/8 (* (pow n 2) (cos M))) (* -1/48 (* K (* (pow n 3) (sin M)))))) (* -1/2 (* n (sin M))))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(cos (+ M (* -1/2 (* K n))))
(* -1/2 (* K n))
(+ M (* -1/2 (* K n)))
(+ M (* -1/2 (* K n)))
(+ M (* -1/2 (* K n)))
M
(* M (+ 1 (* -1/2 (/ (* K n) M))))
(* M (+ 1 (* -1/2 (/ (* K n) M))))
(* M (+ 1 (* -1/2 (/ (* K n) M))))
M
(* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))
(* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))
(* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))
M
(+ M (* -1/2 (* K n)))
(+ M (* -1/2 (* K n)))
(+ M (* -1/2 (* K n)))
(* -1/2 (* K n))
(* n (+ (* -1/2 K) (/ M n)))
(* n (+ (* -1/2 K) (/ M n)))
(* n (+ (* -1/2 K) (/ M n)))
(* -1/2 (* K n))
(* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))
(* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))
(* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))
M
(+ M (* -1/2 (* K n)))
(+ M (* -1/2 (* K n)))
(+ M (* -1/2 (* K n)))
(* -1/2 (* K n))
(* K (+ (* -1/2 n) (/ M K)))
(* K (+ (* -1/2 n) (/ M K)))
(* K (+ (* -1/2 n) (/ M K)))
(* -1/2 (* K n))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))
(fabs (- n m))
(+ (fabs (- n m)) (* -1 l))
(+ (fabs (- n m)) (* -1 l))
(+ (fabs (- n m)) (* -1 l))
(* -1 l)
(* l (- (/ (fabs (- n m)) l) 1))
(* l (- (/ (fabs (- n m)) l) 1))
(* l (- (/ (fabs (- n m)) l) 1))
(* -1 l)
(* -1 (* l (+ 1 (* -1 (/ (fabs (- n m)) l)))))
(* -1 (* l (+ 1 (* -1 (/ (fabs (- n m)) l)))))
(* -1 (* l (+ 1 (* -1 (/ (fabs (- n m)) l)))))
(- (fabs (- n m)) l)
(- (fabs (- n m)) l)
(- (fabs (- n m)) l)
(- (fabs (- n m)) l)
(- (fabs (- n m)) l)
(- (fabs (- n m)) l)
(- (fabs (- n m)) l)
(- (fabs (- n m)) l)
(- (fabs (neg (+ m (* -1 n)))) l)
(- (fabs (neg (+ m (* -1 n)))) l)
(- (fabs (neg (+ m (* -1 n)))) l)
(- (fabs (neg (+ m (* -1 n)))) l)
(- (fabs (- n m)) l)
(- (fabs (- n m)) l)
(- (fabs (- n m)) l)
(- (fabs (- n m)) l)
(- (fabs (- n m)) l)
(- (fabs (- n m)) l)
(- (fabs (- n m)) l)
(- (fabs (- n m)) l)
(- (fabs (+ n (* -1 m))) l)
(- (fabs (+ n (* -1 m))) l)
(- (fabs (+ n (* -1 m))) l)
(- (fabs (+ n (* -1 m))) l)
(exp (fabs (- n m)))
(+ (exp (fabs (- n m))) (* -1 (* l (exp (fabs (- n m))))))
(+ (exp (fabs (- n m))) (* l (+ (* -1 (exp (fabs (- n m)))) (* 1/2 (* l (exp (fabs (- n m))))))))
(+ (exp (fabs (- n m))) (* l (+ (* -1 (exp (fabs (- n m)))) (* l (+ (* -1/6 (* l (exp (fabs (- n m))))) (* 1/2 (exp (fabs (- n m)))))))))
(exp (- (fabs (- n m)) l))
(exp (- (fabs (- n m)) l))
(exp (- (fabs (- n m)) l))
(exp (- (fabs (- n m)) l))
(exp (+ (fabs (- n m)) (* -1 l)))
(exp (+ (fabs (- n m)) (* -1 l)))
(exp (+ (fabs (- n m)) (* -1 l)))
(exp (+ (fabs (- n m)) (* -1 l)))
(exp (- (fabs (- n m)) l))
(exp (- (fabs (- n m)) l))
(exp (- (fabs (- n m)) l))
(exp (- (fabs (- n m)) l))
(exp (- (fabs (- n m)) l))
(exp (- (fabs (- n m)) l))
(exp (- (fabs (- n m)) l))
(exp (- (fabs (- n m)) l))
(exp (- (fabs (neg (+ m (* -1 n)))) l))
(exp (- (fabs (neg (+ m (* -1 n)))) l))
(exp (- (fabs (neg (+ m (* -1 n)))) l))
(exp (- (fabs (neg (+ m (* -1 n)))) l))
(exp (- (fabs (- n m)) l))
(exp (- (fabs (- n m)) l))
(exp (- (fabs (- n m)) l))
(exp (- (fabs (- n m)) l))
(exp (- (fabs (- n m)) l))
(exp (- (fabs (- n m)) l))
(exp (- (fabs (- n m)) l))
(exp (- (fabs (- n m)) l))
(exp (- (fabs (+ n (* -1 m))) l))
(exp (- (fabs (+ n (* -1 m))) l))
(exp (- (fabs (+ n (* -1 m))) l))
(exp (- (fabs (+ n (* -1 m))) l))
(* -1 (fabs (- n m)))
(- l (fabs (- n m)))
(- l (fabs (- n m)))
(- l (fabs (- n m)))
l
(* l (+ 1 (* -1 (/ (fabs (- n m)) l))))
(* l (+ 1 (* -1 (/ (fabs (- n m)) l))))
(* l (+ 1 (* -1 (/ (fabs (- n m)) l))))
l
(* -1 (* l (- (/ (fabs (- n m)) l) 1)))
(* -1 (* l (- (/ (fabs (- n m)) l) 1)))
(* -1 (* l (- (/ (fabs (- n m)) l) 1)))
(- l (fabs (- n m)))
(- l (fabs (- n m)))
(- l (fabs (- n m)))
(- l (fabs (- n m)))
(- l (fabs (- n m)))
(- l (fabs (- n m)))
(- l (fabs (- n m)))
(- l (fabs (- n m)))
(- l (fabs (neg (+ m (* -1 n)))))
(- l (fabs (neg (+ m (* -1 n)))))
(- l (fabs (neg (+ m (* -1 n)))))
(- l (fabs (neg (+ m (* -1 n)))))
(- l (fabs (- n m)))
(- l (fabs (- n m)))
(- l (fabs (- n m)))
(- l (fabs (- n m)))
(- l (fabs (- n m)))
(- l (fabs (- n m)))
(- l (fabs (- n m)))
(- l (fabs (- n m)))
(- l (fabs (+ n (* -1 m))))
(- l (fabs (+ n (* -1 m))))
(- l (fabs (+ n (* -1 m))))
(- l (fabs (+ n (* -1 m))))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (neg (+ m (* -1 n))))
(fabs (neg (+ m (* -1 n))))
(fabs (neg (+ m (* -1 n))))
(fabs (neg (+ m (* -1 n))))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (- n m))
(fabs (+ n (* -1 m)))
(fabs (+ n (* -1 m)))
(fabs (+ n (* -1 m)))
(fabs (+ n (* -1 m)))
(/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))
(+ (* -1 (/ (* l (cos (* -1/2 (* K n)))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))
(+ (* l (- (* -1 (* l (+ (* -1 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))
(+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))))) (+ (* -1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/6 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))))))) (+ (* -1 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))
(/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))
(/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))
(/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))
(/ 1 (exp (- l (fabs (- n m)))))
(+ (* (pow n 2) (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (/ 1 (exp (- l (fabs (- n m))))))
(+ (* (pow n 2) (- (+ (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* (pow n 2) (- (* 1/384 (/ (pow K 4) (exp (- l (fabs (- n m)))))) (+ (* 1/32 (/ 1 (exp (- l (fabs (- n m)))))) (* 1/4 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (/ 1 (exp (- l (fabs (- n m))))))
(+ (* (pow n 2) (- (+ (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* (pow n 2) (- (+ (* 1/384 (/ (pow K 4) (exp (- l (fabs (- n m)))))) (* (pow n 2) (- (* -1/46080 (/ (pow K 6) (exp (- l (fabs (- n m)))))) (+ (* 1/384 (/ 1 (exp (- l (fabs (- n m)))))) (+ (* 1/32 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (* 1/4 (- (* 1/384 (/ (pow K 4) (exp (- l (fabs (- n m)))))) (+ (* 1/32 (/ 1 (exp (- l (fabs (- n m)))))) (* 1/4 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))))))))))) (+ (* 1/32 (/ 1 (exp (- l (fabs (- n m)))))) (* 1/4 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (/ 1 (exp (- l (fabs (- n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))
(/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(+ (* -1/8 (/ (* (pow K 2) (pow n 2)) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))
(+ (* (pow K 2) (+ (* -1/8 (/ (pow n 2) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/384 (/ (* (pow K 2) (pow n 4)) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))) (/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))
(+ (* (pow K 2) (+ (* -1/8 (/ (pow n 2) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* (pow K 2) (+ (* -1/46080 (/ (* (pow K 2) (pow n 6)) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/384 (/ (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))))) (/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(+ (/ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (cos (* -1/2 (* K n)))) (/ (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))) (cos (* -1/2 (* K n)))))
(+ (* l (+ (* 1/2 (/ (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))) (cos (* -1/2 (* K n))))) (/ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (cos (* -1/2 (* K n)))))) (/ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (cos (* -1/2 (* K n)))))
(+ (* l (+ (* l (+ (* 1/6 (/ (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))) (cos (* -1/2 (* K n))))) (* 1/2 (/ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (cos (* -1/2 (* K n))))))) (/ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (cos (* -1/2 (* K n)))))) (/ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (cos (* -1/2 (* K n)))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))) (cos (* -1/2 (* K n))))
(/ (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))) (cos (* -1/2 (* K n))))
(/ (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))) (cos (* -1/2 (* K n))))
(/ (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))) (cos (* -1/2 (* K n))))
(exp (- l (fabs (- n m))))
(+ (exp (- l (fabs (- n m)))) (* (pow n 2) (- (* 1/4 (exp (- l (fabs (- n m))))) (* -1/8 (* (pow K 2) (exp (- l (fabs (- n m)))))))))
(+ (exp (- l (fabs (- n m)))) (* (pow n 2) (- (+ (* 1/4 (exp (- l (fabs (- n m))))) (* (pow n 2) (- (* 1/32 (exp (- l (fabs (- n m))))) (+ (* -1/8 (* (pow K 2) (- (* 1/4 (exp (- l (fabs (- n m))))) (* -1/8 (* (pow K 2) (exp (- l (fabs (- n m))))))))) (* 1/384 (* (pow K 4) (exp (- l (fabs (- n m)))))))))) (* -1/8 (* (pow K 2) (exp (- l (fabs (- n m)))))))))
(+ (exp (- l (fabs (- n m)))) (* (pow n 2) (- (+ (* 1/4 (exp (- l (fabs (- n m))))) (* (pow n 2) (- (+ (* 1/32 (exp (- l (fabs (- n m))))) (* (pow n 2) (- (* 1/384 (exp (- l (fabs (- n m))))) (+ (* -1/8 (* (pow K 2) (- (* 1/32 (exp (- l (fabs (- n m))))) (+ (* -1/8 (* (pow K 2) (- (* 1/4 (exp (- l (fabs (- n m))))) (* -1/8 (* (pow K 2) (exp (- l (fabs (- n m))))))))) (* 1/384 (* (pow K 4) (exp (- l (fabs (- n m)))))))))) (+ (* -1/46080 (* (pow K 6) (exp (- l (fabs (- n m)))))) (* 1/384 (* (pow K 4) (- (* 1/4 (exp (- l (fabs (- n m))))) (* -1/8 (* (pow K 2) (exp (- l (fabs (- n m)))))))))))))) (+ (* -1/8 (* (pow K 2) (- (* 1/4 (exp (- l (fabs (- n m))))) (* -1/8 (* (pow K 2) (exp (- l (fabs (- n m))))))))) (* 1/384 (* (pow K 4) (exp (- l (fabs (- n m)))))))))) (* -1/8 (* (pow K 2) (exp (- l (fabs (- n m)))))))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))) (cos (* -1/2 (* K n))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(+ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (* 1/8 (* (pow K 2) (* (pow n 2) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))
(+ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (* (pow K 2) (- (* -1 (* (pow K 2) (+ (* -1/64 (* (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/384 (* (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (* -1/8 (* (pow n 2) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))))
(+ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (* (pow K 2) (- (* (pow K 2) (- (* -1 (* (pow K 2) (+ (* -1/46080 (* (pow n 6) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (+ (* 1/3072 (* (pow n 6) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/8 (* (pow n 2) (+ (* -1/64 (* (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/384 (* (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))))))) (+ (* -1/64 (* (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/384 (* (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (* -1/8 (* (pow n 2) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(exp (- (* 1/4 (pow n 2)) (fabs (- n m))))
(+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))
(+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* 1/2 (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))))))
(+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (+ (* 1/6 (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))
(exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))
(exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))
(exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))
(exp (- l (fabs (- n m))))
(+ (exp (- l (fabs (- n m)))) (* 1/4 (* (pow n 2) (exp (- l (fabs (- n m)))))))
(+ (exp (- l (fabs (- n m)))) (* (pow n 2) (+ (* 1/32 (* (pow n 2) (exp (- l (fabs (- n m)))))) (* 1/4 (exp (- l (fabs (- n m))))))))
(+ (exp (- l (fabs (- n m)))) (* (pow n 2) (+ (* 1/4 (exp (- l (fabs (- n m))))) (* (pow n 2) (+ (* 1/384 (* (pow n 2) (exp (- l (fabs (- n m)))))) (* 1/32 (exp (- l (fabs (- n m))))))))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))
(- (* 1/4 (pow n 2)) (fabs (- n m)))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
l
(* l (- (+ 1 (* 1/4 (/ (pow n 2) l))) (/ (fabs (- n m)) l)))
(* l (- (+ 1 (* 1/4 (/ (pow n 2) l))) (/ (fabs (- n m)) l)))
(* l (- (+ 1 (* 1/4 (/ (pow n 2) l))) (/ (fabs (- n m)) l)))
l
(* -1 (* l (- (* -1 (/ (- (* 1/4 (pow n 2)) (fabs (- n m))) l)) 1)))
(* -1 (* l (- (* -1 (/ (- (* 1/4 (pow n 2)) (fabs (- n m))) l)) 1)))
(* -1 (* l (- (* -1 (/ (- (* 1/4 (pow n 2)) (fabs (- n m))) l)) 1)))
(- l (fabs (- n m)))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(* 1/4 (pow n 2))
(* (pow n 2) (- (+ 1/4 (/ l (pow n 2))) (/ (fabs (- n m)) (pow n 2))))
(* (pow n 2) (- (+ 1/4 (/ l (pow n 2))) (/ (fabs (- n m)) (pow n 2))))
(* (pow n 2) (- (+ 1/4 (/ l (pow n 2))) (/ (fabs (- n m)) (pow n 2))))
(* 1/4 (pow n 2))
(* (pow n 2) (- (+ 1/4 (/ l (pow n 2))) (/ (fabs (neg (+ m (* -1 n)))) (pow n 2))))
(* (pow n 2) (- (+ 1/4 (/ l (pow n 2))) (/ (fabs (neg (+ m (* -1 n)))) (pow n 2))))
(* (pow n 2) (- (+ 1/4 (/ l (pow n 2))) (/ (fabs (neg (+ m (* -1 n)))) (pow n 2))))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))
(- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))
(- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))
(- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))
(cos (* 1/2 (* K (+ m n))))
(+ (cos (* 1/2 (* K (+ m n)))) (* -1 (* M (sin (* 1/2 (* K (+ m n)))))))
(+ (cos (* 1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* 1/2 (* K (+ m n)))))) (sin (* 1/2 (* K (+ m n)))))))
(+ (cos (* 1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* 1/2 (* K (+ m n))))) (* 1/6 (* M (sin (* 1/2 (* K (+ m n)))))))) (sin (* 1/2 (* K (+ m n)))))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos (- (* 1/2 (* K (+ m n))) (* -1 M)))
(cos (- (* 1/2 (* K (+ m n))) (* -1 M)))
(cos (- (* 1/2 (* K (+ m n))) (* -1 M)))
(cos (- (* 1/2 (* K (+ m n))) (* -1 M)))
(cos M)
(+ (cos M) (* -1/2 (* K (* (sin M) (+ m n)))))
(+ (cos M) (* K (- (* -1/8 (* K (* (cos M) (pow (+ m n) 2)))) (* 1/2 (* (sin M) (+ m n))))))
(+ (cos M) (* K (- (* K (+ (* -1/8 (* (cos M) (pow (+ m n) 2))) (* 1/48 (* K (* (sin M) (pow (+ m n) 3)))))) (* 1/2 (* (sin M) (+ m n))))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos (+ M (* 1/2 (* K n))))
(+ (cos (+ M (* 1/2 (* K n)))) (* -1/2 (* K (* m (sin (+ M (* 1/2 (* K n))))))))
(+ (cos (+ M (* 1/2 (* K n)))) (* m (- (* -1/8 (* (pow K 2) (* m (cos (+ M (* 1/2 (* K n))))))) (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))))))
(+ (cos (+ M (* 1/2 (* K n)))) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n)))))) (* 1/48 (* (pow K 3) (* m (sin (+ M (* 1/2 (* K n))))))))) (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos (+ M (* 1/2 (* K (- n (* -1 m))))))
(cos (+ M (* 1/2 (* K (- n (* -1 m))))))
(cos (+ M (* 1/2 (* K (- n (* -1 m))))))
(cos (+ M (* 1/2 (* K (- n (* -1 m))))))
(cos (+ M (* 1/2 (* K m))))
(+ (cos (+ M (* 1/2 (* K m)))) (* -1/2 (* K (* n (sin (+ M (* 1/2 (* K m))))))))
(+ (cos (+ M (* 1/2 (* K m)))) (* n (- (* -1/8 (* (pow K 2) (* n (cos (+ M (* 1/2 (* K m))))))) (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))))))
(+ (cos (+ M (* 1/2 (* K m)))) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m)))))) (* 1/48 (* (pow K 3) (* n (sin (+ M (* 1/2 (* K m))))))))) (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos (+ M (* 1/2 (* K (- m (* -1 n))))))
(cos (+ M (* 1/2 (* K (- m (* -1 n))))))
(cos (+ M (* 1/2 (* K (- m (* -1 n))))))
(cos (+ M (* 1/2 (* K (- m (* -1 n))))))
1
(+ 1 (* -1/8 (* (pow K 2) (pow (+ m n) 2))))
(+ 1 (* (pow K 2) (+ (* -1/8 (pow (+ m n) 2)) (* 1/384 (* (pow K 2) (pow (+ m n) 4))))))
(+ 1 (* (pow K 2) (+ (* -1/8 (pow (+ m n) 2)) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (pow (+ m n) 6))) (* 1/384 (pow (+ m n) 4)))))))
(cos (* 1/2 (* K (+ m n))))
(cos (* 1/2 (* K (+ m n))))
(cos (* 1/2 (* K (+ m n))))
(cos (* 1/2 (* K (+ m n))))
(cos (* 1/2 (* K (+ m n))))
(cos (* 1/2 (* K (+ m n))))
(cos (* 1/2 (* K (+ m n))))
(cos (* 1/2 (* K (+ m n))))
(cos (* 1/2 (* K n)))
(+ (cos (* 1/2 (* K n))) (* -1/2 (* K (* m (sin (* 1/2 (* K n)))))))
(+ (cos (* 1/2 (* K n))) (* m (- (* -1/8 (* (pow K 2) (* m (cos (* 1/2 (* K n)))))) (* 1/2 (* K (sin (* 1/2 (* K n))))))))
(+ (cos (* 1/2 (* K n))) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (* 1/2 (* K n))))) (* 1/48 (* (pow K 3) (* m (sin (* 1/2 (* K n)))))))) (* 1/2 (* K (sin (* 1/2 (* K n))))))))
(cos (* 1/2 (* K (+ m n))))
(cos (* 1/2 (* K (+ m n))))
(cos (* 1/2 (* K (+ m n))))
(cos (* 1/2 (* K (+ m n))))
(cos (* 1/2 (* K (- n (* -1 m)))))
(cos (* 1/2 (* K (- n (* -1 m)))))
(cos (* 1/2 (* K (- n (* -1 m)))))
(cos (* 1/2 (* K (- n (* -1 m)))))
(cos (* 1/2 (* K m)))
(+ (cos (* 1/2 (* K m))) (* -1/2 (* K (* n (sin (* 1/2 (* K m)))))))
(+ (cos (* 1/2 (* K m))) (* n (- (* -1/8 (* (pow K 2) (* n (cos (* 1/2 (* K m)))))) (* 1/2 (* K (sin (* 1/2 (* K m))))))))
(+ (cos (* 1/2 (* K m))) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (* 1/2 (* K m))))) (* 1/48 (* (pow K 3) (* n (sin (* 1/2 (* K m)))))))) (* 1/2 (* K (sin (* 1/2 (* K m))))))))
(cos (* 1/2 (* K (+ m n))))
(cos (* 1/2 (* K (+ m n))))
(cos (* 1/2 (* K (+ m n))))
(cos (* 1/2 (* K (+ m n))))
(cos (* 1/2 (* K (- m (* -1 n)))))
(cos (* 1/2 (* K (- m (* -1 n)))))
(cos (* 1/2 (* K (- m (* -1 n)))))
(cos (* 1/2 (* K (- m (* -1 n)))))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
(* -1/2 (* K n))
1
(+ 1 (* -1/8 (* (pow K 2) (pow n 2))))
(+ 1 (* (pow n 2) (+ (* -1/8 (pow K 2)) (* 1/384 (* (pow K 4) (pow n 2))))))
(+ 1 (* (pow n 2) (+ (* -1/8 (pow K 2)) (* (pow n 2) (+ (* -1/46080 (* (pow K 6) (pow n 2))) (* 1/384 (pow K 4)))))))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
1
(+ 1 (* -1/8 (* (pow K 2) (pow n 2))))
(+ 1 (* (pow K 2) (+ (* -1/8 (pow n 2)) (* 1/384 (* (pow K 2) (pow n 4))))))
(+ 1 (* (pow K 2) (+ (* -1/8 (pow n 2)) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (pow n 6))) (* 1/384 (pow n 4)))))))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
(cos (* -1/2 (* K n)))
Outputs
(+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))))))
(+ (cos (* 1/2 (* K (+ m n)))) (+ (* 1/2 (* M (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n))))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 M (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (sin.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))))) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))))
(+ (cos (* 1/2 (* K (+ m n)))) (+ (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))) (* M (+ (* 1/2 (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n)))))) (* M (+ (* -1/2 (cos (* 1/2 (* K (+ m n))))) (* 1/2 (- (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* -1/2 (cos (* 1/2 (* K (+ m n)))))))))))))
(+.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))) (*.f64 M (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (sin.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))))) (*.f64 M (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))))))))
(+ (cos (* 1/2 (* K (+ m n)))) (+ (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))) (* M (+ (* 1/2 (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n)))))) (* M (+ (* -1/2 (cos (* 1/2 (* K (+ m n))))) (+ (* 1/2 (* M (- (* -1/6 (sin (* 1/2 (* K (+ m n))))) (* -1/6 (sin (* -1/2 (* K (+ m n)))))))) (* 1/2 (- (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* -1/2 (cos (* 1/2 (* K (+ m n))))))))))))))
(+.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))) (*.f64 M (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (sin.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))))) (*.f64 M (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 M (*.f64 #s(literal -1/6 binary64) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (sin.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))))))))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(cos M)
(cos.f64 M)
(+ (cos M) (* 1/2 (* K (- (* 1/2 (* (sin M) (+ m n))) (* -1/2 (* (sin M) (+ m n)))))))
(+.f64 (cos.f64 M) (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 (+.f64 m n) (sin.f64 M))))
(+ (cos M) (* K (+ (* -1/8 (* K (* (cos M) (pow (+ m n) 2)))) (* 1/2 (- (* 1/2 (* (sin M) (+ m n))) (* -1/2 (* (sin M) (+ m n))))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 M)) (+.f64 m n)) (*.f64 (*.f64 #s(literal -1/8 binary64) K) (*.f64 (cos.f64 M) (*.f64 (+.f64 m n) (+.f64 m n)))))))
(+ (cos M) (* K (+ (* 1/2 (- (* 1/2 (* (sin M) (+ m n))) (* -1/2 (* (sin M) (+ m n))))) (* K (+ (* -1/8 (* (cos M) (pow (+ m n) 2))) (* 1/2 (* K (- (* -1/48 (* (sin M) (pow (+ m n) 3))) (* 1/48 (* (sin M) (pow (+ m n) 3)))))))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 M)) (+.f64 m n)) (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 M)) (*.f64 (+.f64 m n) (+.f64 m n))) (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 (*.f64 (sin.f64 M) (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n)))) #s(literal -1/24 binary64))))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (+ (* m (+ (* -1/2 (* K (* (cos M) (sin (* 1/2 (* K n)))))) (* 1/2 (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))) (* (cos M) (cos (* 1/2 (* K n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))) (+.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))) (*.f64 m (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (cos.f64 M)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (+ (* m (+ (* -1/2 (* K (* (cos M) (sin (* 1/2 (* K n)))))) (+ (* 1/2 (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))) (* m (+ (* -1/8 (* (pow K 2) (* (cos M) (cos (* 1/2 (* K n)))))) (* 1/2 (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n))))))))))))) (* (cos M) (cos (* 1/2 (* K n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))) (+.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))) (*.f64 m (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (cos.f64 M)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))))) (*.f64 m (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (*.f64 K K)) (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))) (*.f64 K K)))))))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (+ (* m (+ (* -1/2 (* K (* (cos M) (sin (* 1/2 (* K n)))))) (+ (* 1/2 (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))) (* m (+ (* -1/8 (* (pow K 2) (* (cos M) (cos (* 1/2 (* K n)))))) (+ (* 1/2 (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n)))))))) (* m (+ (* 1/48 (* (pow K 3) (* (cos M) (sin (* 1/2 (* K n)))))) (* 1/2 (- (* -1/48 (* (pow K 3) (sin (+ M (* 1/2 (* K n)))))) (* 1/48 (* (pow K 3) (sin (+ M (* -1/2 (* K n)))))))))))))))) (* (cos M) (cos (* 1/2 (* K n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))) (+.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))) (*.f64 m (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (cos.f64 M)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))))) (*.f64 m (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (*.f64 K K)) (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))) (*.f64 K K)))))) (*.f64 m (+.f64 (*.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 K (*.f64 K K))) (*.f64 (cos.f64 M) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 K (*.f64 K K))) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (*.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 K (*.f64 K K))) (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))))))))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m)))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m)))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m)))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m)))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (+ (* n (+ (* -1/2 (* K (* (cos M) (sin (* 1/2 (* K m)))))) (* 1/2 (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))) (* (cos M) (cos (* 1/2 (* K m))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))) (+.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))) (*.f64 n (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (cos.f64 M)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))))))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (+ (* n (+ (* -1/2 (* K (* (cos M) (sin (* 1/2 (* K m)))))) (+ (* 1/2 (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))) (* n (+ (* -1/8 (* (pow K 2) (* (cos M) (cos (* 1/2 (* K m)))))) (* 1/2 (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m))))))))))))) (* (cos M) (cos (* 1/2 (* K m))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))) (+.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))) (*.f64 n (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (cos.f64 M)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))))))) (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) (-.f64 (*.f64 (*.f64 K K) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))) (*.f64 (*.f64 K K) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))))))))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (+ (* n (+ (* -1/2 (* K (* (cos M) (sin (* 1/2 (* K m)))))) (+ (* 1/2 (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))) (* n (+ (* -1/8 (* (pow K 2) (* (cos M) (cos (* 1/2 (* K m)))))) (+ (* 1/2 (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m)))))))) (* n (+ (* 1/48 (* (pow K 3) (* (cos M) (sin (* 1/2 (* K m)))))) (* 1/2 (- (* -1/48 (* (pow K 3) (sin (+ M (* 1/2 (* K m)))))) (* 1/48 (* (pow K 3) (sin (+ M (* -1/2 (* K m)))))))))))))))) (* (cos M) (cos (* 1/2 (* K m))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))) (+.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))) (*.f64 n (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (cos.f64 M)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))))) (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) (-.f64 (*.f64 (*.f64 K K) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))) (*.f64 (*.f64 K K) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))))) (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 K (*.f64 K K))) (*.f64 (cos.f64 M) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 K (*.f64 K K))) (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (*.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 K (*.f64 K K))) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))))))))))))))))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n)))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n)))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n)))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n)))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))
(/ (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))
(/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m)))))
(+ (* 1/2 (/ (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* M (- (* 1/2 (/ (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (+ m n) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* 1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 M (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (sin.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m))))) (*.f64 (+.f64 m n) (/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m)))))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m)))))))
(+ (* 1/2 (/ (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* M (- (+ (* 1/2 (/ (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (+ (* -1/2 (/ (cos (* 1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* -1/2 (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))) (+ (* -1 (* (+ m n) (- (* 1/2 (/ (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (+ m n) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (+ 1 (* 1/2 (pow (+ m n) 2))) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (* -1 (/ (* (+ m n) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* 1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m))))) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m))))) (*.f64 M (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (sin.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 M (-.f64 (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) #s(literal -1/2 binary64)) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m)))))) (-.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m)))))) (*.f64 (+.f64 m n) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (sin.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m))))) (*.f64 (+.f64 m n) (/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m))))))))))) (*.f64 (+.f64 m n) (/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m)))))))))))
(+ (* 1/2 (/ (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* M (- (+ (* 1/2 (/ (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (+ (* -1/2 (/ (cos (* 1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* 1/2 (/ (- (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* -1/2 (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* M (- (* 1/2 (/ (- (* -1/6 (sin (* 1/2 (* K (+ m n))))) (* -1/6 (sin (* -1/2 (* K (+ m n)))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (+ (* -1 (* (+ m n) (- (+ (* -1/2 (/ (cos (* 1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* -1/2 (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))) (+ (* -1 (* (+ m n) (- (* 1/2 (/ (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (+ m n) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (+ 1 (* 1/2 (pow (+ m n) 2))) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (+ (* (+ 1 (* 1/2 (pow (+ m n) 2))) (- (* 1/2 (/ (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (+ m n) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (* (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n))))))) (+ (* -1 (+ m n)) (* -1/6 (pow (+ m n) 3)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))))) (+ (* -1 (* (+ m n) (- (* 1/2 (/ (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))) (* -1 (/ (* (+ m n) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (/ (* (+ 1 (* 1/2 (pow (+ m n) 2))) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n))))))))) (* -1 (/ (* (+ m n) (+ (cos (* 1/2 (* K (+ m n)))) (* 1/2 (- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))) (/ (cos (* 1/2 (* K (+ m n)))) (exp (- (+ l (* 1/4 (pow (+ m n) 2))) (fabs (- m n)))))))
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m))))) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m))))) (*.f64 M (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (sin.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 M (-.f64 (+.f64 (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) #s(literal -1/2 binary64)) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m)))))) (*.f64 M (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (sin.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m))))) (-.f64 (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (sin.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m))))) (*.f64 (+.f64 m n) (/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) (+.f64 m n))))) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n)))) (+.f64 m n)) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m))))))) (*.f64 (+.f64 m n) (-.f64 (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) #s(literal -1/2 binary64)) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m)))))) (-.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m)))))) (*.f64 (+.f64 m n) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (sin.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m))))) (*.f64 (+.f64 m n) (/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m))))))))))))))) (-.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) (/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m)))))) (*.f64 (+.f64 m n) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (sin.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m))))) (*.f64 (+.f64 m n) (/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m))))))))))) (*.f64 (+.f64 m n) (/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))) (exp.f64 (-.f64 (+.f64 l (*.f64 (*.f64 (+.f64 m n) (+.f64 m n)) #s(literal 1/4 binary64))) (fabs.f64 (-.f64 n m)))))))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (+ (* -1 M) (* 1/2 (+ m n))) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(+ (* 1/2 (/ (* K (- (* 1/2 (* (sin M) (+ m n))) (* -1/2 (* (sin M) (+ m n))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 (+.f64 m n) (sin.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m)))))))
(+ (* K (+ (* -1/8 (/ (* K (* (cos M) (pow (+ m n) 2))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* (sin M) (+ m n))) (* -1/2 (* (sin M) (+ m n)))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 K (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) K) (*.f64 (cos.f64 M) (*.f64 (+.f64 m n) (+.f64 m n)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 M)) (+.f64 m n)) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m)))))))))
(+ (* K (+ (* 1/2 (/ (- (* 1/2 (* (sin M) (+ m n))) (* -1/2 (* (sin M) (+ m n)))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (* K (+ (* -1/8 (/ (* (cos M) (pow (+ m n) 2)) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (* K (- (* -1/48 (* (sin M) (pow (+ m n) 3))) (* 1/48 (* (sin M) (pow (+ m n) 3))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))))))) (/ (cos M) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n))))))
(+.f64 (/.f64 (cos.f64 M) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 K (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 M)) (+.f64 m n)) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 K (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 M)) (*.f64 (+.f64 m n) (+.f64 m n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 (*.f64 (sin.f64 M) (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n)))) #s(literal -1/24 binary64))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m)))))))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))
(+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* m (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (cos M) (cos (* 1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 m (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (cos.f64 M)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))))
(+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* m (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* m (- (+ (* -1/8 (/ (* (pow K 2) (* (cos M) (cos (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (+ (* (- (* 1/2 n) M) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n)))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (cos M) (cos (* 1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (+.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 m (-.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (cos.f64 M)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))) (*.f64 m (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (*.f64 K K)) (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))) (*.f64 K K))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (cos.f64 M)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))))) (*.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)))) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))))))
(+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* m (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* m (- (+ (* -1/8 (/ (* (pow K 2) (* (cos M) (cos (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (+ (* 1/2 (/ (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* m (- (+ (* 1/48 (/ (* (pow K 3) (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/48 (* (pow K 3) (sin (+ M (* 1/2 (* K n)))))) (* 1/48 (* (pow K 3) (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (+ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (+ (* (- (* 1/2 n) M) (- (+ (* -1/8 (/ (* (pow K 2) (* (cos M) (cos (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (+ (* (- (* 1/2 n) M) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n)))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))) (/ (* (+ (* 1/6 (pow (- (* 1/2 n) M) 3)) (* 1/4 (- (* 1/2 n) M))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n)))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))))))) (+ (* (- (* 1/2 n) M) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K n))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 n) M) 2))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n)))))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))) (* (cos M) (cos (* 1/2 (* K n))))) (- (* 1/2 n) M)) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n))))))) (/ (* (cos M) (cos (* 1/2 (* K n)))) (exp (- (+ l (pow (- (* 1/2 n) M) 2)) (fabs (- m n)))))))
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (+.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 m (-.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (cos.f64 M)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))) (*.f64 m (-.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (*.f64 K K)) (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))) (*.f64 K K))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))) (*.f64 m (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 K (*.f64 K K))) (*.f64 (cos.f64 M) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 K (*.f64 K K))) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (*.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 K (*.f64 K K))) (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (cos.f64 M)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)))))) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (*.f64 K K)) (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))) (*.f64 K K))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (cos.f64 M)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))))) (*.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)))) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))))))) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M))) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))))))) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (cos.f64 M)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))))) (*.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)))) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m))))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m))))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m))))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))) (* (cos M) (cos (* 1/2 (* K (- n (* -1 m))))))) (exp (- (+ l (pow (- (* 1/2 (- n (* -1 m))) M) 2)) (fabs (neg (+ n (* -1 m)))))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m))))))
(+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* n (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (cos M) (cos (* 1/2 (* K m)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))) (+.f64 (*.f64 n (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (cos.f64 M)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))))) (/.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m))))))))
(+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* n (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* n (- (+ (* -1/8 (/ (* (pow K 2) (* (cos M) (cos (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (+ (* (- (* 1/2 m) M) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m)))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (cos M) (cos (* 1/2 (* K m)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))) (+.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 n (-.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (cos.f64 M)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m))))))) (*.f64 n (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (-.f64 (*.f64 (*.f64 K K) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))) (*.f64 (*.f64 K K) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))))) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (cos.f64 M)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m))))))))))
(+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* n (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* n (- (+ (* -1/8 (/ (* (pow K 2) (* (cos M) (cos (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (+ (* 1/2 (/ (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* n (- (+ (* 1/48 (/ (* (pow K 3) (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/48 (* (pow K 3) (sin (+ M (* 1/2 (* K m)))))) (* 1/48 (* (pow K 3) (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (+ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (+ (* (- (* 1/2 m) M) (- (+ (* -1/8 (/ (* (pow K 2) (* (cos M) (cos (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (+ (* (- (* 1/2 m) M) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m)))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))) (/ (* (+ (* 1/6 (pow (- (* 1/2 m) M) 3)) (* 1/4 (- (* 1/2 m) M))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m)))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))))))) (+ (* (- (* 1/2 m) M) (- (+ (* -1/2 (/ (* K (* (cos M) (sin (* 1/2 (* K m))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))) (* 1/2 (/ (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (+ 1/4 (* 1/2 (pow (- (* 1/2 m) M) 2))) (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m)))))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))))) (/ (* (+ (* 1/2 (- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))) (* (cos M) (cos (* 1/2 (* K m))))) (- (* 1/2 m) M)) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n))))))) (/ (* (cos M) (cos (* 1/2 (* K m)))) (exp (- (+ l (pow (- (* 1/2 m) M) 2)) (fabs (- m n)))))))
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))) (+.f64 (/.f64 (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 n (-.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (cos.f64 M)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m))))))) (*.f64 n (-.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (-.f64 (*.f64 (*.f64 K K) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))) (*.f64 (*.f64 K K) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))))) (*.f64 n (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 K (*.f64 K K))) (*.f64 (cos.f64 M) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 K (*.f64 K K))) (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (*.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 K (*.f64 K K))) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m))))))) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (cos.f64 M)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m))))))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)))))) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (-.f64 (*.f64 (*.f64 K K) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))) (*.f64 (*.f64 K K) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))))) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (cos.f64 M)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m))))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))))))) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (cos.f64 M)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M))))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m)))))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))) (*.f64 (cos.f64 M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) (fabs.f64 (-.f64 n m))))))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n))))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n))))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n))))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))) (* (cos M) (cos (* 1/2 (* K (- m (* -1 n))))))) (exp (- (+ l (pow (- (* 1/2 (- m (* -1 n))) M) 2)) (fabs (+ m (* -1 n))))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m)))))
(+ (* -1 (* l (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))) (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))
(-.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m)))))) (*.f64 l (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))))
(+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (+ (* l (- (* -1 (* l (+ (* -1 (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (* 1/2 (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))) (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))
(+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))) (*.f64 l (-.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))) (-.f64 #s(literal 0 binary64) l)) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (* 1/2 (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))) (+ (* -1/2 (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (* 1/6 (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))))) (+ (* -1 (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))) (* 1/2 (/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n))))))))) (+ (* 1/2 (/ (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))) (/ (* (cos M) (cos (* 1/2 (* K (+ m n))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (fabs (- m n)))))))
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))) (*.f64 l (-.f64 (*.f64 l (-.f64 (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))) (/.f64 (*.f64 #s(literal 1/6 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m)))))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m)))))))) (-.f64 #s(literal 0 binary64) l)) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M)) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (+ l (pow (- (* 1/2 (+ m n)) M) 2)) (fabs (- m n)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))))))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))) l)))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))) l)))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))) l)))
(/ (+ (* 1/2 (- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))) (* (cos M) (cos (* 1/2 (* K (+ m n)))))) (exp (- (pow (- (* 1/2 (+ m n)) M) 2) (+ (fabs (- m n)) (* -1 l)))))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (cos.f64 M))) (exp.f64 (+.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 m n)) M)) (fabs.f64 (-.f64 n m))) l)))
(- (cos (* -1/2 (* K (+ m n)))) (cos (* 1/2 (* K (+ m n)))))
(-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))))
(- (+ (cos (* -1/2 (* K (+ m n)))) (* M (- (sin (* 1/2 (* K (+ m n)))) (sin (* -1/2 (* K (+ m n))))))) (cos (* 1/2 (* K (+ m n)))))
(+.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (-.f64 (*.f64 M (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (sin.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))
(- (+ (cos (* -1/2 (* K (+ m n)))) (* M (- (+ (sin (* 1/2 (* K (+ m n)))) (* M (- (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* -1/2 (cos (* 1/2 (* K (+ m n)))))))) (sin (* -1/2 (* K (+ m n))))))) (cos (* 1/2 (* K (+ m n)))))
(+.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (-.f64 (*.f64 M (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (-.f64 (*.f64 M (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))) (sin.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))
(- (+ (cos (* -1/2 (* K (+ m n)))) (* M (- (+ (sin (* 1/2 (* K (+ m n)))) (* M (- (+ (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* M (- (* -1/6 (sin (* 1/2 (* K (+ m n))))) (* -1/6 (sin (* -1/2 (* K (+ m n)))))))) (* -1/2 (cos (* 1/2 (* K (+ m n)))))))) (sin (* -1/2 (* K (+ m n))))))) (cos (* 1/2 (* K (+ m n)))))
(+.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (-.f64 (*.f64 M (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (-.f64 (*.f64 M (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)))) (+.f64 (*.f64 M (*.f64 #s(literal -1/6 binary64) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (sin.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))))))) (sin.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (- (* -1/2 (* K (+ m n))) (* -1 M))) (cos (- (* 1/2 (* K (+ m n))) (* -1 M))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(* K (- (* 1/2 (* (sin M) (+ m n))) (* -1/2 (* (sin M) (+ m n)))))
(*.f64 (*.f64 K (sin.f64 M)) (+.f64 m n))
(* K (- (+ (* 1/2 (* (sin M) (+ m n))) (* (pow K 2) (- (* -1/48 (* (sin M) (pow (+ m n) 3))) (* 1/48 (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n)))))
(*.f64 K (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 M)) (+.f64 m n)) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 M)) (+.f64 m n)) (*.f64 (*.f64 (*.f64 (sin.f64 M) (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n)))) #s(literal -1/24 binary64)) (*.f64 K K)))))
(* K (- (+ (* 1/2 (* (sin M) (+ m n))) (* (pow K 2) (- (+ (* -1/48 (* (sin M) (pow (+ m n) 3))) (* (pow K 2) (- (* 1/3840 (* (sin M) (pow (+ m n) 5))) (* -1/3840 (* (sin M) (pow (+ m n) 5)))))) (* 1/48 (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n)))))
(*.f64 K (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 M)) (+.f64 m n)) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 M)) (+.f64 m n)) (*.f64 (*.f64 K K) (+.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) (sin.f64 M)) (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n)))) (+.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) (sin.f64 M)) (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n)))) (*.f64 (*.f64 K K) (*.f64 (*.f64 (sin.f64 M) (pow.f64 (+.f64 m n) #s(literal 5 binary64))) #s(literal 1/1920 binary64)))))))))
(* K (- (+ (* 1/2 (* (sin M) (+ m n))) (* (pow K 2) (- (+ (* -1/48 (* (sin M) (pow (+ m n) 3))) (* (pow K 2) (- (+ (* 1/3840 (* (sin M) (pow (+ m n) 5))) (* (pow K 2) (- (* -1/645120 (* (sin M) (pow (+ m n) 7))) (* 1/645120 (* (sin M) (pow (+ m n) 7)))))) (* -1/3840 (* (sin M) (pow (+ m n) 5)))))) (* 1/48 (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n)))))
(*.f64 K (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 M)) (+.f64 m n)) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 M)) (+.f64 m n)) (*.f64 (*.f64 K K) (+.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) (sin.f64 M)) (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n)))) (+.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) (sin.f64 M)) (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n)))) (*.f64 (*.f64 K K) (+.f64 (*.f64 (*.f64 #s(literal 1/3840 binary64) (sin.f64 M)) (pow.f64 (+.f64 m n) #s(literal 5 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/3840 binary64) (sin.f64 M)) (pow.f64 (+.f64 m n) #s(literal 5 binary64))) (*.f64 (*.f64 K K) (*.f64 (*.f64 (sin.f64 M) (pow.f64 (+.f64 m n) #s(literal 7 binary64))) #s(literal -1/322560 binary64))))))))))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K n)))) (cos (+ M (* 1/2 (* K n)))))
(-.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))
(- (+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))))) (cos (+ M (* 1/2 (* K n)))))
(+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (-.f64 (*.f64 m (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))))
(- (+ (cos (+ M (* -1/2 (* K n)))) (* m (- (+ (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* m (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))))) (cos (+ M (* 1/2 (* K n)))))
(+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (-.f64 (*.f64 m (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (+.f64 (*.f64 m (*.f64 #s(literal -1/8 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (*.f64 K K)) (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))) (*.f64 K K))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))))
(- (+ (cos (+ M (* -1/2 (* K n)))) (* m (- (+ (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))) (* m (- (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* m (- (* -1/48 (* (pow K 3) (sin (+ M (* 1/2 (* K n)))))) (* 1/48 (* (pow K 3) (sin (+ M (* -1/2 (* K n))))))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n))))))))) (cos (+ M (* 1/2 (* K n)))))
(+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (-.f64 (*.f64 m (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (+.f64 (*.f64 m (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (*.f64 K K))) (+.f64 (*.f64 m (-.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 K (*.f64 K K))) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (*.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 K (*.f64 K K))) (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))))) (*.f64 (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))) (*.f64 K K)) #s(literal 1/8 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))))))) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (- n (* -1 m)))))) (cos (+ M (* 1/2 (* K (- n (* -1 m)))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K m)))) (cos (+ M (* 1/2 (* K m)))))
(-.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))
(- (+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))))) (cos (+ M (* 1/2 (* K m)))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (-.f64 (*.f64 n (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))))
(- (+ (cos (+ M (* -1/2 (* K m)))) (* n (- (+ (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* n (- (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))))) (cos (+ M (* 1/2 (* K m)))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (-.f64 (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (+.f64 (*.f64 n (*.f64 #s(literal -1/8 binary64) (-.f64 (*.f64 (*.f64 K K) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))) (*.f64 (*.f64 K K) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))))))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))))
(- (+ (cos (+ M (* -1/2 (* K m)))) (* n (- (+ (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))) (* n (- (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* n (- (* -1/48 (* (pow K 3) (sin (+ M (* 1/2 (* K m)))))) (* 1/48 (* (pow K 3) (sin (+ M (* -1/2 (* K m))))))))) (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m))))))))) (cos (+ M (* 1/2 (* K m)))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (-.f64 (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (+.f64 (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))) (+.f64 (*.f64 n (-.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 K (*.f64 K K))) (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (*.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 K (*.f64 K K))) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))))) (*.f64 (*.f64 (*.f64 K K) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) #s(literal 1/8 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))))))) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (+ m n))))) (cos (+ M (* 1/2 (* K (+ m n))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(- (cos (+ M (* -1/2 (* K (- m (* -1 n)))))) (cos (+ M (* 1/2 (* K (- m (* -1 n)))))))
(-.f64 (cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M)))
(cos (* -1/2 (* K (+ m n))))
(cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)))
(+ (cos (* -1/2 (* K (+ m n)))) (* -1 (* M (sin (* -1/2 (* K (+ m n)))))))
(-.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (*.f64 M (sin.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)))))
(+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K (+ m n)))))) (sin (* -1/2 (* K (+ m n)))))))
(+.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (*.f64 M (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) M) (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)))) (sin.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))))))
(+ (cos (* -1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K (+ m n))))) (* 1/6 (* M (sin (* -1/2 (* K (+ m n)))))))) (sin (* -1/2 (* K (+ m n)))))))
(+.f64 (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))) (*.f64 M (-.f64 (*.f64 M (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/6 binary64) M) (sin.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)))))) (sin.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (- (* -1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos M)
(cos.f64 M)
(+ (cos M) (* 1/2 (* K (* (sin M) (+ m n)))))
(+.f64 (cos.f64 M) (*.f64 (*.f64 #s(literal 1/2 binary64) K) (*.f64 (+.f64 m n) (sin.f64 M))))
(+ (cos M) (* K (- (* -1/8 (* K (* (cos M) (pow (+ m n) 2)))) (* -1/2 (* (sin M) (+ m n))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 M)) (+.f64 m n)) (*.f64 (*.f64 #s(literal -1/8 binary64) K) (*.f64 (cos.f64 M) (*.f64 (+.f64 m n) (+.f64 m n)))))))
(+ (cos M) (* K (- (* K (+ (* -1/8 (* (cos M) (pow (+ m n) 2))) (* -1/48 (* K (* (sin M) (pow (+ m n) 3)))))) (* -1/2 (* (sin M) (+ m n))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 M)) (*.f64 (+.f64 m n) (+.f64 m n))) (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 K (sin.f64 M)) (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n))))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 M)) (+.f64 m n)))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(+ (cos (+ M (* -1/2 (* K n)))) (* 1/2 (* K (* m (sin (+ M (* -1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 K m) (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* -1/8 (* (pow K 2) (* m (cos (+ M (* -1/2 (* K n))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (*.f64 m (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) m) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))))))
(+ (cos (+ M (* -1/2 (* K n)))) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K n)))))) (* -1/48 (* (pow K 3) (* m (sin (+ M (* -1/2 (* K n))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K n)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (*.f64 m (+.f64 (*.f64 m (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (*.f64 K K))) (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) m) (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K m))))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))
(+ (cos (+ M (* -1/2 (* K m)))) (* 1/2 (* K (* n (sin (+ M (* -1/2 (* K m))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 K n) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))))))
(+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* -1/8 (* (pow K 2) (* n (cos (+ M (* -1/2 (* K m))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (*.f64 n (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) n) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))))) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))))))
(+ (cos (+ M (* -1/2 (* K m)))) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (+ M (* -1/2 (* K m)))))) (* -1/48 (* (pow K 3) (* n (sin (+ M (* -1/2 (* K m))))))))) (* -1/2 (* K (sin (+ M (* -1/2 (* K m)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))) (*.f64 n (+.f64 (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) n) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 K m)))))))))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
(cos (+ M (* -1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 (*.f64 (*.f64 K (+.f64 m n)) #s(literal -1/2 binary64)) M))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow M 2)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M)))
(+ 1 (* (pow M 2) (- (* 1/24 (pow M 2)) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) #s(literal 1/24 binary64)) #s(literal -1/2 binary64))))
(+ 1 (* (pow M 2) (- (* (pow M 2) (+ 1/24 (* -1/720 (pow M 2)))) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 M M) #s(literal -1/720 binary64)))) #s(literal -1/2 binary64))))
(cos M)
(cos.f64 M)
(cos M)
(cos.f64 M)
(cos M)
(cos.f64 M)
(cos M)
(cos.f64 M)
(cos M)
(cos.f64 M)
(cos M)
(cos.f64 M)
(cos M)
(cos.f64 M)
(cos M)
(cos.f64 M)
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(+ (cos (* -1/2 (* K n))) (* -1 (* M (sin (* -1/2 (* K n))))))
(-.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (*.f64 M (sin.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(+ (cos (* -1/2 (* K n))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K n))))) (sin (* -1/2 (* K n))))))
(+.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (*.f64 M (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) M) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (sin.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))))
(+ (cos (* -1/2 (* K n))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K n)))) (* 1/6 (* M (sin (* -1/2 (* K n))))))) (sin (* -1/2 (* K n))))))
(+.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (*.f64 M (-.f64 (*.f64 M (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (*.f64 (*.f64 #s(literal 1/6 binary64) M) (sin.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))) (sin.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos M)
(cos.f64 M)
(+ (cos M) (* 1/2 (* K (* n (sin M)))))
(+.f64 (cos.f64 M) (*.f64 #s(literal 1/2 binary64) (*.f64 K (*.f64 n (sin.f64 M)))))
(+ (cos M) (* n (- (* -1/8 (* (pow K 2) (* n (cos M)))) (* -1/2 (* K (sin M))))))
(+.f64 (cos.f64 M) (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 n (cos.f64 M))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 M))))))
(+ (cos M) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos M))) (* -1/48 (* (pow K 3) (* n (sin M)))))) (* -1/2 (* K (sin M))))))
(+.f64 (cos.f64 M) (*.f64 n (+.f64 (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 M)) (*.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 K (*.f64 K K))) (*.f64 n (sin.f64 M))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 M))))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos M)
(cos.f64 M)
(+ (cos M) (* 1/2 (* K (* n (sin M)))))
(+.f64 (cos.f64 M) (*.f64 #s(literal 1/2 binary64) (*.f64 K (*.f64 n (sin.f64 M)))))
(+ (cos M) (* K (- (* -1/8 (* K (* (pow n 2) (cos M)))) (* -1/2 (* n (sin M))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) K) (*.f64 (cos.f64 M) (*.f64 n n))) (*.f64 #s(literal 1/2 binary64) (*.f64 n (sin.f64 M))))))
(+ (cos M) (* K (- (* K (+ (* -1/8 (* (pow n 2) (cos M))) (* -1/48 (* K (* (pow n 3) (sin M)))))) (* -1/2 (* n (sin M))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 n n)) (cos.f64 M)) (*.f64 (*.f64 #s(literal -1/48 binary64) K) (*.f64 (sin.f64 M) (*.f64 n (*.f64 n n)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 n (sin.f64 M))))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ 1 (cos (* -1/2 (* K n))))
(/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(+ (/ 1 (cos (* -1/2 (* K n)))) (/ (* M (sin (* -1/2 (* K n)))) (pow (cos (* -1/2 (* K n))) 2)))
(+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (/.f64 (*.f64 M (sin.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (pow.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) #s(literal 2 binary64))))
(+ (* M (- (* M (- (* 1/2 (/ 1 (cos (* -1/2 (* K n))))) (* -1 (/ (pow (sin (* -1/2 (* K n))) 2) (pow (cos (* -1/2 (* K n))) 3))))) (* -1 (/ (sin (* -1/2 (* K n))) (pow (cos (* -1/2 (* K n))) 2))))) (/ 1 (cos (* -1/2 (* K n)))))
(+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (*.f64 M (+.f64 (*.f64 M (+.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) #s(literal 3 binary64))))) (/.f64 (sin.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (pow.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) #s(literal 2 binary64))))))
(+ (* M (- (* M (- (+ (* -1 (* M (+ (* -1 (/ (* (sin (* -1/2 (* K n))) (- (* 1/2 (/ 1 (cos (* -1/2 (* K n))))) (* -1 (/ (pow (sin (* -1/2 (* K n))) 2) (pow (cos (* -1/2 (* K n))) 3))))) (cos (* -1/2 (* K n))))) (+ (* -1/2 (/ (sin (* -1/2 (* K n))) (pow (cos (* -1/2 (* K n))) 2))) (* 1/6 (/ (sin (* -1/2 (* K n))) (pow (cos (* -1/2 (* K n))) 2))))))) (* 1/2 (/ 1 (cos (* -1/2 (* K n)))))) (* -1 (/ (pow (sin (* -1/2 (* K n))) 2) (pow (cos (* -1/2 (* K n))) 3))))) (* -1 (/ (sin (* -1/2 (* K n))) (pow (cos (* -1/2 (* K n))) 2))))) (/ 1 (cos (* -1/2 (* K n)))))
(+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (*.f64 M (+.f64 (*.f64 M (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (*.f64 M (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (pow.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) #s(literal 2 binary64))) #s(literal -1/3 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (+.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) #s(literal 3 binary64))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) #s(literal 3 binary64))))) (/.f64 (sin.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (pow.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) #s(literal 2 binary64))))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos (- (* -1/2 (* K n)) (* -1 M))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos (- (* -1/2 (* K n)) (* -1 M))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos (- (* -1/2 (* K n)) (* -1 M))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos (- (* -1/2 (* K n)) (* -1 M))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos M))
(/.f64 #s(literal 1 binary64) (cos.f64 M))
(+ (* -1/2 (/ (* K (* n (sin M))) (pow (cos M) 2))) (/ 1 (cos M)))
(+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 M)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 K (*.f64 n (sin.f64 M)))) (pow.f64 (cos.f64 M) #s(literal 2 binary64))))
(+ (* n (- (* -1 (* n (+ (* -1/4 (/ (* (pow K 2) (pow (sin M) 2)) (pow (cos M) 3))) (* -1/8 (/ (pow K 2) (cos M)))))) (* 1/2 (/ (* K (sin M)) (pow (cos M) 2))))) (/ 1 (cos M)))
(+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 M)) (*.f64 n (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) n) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) (pow.f64 (sin.f64 M) #s(literal 2 binary64)))) (pow.f64 (cos.f64 M) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 M)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 K (sin.f64 M)) (pow.f64 (cos.f64 M) #s(literal 2 binary64)))))))
(+ (* n (- (* n (- (* -1 (* n (+ (* -1/2 (/ (* K (* (sin M) (+ (* -1/4 (/ (* (pow K 2) (pow (sin M) 2)) (pow (cos M) 3))) (* -1/8 (/ (pow K 2) (cos M)))))) (cos M))) (+ (* -1/48 (/ (* (pow K 3) (sin M)) (pow (cos M) 2))) (* 1/16 (/ (* (pow K 3) (sin M)) (pow (cos M) 2))))))) (+ (* -1/4 (/ (* (pow K 2) (pow (sin M) 2)) (pow (cos M) 3))) (* -1/8 (/ (pow K 2) (cos M)))))) (* 1/2 (/ (* K (sin M)) (pow (cos M) 2))))) (/ 1 (cos M)))
(+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 M)) (*.f64 n (+.f64 (*.f64 n (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 n (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K (sin.f64 M)) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) (pow.f64 (sin.f64 M) #s(literal 2 binary64)))) (pow.f64 (cos.f64 M) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 M))))) (cos.f64 M)) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) (/.f64 (sin.f64 M) (pow.f64 (cos.f64 M) #s(literal 2 binary64)))) #s(literal 1/24 binary64))))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) (pow.f64 (sin.f64 M) #s(literal 2 binary64)))) (pow.f64 (cos.f64 M) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 M))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 K (sin.f64 M)) (pow.f64 (cos.f64 M) #s(literal 2 binary64)))))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos M))
(/.f64 #s(literal 1 binary64) (cos.f64 M))
(+ (* -1/2 (/ (* K (* n (sin M))) (pow (cos M) 2))) (/ 1 (cos M)))
(+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 M)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 K (*.f64 n (sin.f64 M)))) (pow.f64 (cos.f64 M) #s(literal 2 binary64))))
(+ (* K (- (* -1 (* K (+ (* -1/4 (/ (* (pow n 2) (pow (sin M) 2)) (pow (cos M) 3))) (* -1/8 (/ (pow n 2) (cos M)))))) (* 1/2 (/ (* n (sin M)) (pow (cos M) 2))))) (/ 1 (cos M)))
(+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 M)) (*.f64 K (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 n n) (pow.f64 (sin.f64 M) #s(literal 2 binary64))) (pow.f64 (cos.f64 M) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 n n)) (cos.f64 M))) (neg.f64 K)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 n (sin.f64 M)) (pow.f64 (cos.f64 M) #s(literal 2 binary64)))))))
(+ (* K (- (* K (- (* -1 (* K (+ (* -1/2 (/ (* n (* (sin M) (+ (* -1/4 (/ (* (pow n 2) (pow (sin M) 2)) (pow (cos M) 3))) (* -1/8 (/ (pow n 2) (cos M)))))) (cos M))) (+ (* -1/48 (/ (* (pow n 3) (sin M)) (pow (cos M) 2))) (* 1/16 (/ (* (pow n 3) (sin M)) (pow (cos M) 2))))))) (+ (* -1/4 (/ (* (pow n 2) (pow (sin M) 2)) (pow (cos M) 3))) (* -1/8 (/ (pow n 2) (cos M)))))) (* 1/2 (/ (* n (sin M)) (pow (cos M) 2))))) (/ 1 (cos M)))
(+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 M)) (*.f64 K (+.f64 (*.f64 K (-.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 n (sin.f64 M)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 n n) (pow.f64 (sin.f64 M) #s(literal 2 binary64))) (pow.f64 (cos.f64 M) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 n n)) (cos.f64 M))))) (cos.f64 M)) (*.f64 (/.f64 (*.f64 (sin.f64 M) (*.f64 n (*.f64 n n))) (pow.f64 (cos.f64 M) #s(literal 2 binary64))) #s(literal 1/24 binary64))) (neg.f64 K)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 n n) (pow.f64 (sin.f64 M) #s(literal 2 binary64))) (pow.f64 (cos.f64 M) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 n n)) (cos.f64 M))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 n (sin.f64 M)) (pow.f64 (cos.f64 M) #s(literal 2 binary64)))))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/ 1 (cos (+ M (* -1/2 (* K n)))))
(/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(+ (cos (* -1/2 (* K n))) (* -1 (* M (sin (* -1/2 (* K n))))))
(-.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (*.f64 M (sin.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(+ (cos (* -1/2 (* K n))) (* M (- (* -1/2 (* M (cos (* -1/2 (* K n))))) (sin (* -1/2 (* K n))))))
(+.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (*.f64 M (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) M) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (sin.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))))
(+ (cos (* -1/2 (* K n))) (* M (- (* M (+ (* -1/2 (cos (* -1/2 (* K n)))) (* 1/6 (* M (sin (* -1/2 (* K n))))))) (sin (* -1/2 (* K n))))))
(+.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (*.f64 M (-.f64 (*.f64 M (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (*.f64 (*.f64 #s(literal 1/6 binary64) M) (sin.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))) (sin.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (- (* -1/2 (* K n)) (* -1 M)))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos M)
(cos.f64 M)
(+ (cos M) (* 1/2 (* K (* n (sin M)))))
(+.f64 (cos.f64 M) (*.f64 #s(literal 1/2 binary64) (*.f64 K (*.f64 n (sin.f64 M)))))
(+ (cos M) (* n (- (* -1/8 (* (pow K 2) (* n (cos M)))) (* -1/2 (* K (sin M))))))
(+.f64 (cos.f64 M) (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 n (cos.f64 M))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 M))))))
(+ (cos M) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos M))) (* -1/48 (* (pow K 3) (* n (sin M)))))) (* -1/2 (* K (sin M))))))
(+.f64 (cos.f64 M) (*.f64 n (+.f64 (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 M)) (*.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 K (*.f64 K K))) (*.f64 n (sin.f64 M))))) (*.f64 #s(literal 1/2 binary64) (*.f64 K (sin.f64 M))))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos M)
(cos.f64 M)
(+ (cos M) (* 1/2 (* K (* n (sin M)))))
(+.f64 (cos.f64 M) (*.f64 #s(literal 1/2 binary64) (*.f64 K (*.f64 n (sin.f64 M)))))
(+ (cos M) (* K (- (* -1/8 (* K (* (pow n 2) (cos M)))) (* -1/2 (* n (sin M))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) K) (*.f64 (cos.f64 M) (*.f64 n n))) (*.f64 #s(literal 1/2 binary64) (*.f64 n (sin.f64 M))))))
(+ (cos M) (* K (- (* K (+ (* -1/8 (* (pow n 2) (cos M))) (* -1/48 (* K (* (pow n 3) (sin M)))))) (* -1/2 (* n (sin M))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 n n)) (cos.f64 M)) (*.f64 (*.f64 #s(literal -1/48 binary64) K) (*.f64 (sin.f64 M) (*.f64 n (*.f64 n n)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 n (sin.f64 M))))))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(cos (+ M (* -1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
M
(* M (+ 1 (* -1/2 (/ (* K n) M))))
(*.f64 M (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n) M)))
(* M (+ 1 (* -1/2 (/ (* K n) M))))
(*.f64 M (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n) M)))
(* M (+ 1 (* -1/2 (/ (* K n) M))))
(*.f64 M (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n) M)))
M
(* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))
(*.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n) M) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) M))
(* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))
(*.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n) M) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) M))
(* -1 (* M (- (* 1/2 (/ (* K n) M)) 1)))
(*.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n) M) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) M))
M
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* n (+ (* -1/2 K) (/ M n)))
(*.f64 n (+.f64 (*.f64 K #s(literal -1/2 binary64)) (/.f64 M n)))
(* n (+ (* -1/2 K) (/ M n)))
(*.f64 n (+.f64 (*.f64 K #s(literal -1/2 binary64)) (/.f64 M n)))
(* n (+ (* -1/2 K) (/ M n)))
(*.f64 n (+.f64 (*.f64 K #s(literal -1/2 binary64)) (/.f64 M n)))
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))
(*.f64 (-.f64 #s(literal 0 binary64) n) (-.f64 (*.f64 #s(literal 1/2 binary64) K) (/.f64 M n)))
(* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))
(*.f64 (-.f64 #s(literal 0 binary64) n) (-.f64 (*.f64 #s(literal 1/2 binary64) K) (/.f64 M n)))
(* -1 (* n (+ (* -1 (/ M n)) (* 1/2 K))))
(*.f64 (-.f64 #s(literal 0 binary64) n) (-.f64 (*.f64 #s(literal 1/2 binary64) K) (/.f64 M n)))
M
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(+ M (* -1/2 (* K n)))
(+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* K (+ (* -1/2 n) (/ M K)))
(*.f64 K (+.f64 (*.f64 n #s(literal -1/2 binary64)) (/.f64 M K)))
(* K (+ (* -1/2 n) (/ M K)))
(*.f64 K (+.f64 (*.f64 n #s(literal -1/2 binary64)) (/.f64 M K)))
(* K (+ (* -1/2 n) (/ M K)))
(*.f64 K (+.f64 (*.f64 n #s(literal -1/2 binary64)) (/.f64 M K)))
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) (/.f64 M K)) (neg.f64 K))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) (/.f64 M K)) (neg.f64 K))
(* -1 (* K (+ (* -1 (/ M K)) (* 1/2 n))))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) (/.f64 M K)) (neg.f64 K))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(+ (fabs (- n m)) (* -1 l))
(-.f64 (fabs.f64 (-.f64 n m)) l)
(+ (fabs (- n m)) (* -1 l))
(-.f64 (fabs.f64 (-.f64 n m)) l)
(+ (fabs (- n m)) (* -1 l))
(-.f64 (fabs.f64 (-.f64 n m)) l)
(* -1 l)
(-.f64 #s(literal 0 binary64) l)
(* l (- (/ (fabs (- n m)) l) 1))
(*.f64 l (+.f64 (/.f64 (fabs.f64 (-.f64 n m)) l) #s(literal -1 binary64)))
(* l (- (/ (fabs (- n m)) l) 1))
(*.f64 l (+.f64 (/.f64 (fabs.f64 (-.f64 n m)) l) #s(literal -1 binary64)))
(* l (- (/ (fabs (- n m)) l) 1))
(*.f64 l (+.f64 (/.f64 (fabs.f64 (-.f64 n m)) l) #s(literal -1 binary64)))
(* -1 l)
(-.f64 #s(literal 0 binary64) l)
(* -1 (* l (+ 1 (* -1 (/ (fabs (- n m)) l)))))
(*.f64 (-.f64 #s(literal 0 binary64) l) (-.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (-.f64 n m)) l)))
(* -1 (* l (+ 1 (* -1 (/ (fabs (- n m)) l)))))
(*.f64 (-.f64 #s(literal 0 binary64) l) (-.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (-.f64 n m)) l)))
(* -1 (* l (+ 1 (* -1 (/ (fabs (- n m)) l)))))
(*.f64 (-.f64 #s(literal 0 binary64) l) (-.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (-.f64 n m)) l)))
(- (fabs (- n m)) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (- n m)) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (- n m)) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (- n m)) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (- n m)) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (- n m)) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (- n m)) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (- n m)) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (neg (+ m (* -1 n)))) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (neg (+ m (* -1 n)))) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (neg (+ m (* -1 n)))) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (neg (+ m (* -1 n)))) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (- n m)) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (- n m)) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (- n m)) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (- n m)) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (- n m)) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (- n m)) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (- n m)) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (- n m)) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (+ n (* -1 m))) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (+ n (* -1 m))) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (+ n (* -1 m))) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(- (fabs (+ n (* -1 m))) l)
(-.f64 (fabs.f64 (-.f64 n m)) l)
(exp (fabs (- n m)))
(exp.f64 (fabs.f64 (-.f64 n m)))
(+ (exp (fabs (- n m))) (* -1 (* l (exp (fabs (- n m))))))
(-.f64 (exp.f64 (fabs.f64 (-.f64 n m))) (*.f64 l (exp.f64 (fabs.f64 (-.f64 n m)))))
(+ (exp (fabs (- n m))) (* l (+ (* -1 (exp (fabs (- n m)))) (* 1/2 (* l (exp (fabs (- n m))))))))
(+.f64 (exp.f64 (fabs.f64 (-.f64 n m))) (*.f64 l (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) l) (exp.f64 (fabs.f64 (-.f64 n m)))) (exp.f64 (fabs.f64 (-.f64 n m))))))
(+ (exp (fabs (- n m))) (* l (+ (* -1 (exp (fabs (- n m)))) (* l (+ (* -1/6 (* l (exp (fabs (- n m))))) (* 1/2 (exp (fabs (- n m)))))))))
(+.f64 (exp.f64 (fabs.f64 (-.f64 n m))) (*.f64 l (-.f64 (*.f64 l (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) l) (exp.f64 (fabs.f64 (-.f64 n m)))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (fabs.f64 (-.f64 n m)))))) (exp.f64 (fabs.f64 (-.f64 n m))))))
(exp (- (fabs (- n m)) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (- n m)) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (- n m)) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (- n m)) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (+ (fabs (- n m)) (* -1 l)))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (+ (fabs (- n m)) (* -1 l)))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (+ (fabs (- n m)) (* -1 l)))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (+ (fabs (- n m)) (* -1 l)))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (- n m)) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (- n m)) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (- n m)) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (- n m)) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (- n m)) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (- n m)) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (- n m)) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (- n m)) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (neg (+ m (* -1 n)))) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (neg (+ m (* -1 n)))) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (neg (+ m (* -1 n)))) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (neg (+ m (* -1 n)))) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (- n m)) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (- n m)) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (- n m)) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (- n m)) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (- n m)) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (- n m)) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (- n m)) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (- n m)) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (+ n (* -1 m))) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (+ n (* -1 m))) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (+ n (* -1 m))) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(exp (- (fabs (+ n (* -1 m))) l))
(exp.f64 (-.f64 (fabs.f64 (-.f64 n m)) l))
(* -1 (fabs (- n m)))
(-.f64 #s(literal 0 binary64) (fabs.f64 (-.f64 n m)))
(- l (fabs (- n m)))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (- n m)))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (- n m)))
(-.f64 l (fabs.f64 (-.f64 n m)))
l
(* l (+ 1 (* -1 (/ (fabs (- n m)) l))))
(*.f64 l (-.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (-.f64 n m)) l)))
(* l (+ 1 (* -1 (/ (fabs (- n m)) l))))
(*.f64 l (-.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (-.f64 n m)) l)))
(* l (+ 1 (* -1 (/ (fabs (- n m)) l))))
(*.f64 l (-.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (-.f64 n m)) l)))
l
(* -1 (* l (- (/ (fabs (- n m)) l) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) l) (+.f64 (/.f64 (fabs.f64 (-.f64 n m)) l) #s(literal -1 binary64)))
(* -1 (* l (- (/ (fabs (- n m)) l) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) l) (+.f64 (/.f64 (fabs.f64 (-.f64 n m)) l) #s(literal -1 binary64)))
(* -1 (* l (- (/ (fabs (- n m)) l) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) l) (+.f64 (/.f64 (fabs.f64 (-.f64 n m)) l) #s(literal -1 binary64)))
(- l (fabs (- n m)))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (- n m)))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (- n m)))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (- n m)))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (- n m)))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (- n m)))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (- n m)))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (- n m)))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (neg (+ m (* -1 n)))))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (neg (+ m (* -1 n)))))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (neg (+ m (* -1 n)))))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (neg (+ m (* -1 n)))))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (- n m)))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (- n m)))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (- n m)))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (- n m)))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (- n m)))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (- n m)))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (- n m)))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (- n m)))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (+ n (* -1 m))))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (+ n (* -1 m))))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (+ n (* -1 m))))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- l (fabs (+ n (* -1 m))))
(-.f64 l (fabs.f64 (-.f64 n m)))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (neg (+ m (* -1 n))))
(fabs.f64 (-.f64 n m))
(fabs (neg (+ m (* -1 n))))
(fabs.f64 (-.f64 n m))
(fabs (neg (+ m (* -1 n))))
(fabs.f64 (-.f64 n m))
(fabs (neg (+ m (* -1 n))))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (- n m))
(fabs.f64 (-.f64 n m))
(fabs (+ n (* -1 m)))
(fabs.f64 (-.f64 n m))
(fabs (+ n (* -1 m)))
(fabs.f64 (-.f64 n m))
(fabs (+ n (* -1 m)))
(fabs.f64 (-.f64 n m))
(fabs (+ n (* -1 m)))
(fabs.f64 (-.f64 n m))
(/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(+ (* -1 (/ (* l (cos (* -1/2 (* K n)))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))
(-.f64 (/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (/.f64 (*.f64 l (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(+ (* l (- (* -1 (* l (+ (* -1 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))
(+.f64 (/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (*.f64 l (-.f64 (*.f64 l (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))) (/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))))
(+ (* l (- (* l (- (* -1 (* l (+ (* -1 (+ (* -1 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))))) (+ (* -1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/6 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))))))) (+ (* -1 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))) (/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))
(+.f64 (/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (*.f64 l (-.f64 (*.f64 l (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) l) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) #s(literal -1/3 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))) (/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l)))
(/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l)))
(/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l)))
(/ (cos (* -1/2 (* K n))) (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l)))
(/ 1 (exp (- l (fabs (- n m)))))
(exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 l (fabs.f64 (-.f64 n m)))))
(+ (* (pow n 2) (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (/ 1 (exp (- l (fabs (- n m))))))
(+.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 (*.f64 n n) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 #s(literal -1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))))
(+ (* (pow n 2) (- (+ (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* (pow n 2) (- (* 1/384 (/ (pow K 4) (exp (- l (fabs (- n m)))))) (+ (* 1/32 (/ 1 (exp (- l (fabs (- n m)))))) (* 1/4 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (/ 1 (exp (- l (fabs (- n m))))))
(+.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 (*.f64 n n) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (*.f64 n n) (+.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/384 binary64) (pow.f64 K #s(literal 4 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 #s(literal 1/32 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))) (*.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 #s(literal -1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))))) (/.f64 #s(literal -1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))))))
(+ (* (pow n 2) (- (+ (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* (pow n 2) (- (+ (* 1/384 (/ (pow K 4) (exp (- l (fabs (- n m)))))) (* (pow n 2) (- (* -1/46080 (/ (pow K 6) (exp (- l (fabs (- n m)))))) (+ (* 1/384 (/ 1 (exp (- l (fabs (- n m)))))) (+ (* 1/32 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (* 1/4 (- (* 1/384 (/ (pow K 4) (exp (- l (fabs (- n m)))))) (+ (* 1/32 (/ 1 (exp (- l (fabs (- n m)))))) (* 1/4 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))))))))))) (+ (* 1/32 (/ 1 (exp (- l (fabs (- n m)))))) (* 1/4 (- (* -1/8 (/ (pow K 2) (exp (- l (fabs (- n m)))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))))))) (* 1/4 (/ 1 (exp (- l (fabs (- n m)))))))) (/ 1 (exp (- l (fabs (- n m))))))
(+.f64 (exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 (*.f64 n n) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (*.f64 n n) (+.f64 (/.f64 (*.f64 #s(literal 1/384 binary64) (pow.f64 K #s(literal 4 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (-.f64 (*.f64 (*.f64 n n) (-.f64 (/.f64 (*.f64 #s(literal -1/46080 binary64) (pow.f64 K #s(literal 6 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (+.f64 (+.f64 (/.f64 #s(literal 1/384 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 #s(literal -1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))) #s(literal 1/32 binary64))) (*.f64 #s(literal 1/4 binary64) (+.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/384 binary64) (pow.f64 K #s(literal 4 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 #s(literal 1/32 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))) (*.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 #s(literal -1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))))))))) (+.f64 (/.f64 #s(literal 1/32 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (/.f64 #s(literal -1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))))))) (/.f64 #s(literal -1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 #s(literal 1 binary64) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(+ (* -1/8 (/ (* (pow K 2) (pow n 2)) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))
(+.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) (*.f64 n n))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))))
(+ (* (pow K 2) (+ (* -1/8 (/ (pow n 2) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/384 (/ (* (pow K 2) (pow n 4)) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))) (/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))
(+.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))) (*.f64 (*.f64 K K) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 n n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) (pow.f64 n #s(literal 4 binary64))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))))))
(+ (* (pow K 2) (+ (* -1/8 (/ (pow n 2) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* (pow K 2) (+ (* -1/46080 (/ (* (pow K 2) (pow n 6)) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/384 (/ (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))))) (/ 1 (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))
(+.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))) (*.f64 (*.f64 K K) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 n n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))) (*.f64 (*.f64 K K) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 K K)) (pow.f64 n #s(literal 6 binary64))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))) (/.f64 (*.f64 #s(literal 1/384 binary64) (pow.f64 n #s(literal 4 binary64))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (cos (* -1/2 (* K n))) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))
(/ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(+ (/ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (cos (* -1/2 (* K n)))) (/ (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))) (cos (* -1/2 (* K n)))))
(+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (/.f64 (*.f64 l (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(+ (* l (+ (* 1/2 (/ (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))) (cos (* -1/2 (* K n))))) (/ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (cos (* -1/2 (* K n)))))) (/ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (cos (* -1/2 (* K n)))))
(+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (*.f64 l (+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) l) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))))
(+ (* l (+ (* l (+ (* 1/6 (/ (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))) (cos (* -1/2 (* K n))))) (* 1/2 (/ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (cos (* -1/2 (* K n))))))) (/ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (cos (* -1/2 (* K n)))))) (/ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (cos (* -1/2 (* K n)))))
(+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (*.f64 l (+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (*.f64 l (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) l) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (/.f64 (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l)) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l)) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l)) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l)) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(exp (- l (fabs (- n m))))
(exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))
(+ (exp (- l (fabs (- n m)))) (* (pow n 2) (- (* 1/4 (exp (- l (fabs (- n m))))) (* -1/8 (* (pow K 2) (exp (- l (fabs (- n m)))))))))
(+.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (*.f64 (*.f64 n n) (-.f64 (*.f64 #s(literal 1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))))
(+ (exp (- l (fabs (- n m)))) (* (pow n 2) (- (+ (* 1/4 (exp (- l (fabs (- n m))))) (* (pow n 2) (- (* 1/32 (exp (- l (fabs (- n m))))) (+ (* -1/8 (* (pow K 2) (- (* 1/4 (exp (- l (fabs (- n m))))) (* -1/8 (* (pow K 2) (exp (- l (fabs (- n m))))))))) (* 1/384 (* (pow K 4) (exp (- l (fabs (- n m)))))))))) (* -1/8 (* (pow K 2) (exp (- l (fabs (- n m)))))))))
(+.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (*.f64 (*.f64 n n) (+.f64 (*.f64 #s(literal 1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (*.f64 n n) (+.f64 (-.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) #s(literal 1/32 binary64)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (-.f64 (*.f64 #s(literal 1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))))) (*.f64 #s(literal -1/384 binary64) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (pow.f64 K #s(literal 4 binary64)))))) (*.f64 (*.f64 (*.f64 K K) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) #s(literal 1/8 binary64))))))
(+ (exp (- l (fabs (- n m)))) (* (pow n 2) (- (+ (* 1/4 (exp (- l (fabs (- n m))))) (* (pow n 2) (- (+ (* 1/32 (exp (- l (fabs (- n m))))) (* (pow n 2) (- (* 1/384 (exp (- l (fabs (- n m))))) (+ (* -1/8 (* (pow K 2) (- (* 1/32 (exp (- l (fabs (- n m))))) (+ (* -1/8 (* (pow K 2) (- (* 1/4 (exp (- l (fabs (- n m))))) (* -1/8 (* (pow K 2) (exp (- l (fabs (- n m))))))))) (* 1/384 (* (pow K 4) (exp (- l (fabs (- n m)))))))))) (+ (* -1/46080 (* (pow K 6) (exp (- l (fabs (- n m)))))) (* 1/384 (* (pow K 4) (- (* 1/4 (exp (- l (fabs (- n m))))) (* -1/8 (* (pow K 2) (exp (- l (fabs (- n m)))))))))))))) (+ (* -1/8 (* (pow K 2) (- (* 1/4 (exp (- l (fabs (- n m))))) (* -1/8 (* (pow K 2) (exp (- l (fabs (- n m))))))))) (* 1/384 (* (pow K 4) (exp (- l (fabs (- n m)))))))))) (* -1/8 (* (pow K 2) (exp (- l (fabs (- n m)))))))))
(+.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (*.f64 (*.f64 n n) (+.f64 (*.f64 #s(literal 1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (+.f64 (*.f64 (*.f64 n n) (+.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) #s(literal 1/32 binary64)) (-.f64 (*.f64 (*.f64 n n) (-.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) #s(literal 1/384 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (+.f64 (-.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) #s(literal 1/32 binary64)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (-.f64 (*.f64 #s(literal 1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))))))) (*.f64 #s(literal -1/384 binary64) (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (pow.f64 K #s(literal 4 binary64)))))) (+.f64 (*.f64 (*.f64 #s(literal -1/46080 binary64) (pow.f64 K #s(literal 6 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 (*.f64 #s(literal 1/384 binary64) (pow.f64 K #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))))))) (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (-.f64 (*.f64 #s(literal 1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))) (*.f64 (*.f64 #s(literal 1/384 binary64) (pow.f64 K #s(literal 4 binary64))) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))))) (*.f64 (*.f64 (*.f64 K K) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) #s(literal 1/8 binary64))))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n)))))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(+ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (* 1/8 (* (pow K 2) (* (pow n 2) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))
(+.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 K K) (*.f64 n n)) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))))
(+ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (* (pow K 2) (- (* -1 (* (pow K 2) (+ (* -1/64 (* (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/384 (* (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (* -1/8 (* (pow n 2) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))))
(+.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (*.f64 (*.f64 K K) (+.f64 (*.f64 (*.f64 K K) (*.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (pow.f64 n #s(literal 4 binary64))) #s(literal 5/384 binary64))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 n n) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))))))
(+ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (* (pow K 2) (- (* (pow K 2) (- (* -1 (* (pow K 2) (+ (* -1/46080 (* (pow n 6) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (+ (* 1/3072 (* (pow n 6) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/8 (* (pow n 2) (+ (* -1/64 (* (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/384 (* (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))))))) (+ (* -1/64 (* (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))) (* 1/384 (* (pow n 4) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))))))) (* -1/8 (* (pow n 2) (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))))))))
(+.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (*.f64 (*.f64 K K) (+.f64 (*.f64 (*.f64 K K) (+.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/46080 binary64) (pow.f64 n #s(literal 6 binary64))) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))) (*.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (pow.f64 n #s(literal 6 binary64))) #s(literal 1/3072 binary64))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 n n)) (*.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (pow.f64 n #s(literal 4 binary64))) #s(literal -5/384 binary64)))) (neg.f64 (*.f64 K K))) (*.f64 (*.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (pow.f64 n #s(literal 4 binary64))) #s(literal 5/384 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 n n) (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))))))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(/ (exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))) (cos (* -1/2 (* K n))))
(/.f64 (exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))
(exp (- (* 1/4 (pow n 2)) (fabs (- n m))))
(exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))
(+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))
(*.f64 (+.f64 l #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* 1/2 (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))) (*.f64 l (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))) (*.f64 (*.f64 #s(literal 1/2 binary64) l) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))))
(+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (+ (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))) (* l (+ (* 1/6 (* l (exp (- (* 1/4 (pow n 2)) (fabs (- n m)))))) (* 1/2 (exp (- (* 1/4 (pow n 2)) (fabs (- n m))))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))) (*.f64 l (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))) (*.f64 l (+.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) l) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))))))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))
(exp.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l))
(exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))
(exp.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l))
(exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))
(exp.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l))
(exp (- (* 1/4 (pow n 2)) (+ (fabs (- n m)) (* -1 l))))
(exp.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l))
(exp (- l (fabs (- n m))))
(exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))
(+ (exp (- l (fabs (- n m)))) (* 1/4 (* (pow n 2) (exp (- l (fabs (- n m)))))))
(+.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))
(+ (exp (- l (fabs (- n m)))) (* (pow n 2) (+ (* 1/32 (* (pow n 2) (exp (- l (fabs (- n m)))))) (* 1/4 (exp (- l (fabs (- n m))))))))
(+.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (*.f64 (*.f64 n n) (+.f64 (*.f64 #s(literal 1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 n n)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))))
(+ (exp (- l (fabs (- n m)))) (* (pow n 2) (+ (* 1/4 (exp (- l (fabs (- n m))))) (* (pow n 2) (+ (* 1/384 (* (pow n 2) (exp (- l (fabs (- n m)))))) (* 1/32 (exp (- l (fabs (- n m))))))))))
(+.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) (*.f64 (*.f64 n n) (+.f64 (*.f64 #s(literal 1/4 binary64) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))) (*.f64 (*.f64 n n) (+.f64 (*.f64 (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m)))) #s(literal 1/32 binary64)) (*.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 n n)) (exp.f64 (-.f64 l (fabs.f64 (-.f64 n m))))))))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (neg (+ m (* -1 n))))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (- n m))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(exp (- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m)))))
(exp.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(- (* 1/4 (pow n 2)) (fabs (- n m)))
(-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))
l
(* l (- (+ 1 (* 1/4 (/ (pow n 2) l))) (/ (fabs (- n m)) l)))
(*.f64 l (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l)))
(* l (- (+ 1 (* 1/4 (/ (pow n 2) l))) (/ (fabs (- n m)) l)))
(*.f64 l (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l)))
(* l (- (+ 1 (* 1/4 (/ (pow n 2) l))) (/ (fabs (- n m)) l)))
(*.f64 l (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) l)))
l
(* -1 (* l (- (* -1 (/ (- (* 1/4 (pow n 2)) (fabs (- n m))) l)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) l) (+.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) (-.f64 #s(literal 0 binary64) l)) #s(literal -1 binary64)))
(* -1 (* l (- (* -1 (/ (- (* 1/4 (pow n 2)) (fabs (- n m))) l)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) l) (+.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) (-.f64 #s(literal 0 binary64) l)) #s(literal -1 binary64)))
(* -1 (* l (- (* -1 (/ (- (* 1/4 (pow n 2)) (fabs (- n m))) l)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) l) (+.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))) (-.f64 #s(literal 0 binary64) l)) #s(literal -1 binary64)))
(- l (fabs (- n m)))
(-.f64 l (fabs.f64 (-.f64 n m)))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))
(* 1/4 (pow n 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
(* (pow n 2) (- (+ 1/4 (/ l (pow n 2))) (/ (fabs (- n m)) (pow n 2))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 l (*.f64 n n)) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 n n)))))
(* (pow n 2) (- (+ 1/4 (/ l (pow n 2))) (/ (fabs (- n m)) (pow n 2))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 l (*.f64 n n)) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 n n)))))
(* (pow n 2) (- (+ 1/4 (/ l (pow n 2))) (/ (fabs (- n m)) (pow n 2))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 l (*.f64 n n)) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 n n)))))
(* 1/4 (pow n 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 n n))
(* (pow n 2) (- (+ 1/4 (/ l (pow n 2))) (/ (fabs (neg (+ m (* -1 n)))) (pow n 2))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 l (*.f64 n n)) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 n n)))))
(* (pow n 2) (- (+ 1/4 (/ l (pow n 2))) (/ (fabs (neg (+ m (* -1 n)))) (pow n 2))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 l (*.f64 n n)) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 n n)))))
(* (pow n 2) (- (+ 1/4 (/ l (pow n 2))) (/ (fabs (neg (+ m (* -1 n)))) (pow n 2))))
(*.f64 (*.f64 n n) (+.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 l (*.f64 n n)) (/.f64 (fabs.f64 (-.f64 n m)) (*.f64 n n)))))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))
(- (+ l (* 1/4 (pow n 2))) (fabs (- n m)))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))
(- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))
(- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))
(- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))
(- (+ l (* 1/4 (pow n 2))) (fabs (+ n (* -1 m))))
(+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m))))
(cos (* 1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(+ (cos (* 1/2 (* K (+ m n)))) (* -1 (* M (sin (* 1/2 (* K (+ m n)))))))
(-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (*.f64 M (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))
(+ (cos (* 1/2 (* K (+ m n)))) (* M (- (* -1/2 (* M (cos (* 1/2 (* K (+ m n)))))) (sin (* 1/2 (* K (+ m n)))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (*.f64 M (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) M) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))))))
(+ (cos (* 1/2 (* K (+ m n)))) (* M (- (* M (+ (* -1/2 (cos (* 1/2 (* K (+ m n))))) (* 1/6 (* M (sin (* 1/2 (* K (+ m n)))))))) (sin (* 1/2 (* K (+ m n)))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) (*.f64 M (-.f64 (*.f64 M (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))) #s(literal -1/2 binary64)) (*.f64 (*.f64 #s(literal 1/6 binary64) M) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n)))))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (- (* 1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (- (* 1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (- (* 1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (- (* 1/2 (* K (+ m n))) (* -1 M)))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos M)
(cos.f64 M)
(+ (cos M) (* -1/2 (* K (* (sin M) (+ m n)))))
(+.f64 (cos.f64 M) (*.f64 (*.f64 K #s(literal -1/2 binary64)) (*.f64 (+.f64 m n) (sin.f64 M))))
(+ (cos M) (* K (- (* -1/8 (* K (* (cos M) (pow (+ m n) 2)))) (* 1/2 (* (sin M) (+ m n))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) K) (*.f64 (cos.f64 M) (*.f64 (+.f64 m n) (+.f64 m n)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 M)) (+.f64 m n)))))
(+ (cos M) (* K (- (* K (+ (* -1/8 (* (cos M) (pow (+ m n) 2))) (* 1/48 (* K (* (sin M) (pow (+ m n) 3)))))) (* 1/2 (* (sin M) (+ m n))))))
(+.f64 (cos.f64 M) (*.f64 K (+.f64 (*.f64 K (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 M)) (*.f64 (+.f64 m n) (+.f64 m n))) (*.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 K (sin.f64 M)) (*.f64 (+.f64 m n) (*.f64 (+.f64 m n) (+.f64 m n))))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 M)) (+.f64 m n)))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K n))))
(cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))
(+ (cos (+ M (* 1/2 (* K n)))) (* -1/2 (* K (* m (sin (+ M (* 1/2 (* K n))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K m) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))))
(+ (cos (+ M (* 1/2 (* K n)))) (* m (- (* -1/8 (* (pow K 2) (* m (cos (+ M (* 1/2 (* K n))))))) (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))) (*.f64 m (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) m) (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))) (*.f64 #s(literal -1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))))))
(+ (cos (+ M (* 1/2 (* K n)))) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K n)))))) (* 1/48 (* (pow K 3) (* m (sin (+ M (* 1/2 (* K n))))))))) (* 1/2 (* K (sin (+ M (* 1/2 (* K n)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))) (*.f64 m (+.f64 (*.f64 m (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))) (*.f64 K K))) (*.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) m) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (- n (* -1 m))))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K m))))
(cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))
(+ (cos (+ M (* 1/2 (* K m)))) (* -1/2 (* K (* n (sin (+ M (* 1/2 (* K m))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K n) (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))))
(+ (cos (+ M (* 1/2 (* K m)))) (* n (- (* -1/8 (* (pow K 2) (* n (cos (+ M (* 1/2 (* K m))))))) (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))) (*.f64 n (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) n) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 K (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))))))
(+ (cos (+ M (* 1/2 (* K m)))) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (+ M (* 1/2 (* K m)))))) (* 1/48 (* (pow K 3) (* n (sin (+ M (* 1/2 (* K m))))))))) (* 1/2 (* K (sin (+ M (* 1/2 (* K m)))))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))) (*.f64 n (-.f64 (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) n) (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))))))) (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (+.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))))))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (+ m n)))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
(cos (+ M (* 1/2 (* K (- m (* -1 n))))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))) M))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (* (pow K 2) (pow (+ m n) 2))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 (+.f64 m n) (+.f64 m n))))
(+ 1 (* (pow K 2) (+ (* -1/8 (pow (+ m n) 2)) (* 1/384 (* (pow K 2) (pow (+ m n) 4))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 K K) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (*.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) (pow.f64 (+.f64 m n) #s(literal 4 binary64))))))
(+ 1 (* (pow K 2) (+ (* -1/8 (pow (+ m n) 2)) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (pow (+ m n) 6))) (* 1/384 (pow (+ m n) 4)))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 K K) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (*.f64 (*.f64 K K) (+.f64 (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 K K)) (pow.f64 (+.f64 m n) #s(literal 6 binary64))) (*.f64 #s(literal 1/384 binary64) (pow.f64 (+.f64 m n) #s(literal 4 binary64))))))))
(cos (* 1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K n)))
(cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))
(+ (cos (* 1/2 (* K n))) (* -1/2 (* K (* m (sin (* 1/2 (* K n)))))))
(+.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K m) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))))
(+ (cos (* 1/2 (* K n))) (* m (- (* -1/8 (* (pow K 2) (* m (cos (* 1/2 (* K n)))))) (* 1/2 (* K (sin (* 1/2 (* K n))))))))
(+.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)) (*.f64 m (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) m) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))) (*.f64 (*.f64 #s(literal 1/2 binary64) K) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))))))
(+ (cos (* 1/2 (* K n))) (* m (- (* m (+ (* -1/8 (* (pow K 2) (cos (* 1/2 (* K n))))) (* 1/48 (* (pow K 3) (* m (sin (* 1/2 (* K n)))))))) (* 1/2 (* K (sin (* 1/2 (* K n))))))))
(+.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)) (*.f64 m (+.f64 (*.f64 m (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n))) (*.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) m) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 K (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) K) n)))))))
(cos (* 1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K (- n (* -1 m)))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K (- n (* -1 m)))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K (- n (* -1 m)))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K (- n (* -1 m)))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K m)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))
(+ (cos (* 1/2 (* K m))) (* -1/2 (* K (* n (sin (* 1/2 (* K m)))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 K n) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))))
(+ (cos (* 1/2 (* K m))) (* n (- (* -1/8 (* (pow K 2) (* n (cos (* 1/2 (* K m)))))) (* 1/2 (* K (sin (* 1/2 (* K m))))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))) (*.f64 n (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 K K) n) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))) (*.f64 #s(literal -1/2 binary64) (*.f64 K (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))))))
(+ (cos (* 1/2 (* K m))) (* n (- (* n (+ (* -1/8 (* (pow K 2) (cos (* 1/2 (* K m))))) (* 1/48 (* (pow K 3) (* n (sin (* 1/2 (* K m)))))))) (* 1/2 (* K (sin (* 1/2 (* K m))))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))) (*.f64 n (+.f64 (*.f64 n (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m)))) (*.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 (*.f64 K (*.f64 K K)) n) (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 K (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K m))))))))
(cos (* 1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K (+ m n))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K (- m (* -1 n)))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K (- m (* -1 n)))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K (- m (* -1 n)))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(cos (* 1/2 (* K (- m (* -1 n)))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 K (+.f64 m n))))
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
(* -1/2 (* K n))
(*.f64 (*.f64 K #s(literal -1/2 binary64)) n)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (* (pow K 2) (pow n 2))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) (*.f64 n n))))
(+ 1 (* (pow n 2) (+ (* -1/8 (pow K 2)) (* 1/384 (* (pow K 4) (pow n 2))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 n n) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 n n) (pow.f64 K #s(literal 4 binary64)))))))
(+ 1 (* (pow n 2) (+ (* -1/8 (pow K 2)) (* (pow n 2) (+ (* -1/46080 (* (pow K 6) (pow n 2))) (* 1/384 (pow K 4)))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 n n) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 (*.f64 n n) (+.f64 (*.f64 (*.f64 #s(literal -1/46080 binary64) (pow.f64 K #s(literal 6 binary64))) (*.f64 n n)) (*.f64 #s(literal 1/384 binary64) (pow.f64 K #s(literal 4 binary64))))))))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (* (pow K 2) (pow n 2))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) (*.f64 n n))))
(+ 1 (* (pow K 2) (+ (* -1/8 (pow n 2)) (* 1/384 (* (pow K 2) (pow n 4))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 K K) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 n n)) (*.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) (pow.f64 n #s(literal 4 binary64))))))
(+ 1 (* (pow K 2) (+ (* -1/8 (pow n 2)) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (pow n 6))) (* 1/384 (pow n 4)))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 K K) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 n n)) (*.f64 (*.f64 K K) (+.f64 (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 K K)) (pow.f64 n #s(literal 6 binary64))) (*.f64 #s(literal 1/384 binary64) (pow.f64 n #s(literal 4 binary64))))))))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(cos (* -1/2 (* K n)))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))

eval226.0ms (1.3%)

Compiler

Compiled 61844 to 3334 computations (94.6% saved)

prune218.0ms (1.2%)

Pruning

38 alts after pruning (37 fresh and 1 done)

PrunedKeptTotal
New1434151449
Fresh32225
Picked415
Done000
Total1441381479
Accuracy
98.4%
Counts
1479 → 38
Alt Table
Click to see full alt table
StatusAccuracyProgram
76.4%
(/.f64 (fma.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 K m) (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
76.8%
(/.f64 (fma.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (*.f64 (cos.f64 M) #s(literal 1 binary64))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
76.1%
(/.f64 (fma.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
78.0%
(/.f64 (fma.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 M)) #s(literal 1/2 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
30.8%
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M))) (exp.f64 l))
49.8%
(/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
41.0%
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
38.8%
(/.f64 (cos.f64 (+.f64 M (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1 binary64))))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
26.3%
(/.f64 (cos.f64 (+.f64 M (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1 binary64))))) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
31.7%
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
5.8%
(/.f64 (cos.f64 M) (+.f64 l #s(literal 1 binary64)))
34.7%
(/.f64 (cos.f64 M) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1/2 binary64) (*.f64 l #s(literal 1/6 binary64))))))))
30.3%
(/.f64 (cos.f64 M) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l #s(literal 1/2 binary64))))))
31.9%
(/.f64 (cos.f64 M) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 l))))
55.5%
(/.f64 (cos.f64 M) (exp.f64 (*.f64 M M)))
22.7%
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
31.7%
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
38.8%
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1 binary64)))))))
38.1%
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
40.4%
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))))
40.5%
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))
21.5%
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1 binary64)))))))
4.2%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
4.4%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
4.0%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (+.f64 (*.f64 n #s(literal -1/2 binary64)) (/.f64 M K))))))
4.8%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 M)))
4.0%
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
5.2%
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 M M) #s(literal -1/720 binary64)))) #s(literal -1/2 binary64))))
4.2%
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M)))
45.0%
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 #s(literal 1/4 binary64) (*.f64 n n)))))
56.1%
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))
49.4%
(exp.f64 (*.f64 (*.f64 n n) #s(literal -1/4 binary64)))
54.7%
(exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m)))
34.3%
(exp.f64 (neg.f64 l))
4.8%
(exp.f64 (fabs.f64 (-.f64 n m)))
4.4%
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
✓4.8%
(cos.f64 M)
4.8%
#s(literal 1 binary64)
Compiler

Compiled 2728 to 942 computations (65.5% saved)

regimes155.0ms (0.9%)

Counts
80 → 1
Calls
Call 1
Inputs
#s(literal 1 binary64)
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 M M) #s(literal -1/720 binary64)))) #s(literal -1/2 binary64))))
(cos.f64 M)
(exp.f64 (neg.f64 l))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m)))
(exp.f64 (*.f64 (*.f64 n n) #s(literal -1/4 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 M)))
(/.f64 (cos.f64 M) (+.f64 l #s(literal 1 binary64)))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M))) (exp.f64 l))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))
(/.f64 (cos.f64 M) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (+.f64 (*.f64 n #s(literal -1/2 binary64)) (/.f64 M K))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (cos.f64 M) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1/2 binary64) (*.f64 l #s(literal 1/6 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(exp.f64 (fabs.f64 (-.f64 n m)))
(/.f64 (cos.f64 M) (exp.f64 l))
(/.f64 (cos.f64 M) (exp.f64 (*.f64 M M)))
(/.f64 (cos.f64 M) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 l))))
(exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 l (fabs.f64 (-.f64 n m)))))
(/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 l) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 M M)) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 m K))) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/.f64 (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (exp.f64 (-.f64 (neg.f64 (*.f64 M M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (exp.f64 (-.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (exp.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (*.f64 (+.f64 l #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 #s(literal 1/4 binary64) (*.f64 n n)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (cos.f64 M) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (exp.f64 (+.f64 l (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) n) M) (-.f64 (*.f64 #s(literal 1/2 binary64) n) M)) (fabs.f64 (-.f64 n m))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) m))) (exp.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) m) M) (-.f64 (*.f64 #s(literal 1/2 binary64) m) M)) l) (fabs.f64 (-.f64 n m)))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m)))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (*.f64 (+.f64 l #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 n m)) M)) (fabs.f64 (-.f64 n m))))))
(/.f64 (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1 binary64)))))))
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 #s(literal 1/4 binary64) (*.f64 n n)))))
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (exp.f64 (-.f64 (neg.f64 (pow.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 2 binary64))) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)))))) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))))
(/.f64 (-.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))) (*.f64 M (sin.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 n m) K))))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (cos.f64 (+.f64 M (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1 binary64))))) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (cos.f64 (+.f64 M (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1 binary64))))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M) (+.f64 (/.f64 (+.f64 m n) #s(literal -2 binary64)) M)))) (cos.f64 (+.f64 M (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 m n) K))) #s(literal -1 binary64)))))))
(*.f64 (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 n K)) M))))) (exp.f64 (-.f64 (neg.f64 (pow.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 2 binary64))) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (*.f64 (cos.f64 M) #s(literal 1 binary64))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 M)) #s(literal 1/2 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (fma.f64 (-.f64 (+.f64 (cos.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 K m) (sin.f64 (+.f64 M (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)))))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) #s(literal 1/2 binary64) (*.f64 (cos.f64 M) (cos.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n)))))) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
Outputs
(/.f64 (cos.f64 M) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
Calls

6 calls:

26.0ms
l
26.0ms
m
25.0ms
n
24.0ms
M
23.0ms
K
Results
AccuracySegmentsBranch
96.3%1K
96.3%1m
96.3%1n
96.3%1M
96.3%1l
96.3%1(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (exp.f64 (-.f64 (neg.f64 (pow.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) #s(literal 2 binary64))) (-.f64 l (fabs.f64 (-.f64 m n))))))
Compiler

Compiled 64 to 46 computations (28.1% saved)

regimes86.0ms (0.5%)

Counts
53 → 3
Calls
Call 1
Inputs
#s(literal 1 binary64)
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 M M) #s(literal -1/720 binary64)))) #s(literal -1/2 binary64))))
(cos.f64 M)
(exp.f64 (neg.f64 l))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m)))
(exp.f64 (*.f64 (*.f64 n n) #s(literal -1/4 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 M)))
(/.f64 (cos.f64 M) (+.f64 l #s(literal 1 binary64)))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M))) (exp.f64 l))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))
(/.f64 (cos.f64 M) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (+.f64 (*.f64 n #s(literal -1/2 binary64)) (/.f64 M K))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (cos.f64 M) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1/2 binary64) (*.f64 l #s(literal 1/6 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(exp.f64 (fabs.f64 (-.f64 n m)))
(/.f64 (cos.f64 M) (exp.f64 l))
(/.f64 (cos.f64 M) (exp.f64 (*.f64 M M)))
(/.f64 (cos.f64 M) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 l))))
(exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 l (fabs.f64 (-.f64 n m)))))
(/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 l) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 M M)) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (/.f64 K (/.f64 #s(literal -2 binary64) (+.f64 m n)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(+.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 m K) (sin.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K)))))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 m K))) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(/.f64 (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n)) (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))))
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/.f64 (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) K) n)) (exp.f64 (-.f64 (+.f64 l (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (fabs.f64 (-.f64 n m)))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (+.f64 l (*.f64 n (*.f64 #s(literal 1/4 binary64) n))) (fabs.f64 (-.f64 n m)))) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (cos.f64 (-.f64 (/.f64 K (/.f64 #s(literal 2 binary64) (+.f64 m n))) M)) (exp.f64 (+.f64 (*.f64 M M) (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (exp.f64 (-.f64 (neg.f64 (*.f64 M M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(*.f64 (cos.f64 (-.f64 (/.f64 (*.f64 K (+.f64 m n)) #s(literal 2 binary64)) M)) (exp.f64 (-.f64 (*.f64 (*.f64 m m) #s(literal -1/4 binary64)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (exp.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (*.f64 (+.f64 l #s(literal 1 binary64)) (exp.f64 (-.f64 (*.f64 M M) (fabs.f64 (-.f64 n m))))))
(/.f64 (cos.f64 (+.f64 M (/.f64 (*.f64 K (+.f64 m n)) #s(literal -2 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (+.f64 l (*.f64 M M)) (fabs.f64 (-.f64 m n)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (+.f64 (-.f64 l (fabs.f64 (-.f64 m n))) (*.f64 #s(literal 1/4 binary64) (*.f64 n n)))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
Outputs
(/.f64 (cos.f64 M) (exp.f64 (*.f64 M M)))
(exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m))))))
(/.f64 (cos.f64 M) (exp.f64 (*.f64 M M)))
Calls

5 calls:

17.0ms
K
16.0ms
m
16.0ms
M
16.0ms
n
16.0ms
l
Results
AccuracySegmentsBranch
83.8%1n
95.2%3M
83.8%1l
83.8%1K
89.0%3m
Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes57.0ms (0.3%)

Counts
31 → 3
Calls
Call 1
Inputs
#s(literal 1 binary64)
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 M M) #s(literal -1/720 binary64)))) #s(literal -1/2 binary64))))
(cos.f64 M)
(exp.f64 (neg.f64 l))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m)))
(exp.f64 (*.f64 (*.f64 n n) #s(literal -1/4 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 M)))
(/.f64 (cos.f64 M) (+.f64 l #s(literal 1 binary64)))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M))) (exp.f64 l))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))
(/.f64 (cos.f64 M) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (+.f64 (*.f64 n #s(literal -1/2 binary64)) (/.f64 M K))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (cos.f64 M) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1/2 binary64) (*.f64 l #s(literal 1/6 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(exp.f64 (fabs.f64 (-.f64 n m)))
(/.f64 (cos.f64 M) (exp.f64 l))
(/.f64 (cos.f64 M) (exp.f64 (*.f64 M M)))
(/.f64 (cos.f64 M) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 l))))
(exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 l (fabs.f64 (-.f64 n m)))))
(/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 l) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n))) (cos.f64 (*.f64 n (*.f64 K #s(literal -1/2 binary64))))))
(/.f64 (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 m K)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 M M)) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
Outputs
(exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m)))
(/.f64 (cos.f64 M) (exp.f64 (*.f64 M M)))
(exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))
Calls

5 calls:

12.0ms
K
11.0ms
M
11.0ms
m
9.0ms
l
9.0ms
n
Results
AccuracySegmentsBranch
71.8%3l
61.3%2K
79.3%3n
85.1%3m
84.1%4M
Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes19.0ms (0.1%)

Counts
26 → 3
Calls
Call 1
Inputs
#s(literal 1 binary64)
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 M M) #s(literal -1/720 binary64)))) #s(literal -1/2 binary64))))
(cos.f64 M)
(exp.f64 (neg.f64 l))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m)))
(exp.f64 (*.f64 (*.f64 n n) #s(literal -1/4 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 M)))
(/.f64 (cos.f64 M) (+.f64 l #s(literal 1 binary64)))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M))) (exp.f64 l))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))
(/.f64 (cos.f64 M) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (+.f64 (*.f64 n #s(literal -1/2 binary64)) (/.f64 M K))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (cos.f64 M) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1/2 binary64) (*.f64 l #s(literal 1/6 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(exp.f64 (fabs.f64 (-.f64 n m)))
(/.f64 (cos.f64 M) (exp.f64 l))
(/.f64 (cos.f64 M) (exp.f64 (*.f64 M M)))
(/.f64 (cos.f64 M) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 l))))
(exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 l (fabs.f64 (-.f64 n m)))))
(/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
(/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))
Outputs
(exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m)))
(/.f64 (cos.f64 M) (exp.f64 (*.f64 M M)))
(/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))
Calls

2 calls:

8.0ms
m
8.0ms
M
Results
AccuracySegmentsBranch
79.3%3M
82.0%3m
Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes44.0ms (0.2%)

Counts
25 → 3
Calls
Call 1
Inputs
#s(literal 1 binary64)
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 M M) #s(literal -1/720 binary64)))) #s(literal -1/2 binary64))))
(cos.f64 M)
(exp.f64 (neg.f64 l))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m)))
(exp.f64 (*.f64 (*.f64 n n) #s(literal -1/4 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 M)))
(/.f64 (cos.f64 M) (+.f64 l #s(literal 1 binary64)))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M))) (exp.f64 l))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))
(/.f64 (cos.f64 M) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (+.f64 (*.f64 n #s(literal -1/2 binary64)) (/.f64 M K))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (cos.f64 M) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1/2 binary64) (*.f64 l #s(literal 1/6 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(exp.f64 (fabs.f64 (-.f64 n m)))
(/.f64 (cos.f64 M) (exp.f64 l))
(/.f64 (cos.f64 M) (exp.f64 (*.f64 M M)))
(/.f64 (cos.f64 M) (neg.f64 (-.f64 #s(literal 0 binary64) (exp.f64 l))))
(exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 l (fabs.f64 (-.f64 n m)))))
(/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 m m))))
Outputs
(exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m)))
(/.f64 (cos.f64 M) (exp.f64 (*.f64 M M)))
(exp.f64 (*.f64 (*.f64 n n) #s(literal -1/4 binary64)))
Calls

1 calls:

41.0ms
m
Results
AccuracySegmentsBranch
82.0%3m
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes24.0ms (0.1%)

Counts
21 → 2
Calls
Call 1
Inputs
#s(literal 1 binary64)
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 M M) #s(literal -1/720 binary64)))) #s(literal -1/2 binary64))))
(cos.f64 M)
(exp.f64 (neg.f64 l))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m)))
(exp.f64 (*.f64 (*.f64 n n) #s(literal -1/4 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 M)))
(/.f64 (cos.f64 M) (+.f64 l #s(literal 1 binary64)))
(cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M))) (exp.f64 l))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 #s(literal -1/2 binary64) (*.f64 n K))))))
(/.f64 (cos.f64 M) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 K (+.f64 (*.f64 n #s(literal -1/2 binary64)) (/.f64 M K))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(/.f64 (cos.f64 M) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1/2 binary64) (*.f64 l #s(literal 1/6 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 m m))) (cos.f64 (+.f64 M (*.f64 K (/.f64 (+.f64 m n) #s(literal -2 binary64)))))))
(exp.f64 (fabs.f64 (-.f64 n m)))
(/.f64 (cos.f64 M) (exp.f64 l))
Outputs
(exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m)))
(exp.f64 (*.f64 (*.f64 n n) #s(literal -1/4 binary64)))
Calls

3 calls:

9.0ms
M
7.0ms
m
7.0ms
n
Results
AccuracySegmentsBranch
74.8%2n
57.4%2M
74.8%2m
Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes11.0ms (0.1%)

Counts
7 → 3
Calls
Call 1
Inputs
#s(literal 1 binary64)
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 M M) #s(literal -1/720 binary64)))) #s(literal -1/2 binary64))))
(cos.f64 M)
(exp.f64 (neg.f64 l))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
(exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m)))
Outputs
(exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m)))
(exp.f64 (neg.f64 l))
(exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m)))
Calls

3 calls:

4.0ms
n
3.0ms
m
3.0ms
l
Results
AccuracySegmentsBranch
63.8%2l
54.7%1n
67.3%3m
Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes16.0ms (0.1%)

Counts
6 → 1
Calls
Call 1
Inputs
#s(literal 1 binary64)
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 M M) #s(literal -1/720 binary64)))) #s(literal -1/2 binary64))))
(cos.f64 M)
(exp.f64 (neg.f64 l))
(cos.f64 (*.f64 (*.f64 K #s(literal -1/2 binary64)) n))
Outputs
(exp.f64 (neg.f64 l))
Calls

5 calls:

4.0ms
M
3.0ms
n
3.0ms
l
3.0ms
m
3.0ms
K
Results
AccuracySegmentsBranch
34.3%1n
34.3%1M
34.3%1K
34.3%1l
34.3%1m
Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes16.0ms (0.1%)

Counts
4 → 1
Calls
Call 1
Inputs
#s(literal 1 binary64)
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 M M) #s(literal -1/720 binary64)))) #s(literal -1/2 binary64))))
(cos.f64 M)
Outputs
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 M M) #s(literal -1/720 binary64)))) #s(literal -1/2 binary64))))
Calls

5 calls:

6.0ms
K
2.0ms
n
2.0ms
M
2.0ms
m
2.0ms
l
Results
AccuracySegmentsBranch
5.2%1n
5.2%1K
5.2%1m
5.2%1M
5.2%1l
Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes8.0ms (0%)

Accuracy

Total -0.4b remaining (-0.7%)

Threshold costs -0.4b (-0.7%)

Counts
2 → 1
Calls
Call 1
Inputs
#s(literal 1 binary64)
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 M M)))
Outputs
#s(literal 1 binary64)
Calls

5 calls:

2.0ms
K
2.0ms
m
2.0ms
n
2.0ms
M
2.0ms
l
Results
AccuracySegmentsBranch
4.8%1M
4.8%1m
4.8%1n
4.8%1K
4.8%1l
Compiler

Compiled 30 to 25 computations (16.7% saved)

bsearch48.0ms (0.3%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
24.0ms
0.9974162539348598
210.79456407717066
20.0ms
-2.1451703534104621e+68
-2.1360739610660747e+67
Results
32.0ms198×0valid
4.0ms10×1valid
Compiler

Compiled 523 to 366 computations (30% saved)

Precisions
Click to see histograms. Total time spent on operations: 25.0ms
ival-sub: 6.0ms (24.2% of total)
ival-pow: 4.0ms (16.2% of total)
ival-div: 3.0ms (12.1% of total)
ival-mult: 3.0ms (12.1% of total)
ival-cos: 3.0ms (12.1% of total)
ival-neg: 2.0ms (8.1% of total)
ival-exp: 1.0ms (4% of total)
ival-add: 1.0ms (4% of total)
ival-fabs: 1.0ms (4% of total)
const: 0.0ms (0% of total)
backward-pass: 0.0ms (0% of total)

bsearch57.0ms (0.3%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
19.0ms
-6.623977196984733e-103
-6.152856257620903e-104
32.0ms
-2151.271931082245
-4.327283836902301e-6
Results
36.0ms221×0valid
7.0ms19×1valid
Compiler

Compiled 459 to 352 computations (23.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 29.0ms
ival-sub: 7.0ms (24.2% of total)
ival-div: 4.0ms (13.8% of total)
ival-mult: 4.0ms (13.8% of total)
ival-cos: 4.0ms (13.8% of total)
ival-pow: 3.0ms (10.4% of total)
ival-add: 3.0ms (10.4% of total)
ival-exp: 2.0ms (6.9% of total)
ival-neg: 1.0ms (3.5% of total)
backward-pass: 1.0ms (3.5% of total)
ival-fabs: 1.0ms (3.5% of total)
const: 0.0ms (0% of total)

bsearch97.0ms (0.5%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
50.0ms
-7.69530259597049e-224
-5.191033637582764e-227
31.0ms
-2151.271931082245
-4.327283836902301e-6
Results
58.0ms242×0valid
11.0ms30×1valid
Compiler

Compiled 491 to 384 computations (21.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 54.0ms
ival-sub: 31.0ms (57.6% of total)
ival-div: 4.0ms (7.4% of total)
ival-mult: 4.0ms (7.4% of total)
ival-cos: 3.0ms (5.6% of total)
ival-pow: 3.0ms (5.6% of total)
ival-exp: 2.0ms (3.7% of total)
ival-add: 2.0ms (3.7% of total)
ival-neg: 1.0ms (1.9% of total)
backward-pass: 1.0ms (1.9% of total)
ival-fabs: 1.0ms (1.9% of total)
const: 0.0ms (0% of total)

bsearch63.0ms (0.3%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
26.0ms
-7.69530259597049e-224
-5.191033637582764e-227
31.0ms
-2151.271931082245
-4.327283836902301e-6
Results
40.0ms257×0valid
6.0ms15×1valid
Compiler

Compiled 467 to 368 computations (21.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 31.0ms
ival-sub: 7.0ms (22.6% of total)
ival-mult: 5.0ms (16.2% of total)
ival-pow: 5.0ms (16.2% of total)
ival-div: 4.0ms (12.9% of total)
ival-exp: 2.0ms (6.5% of total)
ival-cos: 2.0ms (6.5% of total)
ival-add: 2.0ms (6.5% of total)
ival-neg: 1.0ms (3.2% of total)
backward-pass: 1.0ms (3.2% of total)
ival-fabs: 1.0ms (3.2% of total)
const: 0.0ms (0% of total)

bsearch32.0ms (0.2%)

Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
29.0ms
-2.074553317119033e-6
-7.642160078378994e-9
Results
19.0ms114×0valid
5.0ms14×1valid
Compiler

Compiled 234 to 188 computations (19.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 14.0ms
ival-sub: 3.0ms (20.9% of total)
ival-div: 2.0ms (14% of total)
ival-mult: 2.0ms (14% of total)
ival-pow: 2.0ms (14% of total)
ival-exp: 1.0ms (7% of total)
ival-neg: 1.0ms (7% of total)
ival-cos: 1.0ms (7% of total)
backward-pass: 1.0ms (7% of total)
ival-add: 1.0ms (7% of total)
ival-fabs: 1.0ms (7% of total)
const: 0.0ms (0% of total)

bsearch71.0ms (0.4%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
42.0ms
1.9194442777984447e-23
0.0006676201103922695
24.0ms
-4.327283836902301e-6
-2.074553317119033e-6
Results
36.0ms229×0valid
21.0ms27×1valid
Compiler

Compiled 378 to 316 computations (16.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 43.0ms
ival-sub: 15.0ms (35.3% of total)
ival-mult: 6.0ms (14.1% of total)
ival-exp: 5.0ms (11.8% of total)
ival-div: 4.0ms (9.4% of total)
ival-cos: 3.0ms (7.1% of total)
ival-pow: 3.0ms (7.1% of total)
ival-add: 3.0ms (7.1% of total)
ival-neg: 1.0ms (2.4% of total)
backward-pass: 1.0ms (2.4% of total)
ival-fabs: 1.0ms (2.4% of total)
const: 0.0ms (0% of total)

simplify61.0ms (0.3%)

Algorithm
1×egg-herbie
Rules
678×unsub-neg_binary64
380×neg-mul-1_binary64
272×distribute-lft-neg-in_binary64
204×distribute-neg-out_binary64
166×neg-sub0_binary64
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
082208
1127208
2162208
3197207
4234207
5265207
6336207
7643207
8978207
91009207
101060207
111161207
121279207
131392207
141498207
151563207
161613207
171624207
Stop Event
1×saturated
Calls
Call 1
Inputs
(/.f64 (cos.f64 M) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(if (<=.f64 M #s(literal -21999999999999999919524602571577233946042176066572813438404708532224 binary64)) (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M))) (if (<=.f64 M #s(literal 27 binary64)) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M)))))
(if (<=.f64 m #s(literal -55 binary64)) (exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m))) (if (<=.f64 m #s(literal -8069530869021589/40347654345107946713373737062547060536401653012956617387979052445947619094013143666088208645002153616185987062074179584 binary64)) (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))))
(if (<=.f64 m #s(literal -55 binary64)) (exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m))) (if (<=.f64 m #s(literal -6251263530824863/416750902054990892129990736920078612321547395144744260024766113235252327363602004470089512554472143171433119412089577527868050103382460317522709753270676877880947348719625909903942392869488376545560313508492912623855671752342278830697742336 binary64)) (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))))
(if (<=.f64 m #s(literal -55 binary64)) (exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m))) (if (<=.f64 m #s(literal -2604693137843693/208375451027495446064995368460039306160773697572372130012383056617626163681801002235044756277236071585716559706044788763934025051691230158761354876635338438940473674359812954951971196434744188272780156754246456311927835876171139415348871168 binary64)) (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M))) (exp.f64 (*.f64 (*.f64 n n) #s(literal -1/4 binary64)))))
(if (<=.f64 m #s(literal -2420212822470693/1180591620717411303424 binary64)) (exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m))) (exp.f64 (*.f64 (*.f64 n n) #s(literal -1/4 binary64))))
(if (<=.f64 m #s(literal -5076543969084869/1180591620717411303424 binary64)) (exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m))) (if (<=.f64 m #s(literal 760928193040519/1152921504606846976 binary64)) (exp.f64 (neg.f64 l)) (exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m)))))
(exp.f64 (neg.f64 l))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 M M) #s(literal -1/720 binary64)))) #s(literal -1/2 binary64))))
#s(literal 1 binary64)
Outputs
(/.f64 (cos.f64 M) (exp.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M) (-.f64 (/.f64 (+.f64 m n) #s(literal 2 binary64)) M)) (-.f64 l (fabs.f64 (-.f64 m n))))))
(if (<=.f64 M #s(literal -21999999999999999919524602571577233946042176066572813438404708532224 binary64)) (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M))) (if (<=.f64 M #s(literal 27 binary64)) (exp.f64 (neg.f64 (+.f64 l (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n))) (fabs.f64 (-.f64 n m)))))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M)))))
(if (<=.f64 M #s(literal -21999999999999999919524602571577233946042176066572813438404708532224 binary64)) (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M))) (if (<=.f64 M #s(literal 27 binary64)) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 m n) (+.f64 m n)))) l)) (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M)))))
(if (<=.f64 m #s(literal -55 binary64)) (exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m))) (if (<=.f64 m #s(literal -8069530869021589/40347654345107946713373737062547060536401653012956617387979052445947619094013143666088208645002153616185987062074179584 binary64)) (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 n m)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))))
(if (<=.f64 m #s(literal -55 binary64)) (exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m))) (if (<=.f64 m #s(literal -8069530869021589/40347654345107946713373737062547060536401653012956617387979052445947619094013143666088208645002153616185987062074179584 binary64)) (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M))) (exp.f64 (-.f64 (-.f64 (fabs.f64 (-.f64 m n)) l) (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))))
(if (<=.f64 m #s(literal -55 binary64)) (exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m))) (if (<=.f64 m #s(literal -6251263530824863/416750902054990892129990736920078612321547395144744260024766113235252327363602004470089512554472143171433119412089577527868050103382460317522709753270676877880947348719625909903942392869488376545560313508492912623855671752342278830697742336 binary64)) (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M))) (/.f64 (cos.f64 M) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 n n))))))
(if (<=.f64 m #s(literal -55 binary64)) (exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m))) (if (<=.f64 m #s(literal -2604693137843693/208375451027495446064995368460039306160773697572372130012383056617626163681801002235044756277236071585716559706044788763934025051691230158761354876635338438940473674359812954951971196434744188272780156754246456311927835876171139415348871168 binary64)) (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M))) (exp.f64 (*.f64 (*.f64 n n) #s(literal -1/4 binary64)))))
(if (<=.f64 m #s(literal -55 binary64)) (exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m))) (if (<=.f64 m #s(literal -2604693137843693/208375451027495446064995368460039306160773697572372130012383056617626163681801002235044756277236071585716559706044788763934025051691230158761354876635338438940473674359812954951971196434744188272780156754246456311927835876171139415348871168 binary64)) (/.f64 (cos.f64 M) (exp.f64 (*.f64 M M))) (exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 n n)))))
(if (<=.f64 m #s(literal -2420212822470693/1180591620717411303424 binary64)) (exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m))) (exp.f64 (*.f64 (*.f64 n n) #s(literal -1/4 binary64))))
(if (<=.f64 m #s(literal -2420212822470693/1180591620717411303424 binary64)) (exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m))) (exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 n n))))
(if (<=.f64 m #s(literal -5076543969084869/1180591620717411303424 binary64)) (exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m))) (if (<=.f64 m #s(literal 760928193040519/1152921504606846976 binary64)) (exp.f64 (neg.f64 l)) (exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m)))))
(if (<=.f64 m #s(literal -5076543969084869/1180591620717411303424 binary64)) (exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m))) (if (<=.f64 m #s(literal 760928193040519/1152921504606846976 binary64)) (exp.f64 (-.f64 #s(literal 0 binary64) l)) (exp.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 m m)))))
(exp.f64 (neg.f64 l))
(exp.f64 (-.f64 #s(literal 0 binary64) l))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (+.f64 (*.f64 (*.f64 M M) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 M M) #s(literal -1/720 binary64)))) #s(literal -1/2 binary64))))
#s(literal 1 binary64)

soundness2.1s (11.6%)

Rules
6358×*-lowering-*.f32
6358×*-lowering-*.f64
6116×*-lowering-*.f32
6116×*-lowering-*.f64
5878×*-lowering-*.f32
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
0131220281
1432119101
0816419101
0141216372
1482815060
0858015060
099813971
1345112873
0829512873
02129
15227
213226
342726
4191526
5764026
0863126
0201833080
1716831524
0813131524
Stop Event
1×fuel
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
Compiler

Compiled 1399 to 851 computations (39.2% saved)

preprocess60.0ms (0.3%)

Remove

(sort m n)

Compiler

Compiled 642 to 272 computations (57.6% saved)

end0.0ms (0%)

Profiling

Loading profile data...