[svn-r18197] Description:

    Trim trailing whitespace from source code files with this command:

find . \( -name "*.[ch]" -or -name "*.cpp" -or -name "*.f90" \) -print |xargs -n 1 sed -i "" 's/[[:blank:]]*$//'

Tested on:
    None - eyeballed only

1 files changed, 44 insertions, 44 deletions

diff --git a/fortran/examples/refregexample.f90 b/fortran/examples/refregexample.f90
index e7728bb..68fbd24 100644
--- a/fortran/examples/refregexample.f90
+++ b/fortran/examples/refregexample.f90
@@ -1,4 +1,4 @@
-! * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
+! * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
 !   Copyright by The HDF Group.                                               *
 !   Copyright by the Board of Trustees of the University of Illinois.         *
 !   All rights reserved.                                                      *
@@ -11,43 +11,43 @@
 !   is linked from the top-level documents page.  It can also be found at     *
 !   http://hdfgroup.org/HDF5/doc/Copyright.html.  If you do not have          *
 !   access to either file, you may request a copy from help@hdfgroup.org.     *
-! * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
+! * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
 !
 !
-!    This program shows how to create, store and dereference references 
+!    This program shows how to create, store and dereference references
 !    to the dataset regions.
 !    Program creates a file and writes two dimensional integer dataset
 !    to it. Then program creates and stores references to the hyperslab
-!    and 3 points selected in the integer dataset, in the second dataset. 
+!    and 3 points selected in the integer dataset, in the second dataset.
 !    Program reopens the second dataset, reads and dereferences region
-!    references, and then reads and displays selected data from the 
+!    references, and then reads and displays selected data from the
 !    integer dataset.
-!    
+!
      PROGRAM REG_REFERENCE
 
-        USE HDF5 ! This module contains all necessary modules 
-        
+        USE HDF5 ! This module contains all necessary modules
+
      IMPLICIT NONE
      CHARACTER(LEN=10), PARAMETER :: filename = "FORTRAN.h5"
      CHARACTER(LEN=6), PARAMETER :: dsetnamev = "MATRIX"
      CHARACTER(LEN=17), PARAMETER :: dsetnamer = "REGION_REFERENCES"
-      
-     INTEGER(HID_T) :: file_id       ! File identifier 
-     INTEGER(HID_T) :: space_id      ! Dataspace identifier 
-     INTEGER(HID_T) :: spacer_id     ! Dataspace identifier 
-     INTEGER(HID_T) :: dsetv_id      ! Dataset identifier 
-     INTEGER(HID_T) :: dsetr_id      ! Dataset identifier 
+
+     INTEGER(HID_T) :: file_id       ! File identifier
+     INTEGER(HID_T) :: space_id      ! Dataspace identifier
+     INTEGER(HID_T) :: spacer_id     ! Dataspace identifier
+     INTEGER(HID_T) :: dsetv_id      ! Dataset identifier
+     INTEGER(HID_T) :: dsetr_id      ! Dataset identifier
      INTEGER     ::   error
      TYPE(hdset_reg_ref_t_f) , DIMENSION(2) :: ref     ! Buffers to store references
      TYPE(hdset_reg_ref_t_f) , DIMENSION(2) :: ref_out !
      INTEGER(HSIZE_T), DIMENSION(2) :: dims = (/2,9/)  ! Datasets dimensions
-     INTEGER(HSIZE_T), DIMENSION(1) :: dimsr = (/2/)   ! 
+     INTEGER(HSIZE_T), DIMENSION(1) :: dimsr = (/2/)   !
      INTEGER(HSIZE_T), DIMENSION(2) :: start
      INTEGER(HSIZE_T), DIMENSION(2) :: count
-     INTEGER :: rankr = 1 
+     INTEGER :: rankr = 1
      INTEGER :: rank = 2
-     INTEGER , DIMENSION(2,9) ::  data 
-     INTEGER , DIMENSION(2,9) ::  data_out = 0 
+     INTEGER , DIMENSION(2,9) ::  data
+     INTEGER , DIMENSION(2,9) ::  data_out = 0
      INTEGER(HSIZE_T) , DIMENSION(2,3) :: coord
      INTEGER(SIZE_T) ::num_points = 3  ! Number of selected points
      INTEGER :: i, j
@@ -64,26 +64,26 @@
      !
      CALL h5fcreate_f(filename, H5F_ACC_TRUNC_F, file_id, error)
                                          ! Default file access and file creation
-                                         ! properties are used. 
-     ! 
+                                         ! properties are used.
+     !
      ! Create  dataspaces:
