diff --git a/tests/fstats_statistics_tests.f90 b/tests/fstats_statistics_tests.f90 index 8514435..1d8f5ea 100644 --- a/tests/fstats_statistics_tests.f90 +++ b/tests/fstats_statistics_tests.f90 @@ -659,6 +659,7 @@ function confidence_interval_test_1() result(rst) if (.not.is_equal(c, t10, tol)) then rst = .false. print '(A)', "TEST FAILED: Confidence Interval Test 1" + print *, "Expected: ", t10, " Found: ", c end if ! Test 2, nu = 20 @@ -667,6 +668,7 @@ function confidence_interval_test_1() result(rst) if (.not.is_equal(c, t20, tol)) then rst = .false. print '(A)', "TEST FAILED: Confidence Interval Test 2" + print *, "Expected: ", t20, " Found: ", c end if ! Test 3, nu = 30 @@ -675,6 +677,7 @@ function confidence_interval_test_1() result(rst) if (.not.is_equal(c, t30, tol)) then rst = .false. print '(A)', "TEST FAILED: Confidence Interval Test 3" + print *, "Expected: ", t30, " Found: ", c end if end function diff --git a/tests/fstats_tests.f90 b/tests/fstats_tests.f90 index dfd656f..eef853d 100644 --- a/tests/fstats_tests.f90 +++ b/tests/fstats_tests.f90 @@ -110,29 +110,29 @@ program tests local = trimmed_mean_test_1() if (.not.local) overall = .false. - ! ! Covariance Tests - ! local = test_covariance_1() - ! if (.not.local) overall = .false. + ! Covariance Tests + local = test_covariance_1() + if (.not.local) overall = .false. - ! ! Correlation Tests - ! local = test_correlation_1() - ! if (.not.local) overall = .false. + ! Correlation Tests + local = test_correlation_1() + if (.not.local) overall = .false. - ! ! Additional Tests - ! local = test_pooled_variance_1() - ! if (.not.local) overall = .false. + ! Additional Tests + local = test_pooled_variance_1() + if (.not.local) overall = .false. - ! local = test_bartlett_1() - ! if (.not.local) overall = .false. + local = test_bartlett_1() + if (.not.local) overall = .false. - ! local = test_levene_1() - ! if (.not.local) overall = .false. + local = test_levene_1() + if (.not.local) overall = .false. - ! local = test_standardized_variable() - ! if (.not.local) overall = .false. + local = test_standardized_variable() + if (.not.local) overall = .false. - ! local = test_sample_size() - ! if (.not.local) overall = .false. + local = test_sample_size() + if (.not.local) overall = .false. ! End if (.not.overall) then