Lines Matching refs:comm
19 PetscErrorCode HoneeCheckFilenameExtension(MPI_Comm comm, const char filename[], const char extensi… in HoneeCheckFilenameExtension() argument
25 PetscCheck(ext_len, comm, PETSC_ERR_ARG_WRONG, "Zero-size extension: %s", extension); in HoneeCheckFilenameExtension()
62 MPI_Comm comm; in HoneeLoadInitialCondition() local
67 PetscCall(PetscObjectGetComm((PetscObject)Q, &comm)); in HoneeLoadInitialCondition()
68 PetscCall(HoneeCheckFilenameExtension(comm, filename, ".bin", &isBin)); in HoneeLoadInitialCondition()
69 PetscCall(HoneeCheckFilenameExtension(comm, filename, ".cgns", &isCGNS)); in HoneeLoadInitialCondition()
72 PetscCall(PetscViewerBinaryOpen(comm, filename, FILE_MODE_READ, &viewer)); in HoneeLoadInitialCondition()
82 PetscCall(PetscViewerCGNSOpen(comm, filename, FILE_MODE_READ, &viewer)); in HoneeLoadInitialCondition()
93 if (!set) PetscCall(PetscPrintf(comm, "WARNING: Couldn't find solution time in file\n")); in HoneeLoadInitialCondition()
103 PetscCheck(isFlowSolution, comm, PETSC_ERR_FILE_UNEXPECTED, in HoneeLoadInitialCondition()
110 …SETERRQ(comm, PETSC_ERR_SUP, "Loading initial condition from CGNS requires PETSc to be built with … in HoneeLoadInitialCondition()
132 MPI_Comm comm = PetscObjectComm((PetscObject)viewer); in HoneeLoadBinaryVec() local
158 …PetscCheck(token == VEC_FILE_CLASSID, comm, PETSC_ERR_FILE_UNEXPECTED, "Not a HONEE header token o… in HoneeLoadBinaryVec()
162 …PetscCheck(length == N, comm, PETSC_ERR_ARG_INCOMP, "File Vec '%s' has length %" PetscInt_FMT " bu… in HoneeLoadBinaryVec()
191 MPI_Comm comm = PetscObjectComm((PetscObject)viewer); in HoneeWriteBinaryVec() local
195 …PetscCheck(is_binary_viewer, comm, PETSC_ERR_ARG_WRONGSTATE, "Viewer must be binary type; instead … in HoneeWriteBinaryVec()
197 …PetscCheck(file_mode == FILE_MODE_WRITE, comm, PETSC_ERR_ARG_WRONGSTATE, "Viewer must be binary ty… in HoneeWriteBinaryVec()
222 PetscErrorCode PhastaDatFileOpen(const MPI_Comm comm, const char path[], const PetscInt char_array_… in PhastaDatFileOpen() argument
228 PetscCall(PetscFOpen(comm, path, "r", fp)); in PhastaDatFileOpen()
229 PetscCall(PetscSynchronizedFGets(comm, *fp, char_array_len, line)); in PhastaDatFileOpen()
231 …PetscCheck(ndims == 2, comm, PETSC_ERR_FILE_UNEXPECTED, "Found %d dimensions instead of 2 on the f… in PhastaDatFileOpen()
247 PetscErrorCode PhastaDatFileGetNRows(const MPI_Comm comm, const char path[], PetscInt *nrows) { in PhastaDatFileGetNRows() argument
253 PetscCall(PhastaDatFileOpen(comm, path, char_array_len, dims, &fp)); in PhastaDatFileGetNRows()
255 PetscCall(PetscFClose(comm, fp)); in PhastaDatFileGetNRows()
266 PetscErrorCode PhastaDatFileReadToArrayReal(MPI_Comm comm, const char path[], PetscReal array[]) { in PhastaDatFileReadToArrayReal() argument
273 PetscCall(PhastaDatFileOpen(comm, path, char_array_len, dims, &fp)); in PhastaDatFileReadToArrayReal()
279 PetscCall(PetscSynchronizedFGets(comm, fp, char_array_len, line)); in PhastaDatFileReadToArrayReal()
281 PetscCheck(ndims == dims[1], comm, PETSC_ERR_FILE_UNEXPECTED, in PhastaDatFileReadToArrayReal()
288 PetscCall(PetscFClose(comm, fp)); in PhastaDatFileReadToArrayReal()