-     ! 
-     ! for dataset with references to dataset regions 
+     !
+     ! for dataset with references to dataset regions
      !
      CALL h5screate_simple_f(rankr, dimsr, spacer_id, error)
      !
-     ! for integer dataset 
+     ! for integer dataset
      !
      CALL h5screate_simple_f(rank, dims, space_id, error)
      !
      ! Create  and write datasets:
      !
-     ! Integer dataset 
+     ! Integer dataset
      !
      CALL h5dcreate_f(file_id, dsetnamev, H5T_NATIVE_INTEGER, space_id, &
                       dsetv_id, error)
      data_dims(1) = 2
-     data_dims(2) = 9 
+     data_dims(2) = 9
      CALL h5dwrite_f(dsetv_id, H5T_NATIVE_INTEGER, data, data_dims, error)
      CALL h5dclose_f(dsetv_id, error)
      !
@@ -94,25 +94,25 @@
      !
      ! Create a reference to the hyperslab selection.
      !
-     start(1) = 0 
-     start(2) = 3 
+     start(1) = 0
+     start(2) = 3
      count(1) = 2
      count(2) = 3
      CALL h5sselect_hyperslab_f(space_id, H5S_SELECT_SET_F, &
-                                start, count, error) 
-     CALL h5rcreate_f(file_id, dsetnamev, space_id, ref(1), error) 
+                                start, count, error)
+     CALL h5rcreate_f(file_id, dsetnamev, space_id, ref(1), error)
      !
      ! Create a reference to elements selection.
      !
      CALL h5sselect_none_f(space_id, error)
      CALL h5sselect_elements_f(space_id, H5S_SELECT_SET_F, rank, num_points,&
-                               coord, error) 
-     CALL h5rcreate_f(file_id, dsetnamev, space_id, ref(2), error) 
+                               coord, error)
+     CALL h5rcreate_f(file_id, dsetnamev, space_id, ref(2), error)
      !
-     ! Write dataset with the references. 
+     ! Write dataset with the references.
      !
      ref_size(1) = size(ref)
-     CALL h5dwrite_f(dsetr_id, H5T_STD_REF_DSETREG, ref, ref_size, error) 
+     CALL h5dwrite_f(dsetr_id, H5T_STD_REF_DSETREG, ref, ref_size, error)
      !
      ! Close all objects.
      !
@@ -129,12 +129,12 @@
      ! Read references to the dataset regions.
      !
      ref_size(1) = size(ref_out)
-     CALL h5dread_f(dsetr_id, H5T_STD_REF_DSETREG, ref_out, ref_size, error) 
-     ! 
+     CALL h5dread_f(dsetr_id, H5T_STD_REF_DSETREG, ref_out, ref_size, error)
+     !
      ! Dereference the first reference.
-     ! 
+     !
      CALL H5rdereference_f(dsetr_id, ref_out(1), dsetv_id, error)
-     CALL H5rget_region_f(dsetr_id, ref_out(1), space_id, error) 
+     CALL H5rget_region_f(dsetr_id, ref_out(1), space_id, error)
      !
      ! Read selected data from the dataset.
      !
@@ -142,18 +142,18 @@
                      mem_space_id = space_id, file_space_id = space_id)
           write(*,*) "Hypeslab selection"
           write(*,*)
-          do i = 1,2 
+          do i = 1,2
           write(*,*) (data_out (i,j), j = 1,9)
           enddo
           write(*,*)
      CALL h5sclose_f(space_id, error)
      CALL h5dclose_f(dsetv_id, error)
      data_out = 0
-     !  
+     !
      ! Dereference the second reference.
-     ! 
+     !
      CALL H5rdereference_f(dsetr_id, ref_out(2), dsetv_id, error)
-     CALL H5rget_region_f(dsetr_id, ref_out(2), space_id, error) 
+     CALL H5rget_region_f(dsetr_id, ref_out(2), space_id, error)
      !
      ! Read selected data from the dataset.
      !
@@ -161,7 +161,7 @@
                      mem_space_id = space_id, file_space_id = space_id)
           write(*,*) "Point selection"
           write(*,*)
-          do i = 1,2 
+          do i = 1,2
           write(*,*) (data_out (i,j), j = 1,9)
           enddo
      !
@@ -173,8 +173,8 @@
      !
      ! Close FORTRAN interface.
      !
-     CALL h5close_f(error) 
+     CALL h5close_f(error)
 
-     END PROGRAM REG_REFERENCE 
+     END PROGRAM REG_REFERENCE