hdf5_obj_Init Subroutine

    impure subroutine hdf5_obj_Init(this,parallel)
      !> Initializes the hdf5 object.
      implicit none
      class(hdf5_obj),    intent(inout) :: this                                !! A HDF5 object
      type(parallel_obj), intent(in),    &
                                 target :: parallel                            !! Parallel structure to point to
      ! Work variables
      integer :: ierr

      ! Point to the master objects
      this%parallel => parallel

      ! Initialize the hash table
      call this%tbl%Initialize(HDF5_SET_HTBL_SIZE)

      ! Initialize HDF5's Fortran interface
      call H5open_f(ierr)

      return
    end subroutine hdf5_obj_Init