Home
last modified time | relevance | path

Searched refs:rsum (Results 1 – 3 of 3) sorted by relevance

/petsc/src/ksp/pc/impls/tfs/
H A Dxxt.c469 PetscScalar rsum[4], rw[4]; in det_separators() local
500 PetscCall(PCTFS_rvec_zero(rsum, 2)); in det_separators()
503 rsum[0] += 1.0 / lhs[i]; in det_separators()
504 rsum[1] += lhs[i]; in det_separators()
507 PetscCall(PCTFS_grop_hc(rsum, rw, 2, op, level)); in det_separators()
508 rsum[0] += 0.1; in det_separators()
509 rsum[1] += 0.1; in det_separators()
511 if (PetscAbsScalar(rsum[0] - rsum[1]) > EPS) shared = 1; in det_separators()
513 xxt_handle->info->n_global = xxt_handle->info->m_global = (PetscInt)rsum[0]; in det_separators()
514 xxt_handle->mvi->n_global = xxt_handle->mvi->m_global = (PetscInt)rsum[0]; in det_separators()
[all …]
H A Dxyt.c579 PetscScalar rsum[4], rw[4]; in det_separators() local
611 PetscCall(PCTFS_rvec_zero(rsum, 2)); in det_separators()
614 rsum[0] += 1.0 / lhs[i]; in det_separators()
615 rsum[1] += lhs[i]; in det_separators()
620 PetscCall(PCTFS_grop_hc(rsum, rw, 2, op, level)); in det_separators()
621 rsum[0] += 0.1; in det_separators()
622 rsum[1] += 0.1; in det_separators()
624 xyt_handle->info->n_global = xyt_handle->info->m_global = (PetscInt)rsum[0]; in det_separators()
625 xyt_handle->mvi->n_global = xyt_handle->mvi->m_global = (PetscInt)rsum[0]; in det_separators()
/petsc/src/mat/impls/sbaij/mpi/
H A Dmpisbaij.c710 PetscReal *rsum, vabs; in MatNorm_MPISBAIJ() local
715 PetscCall(PetscCalloc1(mat->cmap->N, &rsum)); in MatNorm_MPISBAIJ()
729 rsum[gcol + col] += vabs; in MatNorm_MPISBAIJ()
731 if (bcol > 0 && vabs > 0.0) rsum[grow + row] += vabs; in MatNorm_MPISBAIJ()
750 rsum[gcol + col] += vabs; in MatNorm_MPISBAIJ()
751 rsum[grow + row] += vabs; in MatNorm_MPISBAIJ()
757 …PetscCallMPI(MPIU_Allreduce(MPI_IN_PLACE, rsum, mat->cmap->N, MPIU_REAL, MPIU_SUM, PetscObjectComm… in MatNorm_MPISBAIJ()
760 if (rsum[col] > *norm) *norm = rsum[col]; in MatNorm_MPISBAIJ()
762 PetscCall(PetscFree(rsum)); in MatNorm_MPISBAIJ()