Removed trailing space from Fortran files.

1 files changed, 10 insertions, 10 deletions

diff --git a/fortran/src/H5Iff.F90 b/fortran/src/H5Iff.F90
index 351dd4b..d9c3d49 100644
--- a/fortran/src/H5Iff.F90
+++ b/fortran/src/H5Iff.F90
@@ -38,7 +38,7 @@
 !*****
 
 MODULE H5I
-  
+
   USE, INTRINSIC :: ISO_C_BINDING, ONLY : C_PTR, C_CHAR
   USE H5GLOBAL
 
@@ -305,10 +305,10 @@ CONTAINS
 !  Check if an ID is valid without producing an error message
 !
 ! INPUTS
-!  id		- identifier 
-! OUTPUTS       
+!  id		- identifier
+! OUTPUTS
 !  valid        - status of id as a valid identifier
-!  hdferr:	- error code		
+!  hdferr:	- error code
 !		   Success:  0
 !		   Failure: -1
 !
@@ -318,26 +318,26 @@ CONTAINS
 ! SOURCE
   SUBROUTINE h5iis_valid_f(id, valid, hdferr)
     IMPLICIT NONE
-    INTEGER(HID_T), INTENT(IN)  :: id ! Identifier 
+    INTEGER(HID_T), INTENT(IN)  :: id ! Identifier
     LOGICAL, INTENT(OUT) :: valid     ! Status of id as a valid identifier
     INTEGER, INTENT(OUT) :: hdferr    ! Error code
 !*****
     INTEGER  :: c_valid ! 0 = .false, 1 = .true.
-    
+
     INTERFACE
        INTEGER FUNCTION h5iis_valid_c(id, c_valid) BIND(C, NAME='h5iis_valid_c')
          IMPORT :: HID_T
          IMPLICIT NONE
-         INTEGER(HID_T), INTENT(IN)  :: id   ! Identifier 
+         INTEGER(HID_T), INTENT(IN)  :: id   ! Identifier
          INTEGER  :: c_valid
        END FUNCTION h5iis_valid_c
     END INTERFACE
-    
+
     hdferr = h5iis_valid_c(id, c_valid)
-    
+
     valid = .FALSE. ! Default
     IF(c_valid.EQ.1) valid = .TRUE.
-    
+
   END SUBROUTINE h5iis_valid_f
 END MODULE H5I