diff --git a/Inst_eddies/Tests/test_set_all_outerm.f90 b/Inst_eddies/Tests/test_set_all_outerm.f90 index e9eaf064ae75bb404fdc1d0abb054b165514fd3d..f2510f82e2bc1a5b053b82c6a0f48aba2d18bf8d 100644 --- a/Inst_eddies/Tests/test_set_all_outerm.f90 +++ b/Inst_eddies/Tests/test_set_all_outerm.f90 @@ -49,6 +49,8 @@ program test_set_all_outerm end do print *, "test_set_all_outerm: s%number_extr = ", s%number_extr + print *, "test_set_all_outerm: Number of outermost contours = ", & + count(s%list%out_cont%closed) print *, "test_set_all_outerm: Average number of points per outermost ", & "contour: ", sum(s%list%out_cont%n_points) / real(s%number_extr) call shpc_create(hshp_cyclo, shpc_dir = "SHPC", cyclone = .true., slice = 0, &