Searched refs:nierr (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/sys/ftn-src/ |
| H A D | somefort.F90 | 13 PetscMPIInt ierr, nierr, ciportable
16 call MPI_Finalize(nierr)
19 call MPI_Abort(comm, ierr, nierr)
|
| /petsc/src/sys/error/ftn-custom/ |
| H A D | zerrf.c | 84 PetscErrorCode nierr, *ierr = &nierr; in petscerror_() local
87 nierr = PetscError(MPI_Comm_f2c(*(comm)), 0, NULL, NULL, *number, *p, "%s", t1); in petscerror_()
|