summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--fortran/test/tH5T.f902
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/test/tH5T.f90 b/fortran/test/tH5T.f90
index 5056596..f64cb32 100644
--- a/fortran/test/tH5T.f90
+++ b/fortran/test/tH5T.f90
@@ -479,7 +479,7 @@
CALL check("h5dread_f", error, total_error)
do i = 1, dimsize
if (real_member_out(i) .ne. real_member(i)) then
- write(*,*) " Wrong double precision data is read back "
+ write(*,*) " Wrong real precision data is read back "
total_error = total_error + 1
endif
enddo