diff options
| author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2015-04-17 16:03:14 (GMT) |
|---|---|---|
| committer | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2015-04-17 16:03:14 (GMT) |
| commit | 7caca66dd06d0f120a3eb0cdc9c5907fbfe9feaa (patch) | |
| tree | fbf00c9483ff95c9cce3d250555ecdd4d7eb3ae8 | |
| parent | ec2327200da42befb984a92d1b0444f0e014ffb2 (diff) | |
| download | hdf5-7caca66dd06d0f120a3eb0cdc9c5907fbfe9feaa.zip hdf5-7caca66dd06d0f120a3eb0cdc9c5907fbfe9feaa.tar.gz hdf5-7caca66dd06d0f120a3eb0cdc9c5907fbfe9feaa.tar.bz2 | |
[svn-r26832] misc. clean-up
| -rw-r--r-- | fortran/src/H5Zff.F90 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/fortran/src/H5Zff.F90 b/fortran/src/H5Zff.F90 index ba7692f..1dd8bcd 100644 --- a/fortran/src/H5Zff.F90 +++ b/fortran/src/H5Zff.F90 @@ -113,7 +113,7 @@ CONTAINS INTERFACE INTEGER FUNCTION h5zfilter_avail_c(filter, flag) BIND(C,NAME='h5zfilter_avail_c') - USE H5GLOBAL + IMPLICIT NONE INTEGER, INTENT(IN) :: filter INTEGER :: flag END FUNCTION h5zfilter_avail_c @@ -164,7 +164,7 @@ CONTAINS INTERFACE INTEGER FUNCTION h5zget_filter_info_c(filter, config_flags) BIND(C,NAME='h5zget_filter_info_c') - USE H5GLOBAL + IMPLICIT NONE INTEGER, INTENT(IN) :: filter INTEGER, INTENT(OUT) :: config_flags END FUNCTION h5zget_filter_info_c |