File tree Expand file tree Collapse file tree
Expand file tree Collapse file tree Original file line number Diff line number Diff line change @@ -9,7 +9,7 @@ function test_bootstrap_1() result(rst)
99 logical :: rst
1010
1111 ! Parameters
12- real (real64), parameter :: tol = 1 .0d-2
12+ real (real64), parameter :: tol = 5 .0d-2
1313 real (real64), parameter :: ci_upper = 0.746d0
1414 real (real64), parameter :: ci_lower = 0.583d0
1515 real (real64), parameter :: std_err = 0.042d0
@@ -72,7 +72,6 @@ function test_bootstrap_1() result(rst)
7272 function test_random_resample_with_replacement () result(rst)
7373 logical :: rst
7474
75- real (real64), parameter :: tol = 1.0d-12
7675 real (real64) :: x(5 ), xn(5 )
7776
7877 rst = .true.
@@ -104,7 +103,7 @@ function test_bootstrap_2() result(rst)
104103 logical :: rst
105104
106105 ! Parameters
107- real (real64), parameter :: tol = 1 .0d-2
106+ real (real64), parameter :: tol = 5 .0d-2
108107 real (real64), parameter :: ci_upper = 0.746d0
109108 real (real64), parameter :: ci_lower = 0.583d0
110109 real (real64), parameter :: std_err = 0.042d0
You can’t perform that action at this time.
0 commit comments