Adding HDF5C type to legacy fortran interface

Adding PIO_IOTYPE_HDF5C to the legacy fortran interface

Author: jayeshkrishna

src/flib_legacy/pio.F90

@@ -26,7 +26,8 @@ module pio
        pio_rearr_comm_p2p, pio_rearr_comm_coll,&
        pio_int, pio_real, pio_double, pio_noerr, iotype_netcdf, &
        iotype_pnetcdf,  pio_iotype_netcdf4p, pio_iotype_netcdf4p_nczarr, pio_iotype_netcdf4c, &
-       pio_iotype_pnetcdf,pio_iotype_netcdf, pio_iotype_adios, pio_iotype_adiosc, pio_iotype_hdf5, &
+       pio_iotype_pnetcdf,pio_iotype_netcdf, pio_iotype_adios, pio_iotype_adiosc, &
+       pio_iotype_hdf5, pio_iotype_hdf5c, &
        pio_global, pio_char, pio_write, pio_nowrite, pio_clobber, pio_noclobber, &
        pio_max_name, pio_max_var_dims, pio_rearr_subset, pio_rearr_box, pio_rearr_any,&
 #if defined(_NETCDF) || defined(_PNETCDF)

src/flib_legacy/pio_types.F90

@@ -104,6 +104,7 @@ module pio_types
 !!   - PIO_iotype_adios : parallel write of ADIOS files with subset rearrangement only
 !!   - PIO_iotype_adiosc : parallel write of ADIOS files with data compression
 !!   - PIO_iotype_hdf5 : parallel write of HDF5 files
+!!   - PIO_iotype_hdf5c : parallel read/write of HDF5 files with data compression
 !>
     integer(i4), public, parameter ::  &
         PIO_iotype_pnetcdf = 1, &   ! parallel read/write of pNetCDF files
@@ -113,7 +114,8 @@ module pio_types
         PIO_iotype_netcdf4p_nczarr = 5, &  ! netcdf4 (hdf5 format) NCZarr file opened in parallel
         PIO_iotype_adios = 6, &     ! parallel read/write of ADIOS files
         PIO_iotype_adiosc = 7, &    ! parallel read/write of ADIOS files with compression
-        PIO_iotype_hdf5 = 8         ! parallel write of HDF5 files
+        PIO_iotype_hdf5 = 8, &      ! parallel write of HDF5 files
+        PIO_iotype_hdf5c = 9        ! parallel read/write of HDF5 files with compression
 
 
 ! These are for backward compatability and should not be used or expanded upon