ReadArray_HDF5_real_r4_serial Subroutine

  1. SELF_HDF5.f90
  2. SELF_HDF5
  3. ReadArray_HDF5_real_r4_serial

private subroutine ReadArray_HDF5_real_r4_serial(fileId, arrayName, hfArray)

Arguments

TypeIntentOptionalAttributesName
integer(kind=HID_T), intent(in) :: fileId
character, intent(in) :: arrayName
real(kind=prec), intent(inout), dimension(:,:,:,:):: hfArray

Calls

proc~~readarray_hdf5_real_r4_serial~~CallsGraph proc~readarray_hdf5_real_r4_serial ReadArray_HDF5_real_r4_serial h5dopen_f h5dopen_f proc~readarray_hdf5_real_r4_serial->h5dopen_f h5dread_f h5dread_f proc~readarray_hdf5_real_r4_serial->h5dread_f h5dclose_f h5dclose_f proc~readarray_hdf5_real_r4_serial->h5dclose_f h5kind_to_type h5kind_to_type proc~readarray_hdf5_real_r4_serial->h5kind_to_type

Called by

proc~~readarray_hdf5_real_r4_serial~~CalledByGraph proc~readarray_hdf5_real_r4_serial ReadArray_HDF5_real_r4_serial interface~readarray_hdf5 ReadArray_HDF5 interface~readarray_hdf5->proc~readarray_hdf5_real_r4_serial proc~read_hopr_mesh3d_t Read_HOPr_Mesh3D_t proc~read_hopr_mesh3d_t->interface~readarray_hdf5 proc~read_dgmodel2d_t Read_DGModel2D_t proc~read_dgmodel2d_t->interface~readarray_hdf5 proc~read_hopr_mesh2d_t Read_HOPr_Mesh2D_t proc~read_hopr_mesh2d_t->interface~readarray_hdf5 proc~read_dgmodel3d_t Read_DGModel3D_t proc~read_dgmodel3d_t->interface~readarray_hdf5 proc~read_dgmodel1d_t Read_DGModel1D_t proc~read_dgmodel1d_t->interface~readarray_hdf5

Contents

Source Code

ReadArray_HDF5_real_r4_serial

Source Code

  subroutine ReadArray_HDF5_real_r4_serial(fileId,arrayName,hfArray)
    implicit none
    integer(HID_T),intent(in) :: fileId
    character(*),intent(in) :: arrayName
    real(prec),dimension(:,:,:,:),intent(inout) :: hfArray
    ! Local
    integer(HID_T) :: dsetId
    integer(HID_T) :: dims(1:4)
    integer :: error

    dims = shape(hfArray)

    call h5dopen_f(fileId,arrayName,dsetId,error)

    call h5dread_f(dsetId,h5kind_to_type(prec,H5_REAL_KIND),hfArray,dims,error)

    call h5dclose_f(dsetId,error)

  endsubroutine ReadArray_HDF5_real_r4_serial