Searched refs:nzeros (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/mat/impls/adj/mpi/ |
| H A D | mpiadj.c | 394 PetscInt i, m, N, nzeros = 0, *ia, *ja, len, rstart, cnt, j, *a; in MatConvertFrom_MPIAdj() local
413 nzeros += len; in MatConvertFrom_MPIAdj()
418 PetscCall(PetscMalloc1(nzeros + 1, &a)); in MatConvertFrom_MPIAdj()
420 PetscCall(PetscMalloc1(nzeros + 1, &ja)); in MatConvertFrom_MPIAdj()
422 nzeros = 0; in MatConvertFrom_MPIAdj()
429 a[nzeros + cnt] = (PetscInt)PetscAbsScalar(ra[j]); in MatConvertFrom_MPIAdj()
430 ja[nzeros + cnt++] = rj[j]; in MatConvertFrom_MPIAdj()
434 nzeros += cnt; in MatConvertFrom_MPIAdj()
435 ia[i + 1] = nzeros; in MatConvertFrom_MPIAdj()
|