QUAD_OPEN_MP: FORTRAN77/OpenMP version Estimate the integral of f(x) from A to B. f(x) = 50 / (pi * ( 2500 * x * x + 1 ) ). A = 0.0000000000000000 B = 10.0000000000000000 N = 10000000 Exact = 0.49936338107645672 Estimate = 0.49937128891912641 Error = 7.90784266968547200E-006 Time = 0.43140836711972952 QUAD_OPEN_MP: FORTRAN77/OpenMP version Estimate the integral of f(x) from A to B. f(x) = 50 / (pi * ( 2500 * x * x + 1 ) ). A = 0.0000000000000000 B = 10.0000000000000000 N = 10000000 Exact = 0.49936338107645672 Estimate = 0.49937128891914628 Error = 7.90784268955846414E-006 Time = 0.24677380174398422 QUAD_OPEN_MP: FORTRAN77/OpenMP version Estimate the integral of f(x) from A to B. f(x) = 50 / (pi * ( 2500 * x * x + 1 ) ). A = 0.0000000000000000 B = 10.0000000000000000 N = 10000000 Exact = 0.49936338107645672 Estimate = 0.49937128891915156 Error = 7.90784269483202351E-006 Time = 0.10917502548545599 QUAD_OPEN_MP: FORTRAN77/OpenMP version Estimate the integral of f(x) from A to B. f(x) = 50 / (pi * ( 2500 * x * x + 1 ) ). A = 0.0000000000000000 B = 10.0000000000000000 N = 10000000 Exact = 0.49936338107645672 Estimate = 0.49937128891911486 Error = 7.90784265813915255E-006 Time = 8.16933764144778252E-002