Searched refs:pwork (Results 1 – 3 of 3) sorted by relevance
| /petsc/src/ksp/pc/impls/ml/ |
| H A D | ml.c | 43 PetscScalar *pwork; /* tmp array used by PetscML_comm() */ member
130 PetscScalar *pwork = ml->pwork; in PetscML_matvec() local
138 for (i = 0; i < in_length; i++) pwork[i] = p[i]; in PetscML_matvec()
139 PetscCall(PetscML_comm(pwork, ml)); in PetscML_matvec()
140 PetscCall(VecPlaceArray(ml->x, pwork)); in PetscML_matvec()
466 PetscCall(PetscFree(pc_ml->PetscMLdata->pwork)); in PCReset_ML()
619 PetscCall(PetscMalloc1(Aloc->cmap->n + 1, &PetscMLdata->pwork)); in PCSetUp_ML()
635 for (j = 0; j < nloc; j++) PetscMLdata->pwork[bs * j] = pc_ml->coords[nloc * i + j]; in PCSetUp_ML()
637 PetscCall(PetscML_comm(PetscMLdata->pwork, PetscMLdata)); in PCSetUp_ML()
639 for (j = 0; j < nlocghost; j++) ghostedcoords[i * nlocghost + j] = PetscMLdata->pwork[bs * j]; in PCSetUp_ML()
|
| /petsc/src/snes/interface/ |
| H A D | snesut.c | 480 PetscReal rmax, pwork; in SNESMonitorRange_Private() local
490 pwork = 0.0; in SNESMonitorRange_Private()
491 for (i = 0; i < n; i++) pwork += (PetscAbsScalar(r[i]) > .20 * rmax); in SNESMonitorRange_Private()
492 …PetscCallMPI(MPIU_Allreduce(&pwork, per, 1, MPIU_REAL, MPIU_SUM, PetscObjectComm((PetscObject)snes… in SNESMonitorRange_Private()
|
| /petsc/src/ksp/ksp/interface/ |
| H A D | iterativ.c | 298 PetscReal rmax, pwork; in KSPMonitorRange_Private() local
307 pwork = 0.0; in KSPMonitorRange_Private()
308 for (i = 0; i < n; ++i) pwork += (PetscAbsScalar(r[i]) > .20 * rmax); in KSPMonitorRange_Private()
311 …PetscCallMPI(MPIU_Allreduce(&pwork, per, 1, MPIU_REAL, MPIU_SUM, PetscObjectComm((PetscObject)ksp)… in KSPMonitorRange_Private()
|