Close_HDF5 Subroutine

public subroutine Close_HDF5(fileId)

Arguments

TypeIntentOptionalAttributesName
integer(kind=HID_T), intent(in) :: fileId

Contents

Source Code


Source Code

  subroutine Close_HDF5(fileId)
    implicit none
    integer(HID_T),intent(in) :: fileId
    ! Local
    integer :: error

    call h5fclose_f(fileId,error)
    call h5close_f(error)

  endsubroutine Close_HDF5