Home
last modified time | relevance | path

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

/petsc/src/ksp/ksp/impls/gmres/agmres/
H A Dagmresorthog.c119 PetscReal *wbufptr = agmres->wbufptr; in KSPAGMRESRoddec() local
172 PetscCallBLAS("BLAScopy", BLAScopy_(&len, &Qloc[d * nloc + d], &bnloc, &wbufptr[d], &pas)); in KSPAGMRESRoddec()
173 PetscCallMPI(MPI_Send(&wbufptr[d], len, MPIU_SCALAR, rank + 1, agmres->tag, comm)); in KSPAGMRESRoddec()
175 PetscCallMPI(MPI_Recv(&wbufptr[d], len, MPIU_SCALAR, rank - 1, agmres->tag, comm, &status)); in KSPAGMRESRoddec()
177 c = wbufptr[d]; in KSPAGMRESRoddec()
182 old = wbufptr[k]; in KSPAGMRESRoddec()
183 wbufptr[k] = c * old - s * Qloc[k * nloc]; in KSPAGMRESRoddec()
187 …if (rank != Last) PetscCallMPI(MPI_Send(&wbufptr[d], len, MPIU_SCALAR, rank + 1, agmres->tag, comm… in KSPAGMRESRoddec()
203 PetscCallBLAS("BLAScopy", BLAScopy_(&len, &wbufptr[d], &pas, RLOC(d, d), &N)); in KSPAGMRESRoddec()
H A Dagmresimpl.h31 PetscScalar *temp, *wbufptr; member
H A Dagmres.c45 …ax_k, &agmres->Rshift, max_k, &agmres->Ishift, hes, &agmres->Rloc, (N + 1) * 4, &agmres->wbufptr)); in KSPSetUp_AGMRES()
496 PetscCall(PetscFree4(agmres->Rshift, agmres->Ishift, agmres->Rloc, agmres->wbufptr)); in KSPDestroy_AGMRES()