diff --git a/model/tests/test_io.F90 b/model/tests/test_io.F90 index 4acbbb425..ba4f33fef 100644 --- a/model/tests/test_io.F90 +++ b/model/tests/test_io.F90 @@ -63,8 +63,10 @@ program test_io ! Make sure we got the values we expected. if (nopts .ne. 11) stop 11 + do i = 1, nopts + print *, ptnme(i), ptloc(1, i), ptloc(2, i) + end do - print *, 'SUCCESS!' end program test_io