37   HDF5ReadCtx       h    = NULL;  in PetscViewerHDF5ReadInitialize_Private()  local
41   PetscCall(PetscNew(&h));  in PetscViewerHDF5ReadInitialize_Private()
42   h->name = name;  in PetscViewerHDF5ReadInitialize_Private()
43   PetscCall(PetscViewerHDF5OpenGroup(viewer, NULL, &h->file, &h->group));  in PetscViewerHDF5ReadInitialize_Private()
44   PetscCallHDF5Return(h->dataset, H5Dopen2, (h->group, name, H5P_DEFAULT));  in PetscViewerHDF5ReadInitialize_Private()
45   PetscCallHDF5Return(h->dataspace, H5Dget_space, (h->dataset));  in PetscViewerHDF5ReadInitialize_Private()
46 …PetscCall(PetscViewerHDF5ReadAttribute(viewer, name, "complex", PETSC_BOOL, &h->complexVal, &h->co…  in PetscViewerHDF5ReadInitialize_Private()
51   h->runs = 0;  in PetscViewerHDF5ReadInitialize_Private()
52   h->cind = NULL;  in PetscViewerHDF5ReadInitialize_Private()
53   *ctx    = h;  in PetscViewerHDF5ReadInitialize_Private()
59   HDF5ReadCtx h;  in PetscViewerHDF5ReadFinalize_Private()  local
62   h = *ctx;  in PetscViewerHDF5ReadFinalize_Private()
63   PetscCallHDF5(H5Gclose, (h->group));  in PetscViewerHDF5ReadFinalize_Private()
64   PetscCallHDF5(H5Sclose, (h->dataspace));  in PetscViewerHDF5ReadFinalize_Private()
65   PetscCallHDF5(H5Dclose, (h->dataset));  in PetscViewerHDF5ReadFinalize_Private()
225 static PetscErrorCode PetscViewerHDF5ReadArray_Private(PetscViewer viewer, HDF5ReadCtx h, hid_t dat…  in PetscViewerHDF5ReadArray_Private()  argument
230   PetscCallHDF5(H5Dread, (h->dataset, datatype, memspace, h->dataspace, hdf5->dxpl_id, arr));  in PetscViewerHDF5ReadArray_Private()
238   HDF5ReadCtx h        = NULL;  in PetscViewerHDF5Load_Internal()  local
247   PetscCall(PetscViewerHDF5ReadInitialize_Private(viewer, name, &h));  in PetscViewerHDF5Load_Internal()
249   if (!h->complexVal) {  in PetscViewerHDF5Load_Internal()
254 …PetscCheck(!h->complexVal, PetscObjectComm((PetscObject)viewer), PETSC_ERR_SUP, "Dataset %s/%s is …  in PetscViewerHDF5Load_Internal()
257   PetscCall(PetscViewerHDF5ReadSizes_Private(viewer, h, uncompress, PETSC_TRUE, &map));  in PetscViewerHDF5Load_Internal()
258   PetscCall(PetscViewerHDF5ReadSelectHyperslab_Private(viewer, h, map, &memspace));  in PetscViewerHDF5Load_Internal()
260   if (h->runs && uncompress) {  in PetscViewerHDF5Load_Internal()
266     for (PetscInt i = 0, off = 0; i < h->runs; ++i) {  in PetscViewerHDF5Load_Internal()
267       for (PetscInt j = 0, inc = 0; j < h->cind[i * 3 + 0]; ++j, ++off, inc += h->cind[i * 3 + 1]) {  in PetscViewerHDF5Load_Internal()
269           i = h->runs;  in PetscViewerHDF5Load_Internal()
272         if (off >= map->rstart) ind[off - map->rstart] = h->cind[i * 3 + 2] + inc;  in PetscViewerHDF5Load_Internal()
280   if (h->complexVal) unitsize *= 2;  in PetscViewerHDF5Load_Internal()
285   PetscCall(PetscViewerHDF5ReadArray_Private(viewer, h, datatype, memspace, arr));  in PetscViewerHDF5Load_Internal()
290   PetscCall(PetscViewerHDF5ReadFinalize_Private(viewer, &h));  in PetscViewerHDF5Load_Internal()
354   HDF5ReadCtx h   = NULL;  in PetscViewerHDF5ReadSizes()  local
359   PetscCall(PetscViewerHDF5ReadInitialize_Private(viewer, name, &h));  in PetscViewerHDF5ReadSizes()
360   PetscCall(PetscViewerHDF5ReadSizes_Private(viewer, h, PETSC_TRUE, PETSC_FALSE, &map));  in PetscViewerHDF5ReadSizes()
361   PetscCall(PetscViewerHDF5ReadFinalize_Private(viewer, &h));  in PetscViewerHDF5ReadSizes()