Searched refs:wa (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/snes/impls/gs/ |
| H A D | gssecant.c | 23 PetscScalar *xa, *wa; in SNESComputeNGSDefaultSecant() local
65 PetscCall(VecGetArray(W, &wa)); in SNESComputeNGSDefaultSecant()
66 for (j = 0; j < size; j++) wa[idx[j] - s] += h; in SNESComputeNGSDefaultSecant()
67 PetscCall(VecRestoreArray(W, &wa)); in SNESComputeNGSDefaultSecant()
76 PetscCall(VecGetArray(W, &wa)); in SNESComputeNGSDefaultSecant()
84 w = wa[idx[j] - s]; in SNESComputeNGSDefaultSecant()
99 PetscCall(VecRestoreArray(W, &wa)); in SNESComputeNGSDefaultSecant()
|
| /petsc/src/ksp/pc/impls/bddc/ |
| H A D | bddcprivate.c | 1343 const PetscScalar *wa; in PCBDDCNedelecSupport() local
1359 PetscCall(VecGetArrayRead(w, &wa)); in PCBDDCNedelecSupport()
1361 … if (PetscAbsScalar(wa[i - T->rmap->rstart])) PetscCall(MatSetValue(T, i, i, 1.0, INSERT_VALUES)); in PCBDDCNedelecSupport()
1362 PetscCall(VecRestoreArrayRead(w, &wa)); in PCBDDCNedelecSupport()
|