Searched refs:zloc (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/ksp/ksp/impls/gmres/agmres/ |
| H A D | agmresorthog.c | 243 PetscScalar *y, *zloc; in KSPAGMRESRodvec() local
257 PetscCall(VecGetArray(Out, &zloc)); in KSPAGMRESRodvec()
262 for (i = 0; i < nloc; i++) zloc[i] = 0.0; in KSPAGMRESRodvec()
263 if (agmres->size == 1) PetscCallBLAS("BLAScopy", BLAScopy_(&bnvec, y, &pas, &zloc[0], &pas)); in KSPAGMRESRodvec()
267 PetscCallMPI(MPI_Recv(&zloc[d], 1, MPIU_SCALAR, Iright, agmres->tag, comm, &status)); in KSPAGMRESRodvec()
272 zp = zloc[i - 1]; in KSPAGMRESRodvec()
273 zq = zloc[i]; in KSPAGMRESRodvec()
274 zloc[i - 1] = c * zp + s * zq; in KSPAGMRESRodvec()
275 zloc[i] = -s * zp + c * zq; in KSPAGMRESRodvec()
280 zq = zloc[0]; in KSPAGMRESRodvec()
[all …]
|
| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex59.c | 333 PetscInt localsize, zloc, yloc, xloc, auxnex, auxney, auxnez; in ComputeSubdomainMatrix() local
348 zloc = 1; in ComputeSubdomainMatrix()
350 if (dd.dim > 2) zloc = dd.p + 1; in ComputeSubdomainMatrix()
352 for (k = 0; k < zloc; k++) { in ComputeSubdomainMatrix()
387 zloc = dd.p + 1; in ComputeSubdomainMatrix()
388 if (dd.dim < 3) zloc = 1; in ComputeSubdomainMatrix()
414 for (k = 0; k < zloc; k++) { in ComputeSubdomainMatrix()
426 for (i = 0; i < xloc * yloc * zloc; i++) { in ComputeSubdomainMatrix()
462 PetscInt xloc, yloc, zloc, xyloc, xyzloc; in GLLStuffs() local
570 zloc = p + 1; in GLLStuffs()
[all …]
|