diff options
| author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2023-10-19 21:40:08 (GMT) |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2023-10-19 21:40:08 (GMT) |
| commit | 5672fd817732e6a7fda3886010452bc7c8598cf8 (patch) | |
| tree | b03635041dd808e3b1565b5c53ec373e377cbcba /fortran/test/tH5Z.F90 | |
| parent | 8c69566da66e9239bbcd84b10e60068ade6c1784 (diff) | |
| download | hdf5-5672fd817732e6a7fda3886010452bc7c8598cf8.zip hdf5-5672fd817732e6a7fda3886010452bc7c8598cf8.tar.gz hdf5-5672fd817732e6a7fda3886010452bc7c8598cf8.tar.bz2 | |
Attempt to quiet some warnings with cray compilers. (#3724)
Diffstat (limited to 'fortran/test/tH5Z.F90')
| -rw-r--r-- | fortran/test/tH5Z.F90 | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/fortran/test/tH5Z.F90 b/fortran/test/tH5Z.F90 index 3ac51d6..c6ab383 100644 --- a/fortran/test/tH5Z.F90 +++ b/fortran/test/tH5Z.F90 @@ -25,15 +25,15 @@ !***** MODULE TH5Z + USE HDF5 ! This module contains all necessary modules + USE TH5_MISC + CONTAINS SUBROUTINE filters_test(total_error) ! This subroutine tests following functionalities: h5zfilter_avail_f, h5zunregister_f - USE HDF5 ! This module contains all necessary modules - USE TH5_MISC - IMPLICIT NONE INTEGER, INTENT(OUT) :: total_error LOGICAL :: status @@ -164,8 +164,6 @@ CONTAINS END SUBROUTINE filters_test SUBROUTINE szip_test(szip_flag, cleanup, total_error) - USE HDF5 ! This module contains all necessary modules - USE TH5_MISC IMPLICIT NONE LOGICAL, INTENT(OUT) :: szip_flag |