close Subroutine

private subroutine close(this)

Close the currently opened hdf5 file - requires a previous call to open()

Type Bound



Type IntentOptional Attributes Name
class(lMat_hdf5_read_t) :: this


Source Code

Source Code

    subroutine close(this)
        class(lMat_hdf5_read_t) :: this
        integer :: err
        call h5dclose_f(this%ds_vals, err)
        call h5dclose_f(this%ds_inds, err)
        ! close the file, finalize hdf5
        call h5gclose_f(this%grp_id, err)
        call h5pclose_f(this%plist_id, err)
        call h5fclose_f(this%file_id, err)
        call h5close_f(err)

    end subroutine close