Numerical integration/Adaptive Simpson's method: Difference between revisions
Numerical integration/Adaptive Simpson's method (view source)
Revision as of 21:12, 19 May 2023
, 1 year ago→{{header|COBOL}}: Bug fix.
(→{{header|COBOL}}: Added in "need of improvement" - all numeric fields are currently unsigned.) |
(→{{header|COBOL}}: Bug fix.) |
||
Line 598:
compute tol0 = tol * (x4 - x0)
compute tol1 = tol * (x2 - x0)
if (tol1 = tol0) or (abs-delta <= 15 * tol0) then
compute delta15 = delta / 15
compute stepval = ruleval0 + ruleval1 + delta15
| |||