From 7caca66dd06d0f120a3eb0cdc9c5907fbfe9feaa Mon Sep 17 00:00:00 2001 From: Scot Breitenfeld Date: Fri, 17 Apr 2015 11:03:14 -0500 Subject: [svn-r26832] misc. clean-up --- fortran/src/H5Zff.F90 | 4 ++-- 1 file 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 -- cgit v0.12