| /petsc/src/vec/vec/interface/ ! |
| H A D | dlregisvec.c | 103 struct PetscRealInt *xout = (struct PetscRealInt *)out; in MPIU_MaxIndex_Local() local
112 if (xin[c].v > xout[c].v) { in MPIU_MaxIndex_Local()
113 xout[c].v = xin[c].v; in MPIU_MaxIndex_Local()
114 xout[c].i = xin[c].i; in MPIU_MaxIndex_Local()
115 } else if (xin[c].v == xout[c].v) { in MPIU_MaxIndex_Local()
116 xout[c].i = PetscMin(xin[c].i, xout[c].i); in MPIU_MaxIndex_Local()
129 struct PetscRealInt *xout = (struct PetscRealInt *)out; in MPIU_MinIndex_Local() local
138 if (xin[c].v < xout[c].v) { in MPIU_MinIndex_Local()
139 xout[c].v = xin[c].v; in MPIU_MinIndex_Local()
140 xout[c].i = xin[c].i; in MPIU_MinIndex_Local()
[all …]
|
| /petsc/src/mat/tests/ ! |
| H A D | ex73.c | 27 Vec xin, xout; in main() local
122 PetscCall(VecCreateFromOptions(PETSC_COMM_WORLD, NULL, 1, m, PETSC_DECIDE, &xout)); in main()
123 PetscCall(VecScatterCreate(xin, is, xout, NULL, &scat)); in main()
124 PetscCall(VecScatterBegin(scat, xin, xout, INSERT_VALUES, SCATTER_FORWARD)); in main()
125 PetscCall(VecScatterEnd(scat, xin, xout, INSERT_VALUES, SCATTER_FORWARD)); in main()
129 PetscCall(VecView(xout, PETSC_VIEWER_STDOUT_WORLD)); in main()
131 PetscCall(VecDestroy(&xout)); in main()
|
| /petsc/src/sys/objects/ ! |
| H A D | pinit.c | 190 …struct petsc_mpiu_int_mpiint *xin = (struct petsc_mpiu_int_mpiint *)in, *xout = (struct petsc_mpiu… in MPIU_MaxSum_Local() local
194 xout[i].a = PetscMax(xout[i].a, xin[i].a); in MPIU_MaxSum_Local()
195 xout[i].b += xin[i].b; in MPIU_MaxSum_Local()
199 PetscInt *xin = (PetscInt *)in, *xout = (PetscInt *)out; in MPIU_MaxSum_Local() local
203 xout[2 * i] = PetscMax(xout[2 * i], xin[2 * i]); in MPIU_MaxSum_Local()
204 xout[2 * i + 1] += xin[2 * i + 1]; in MPIU_MaxSum_Local()
276 PetscReal *xin = (PetscReal *)in, *xout = (PetscReal *)out; in PetscSum_Local() local
277 for (i = 0; i < count; i++) xout[i] += xin[i]; in PetscSum_Local()
281 PetscComplex *xin = (PetscComplex *)in, *xout = (PetscComplex *)out; in PetscSum_Local() local
282 for (i = 0; i < count; i++) xout[i] += xin[i]; in PetscSum_Local()
[all …]
|
| /petsc/src/ksp/ksp/tutorials/ ! |
| H A D | ex60.c | 37 PetscErrorCode PCApply_Noise(PC pc, Vec xin, Vec xout) in PCApply_Noise() argument
47 PetscCall(VecSetRandom(xout, ctx->random)); in PCApply_Noise()
49 PetscCall(VecNorm(xout, NORM_2, &nrmnoise)); in PCApply_Noise()
50 PetscCall(VecScale(xout, ctx->eta * (nrmin / nrmnoise))); in PCApply_Noise()
|
| /petsc/src/tao/bound/utils/ ! |
| H A D | isutil.c | 408 PetscScalar *xout; in TaoBoundSolution() local
437 PetscCall(VecGetArray(Xout, &xout)); in TaoBoundSolution()
441 xout[i] = xl[i]; in TaoBoundSolution()
444 xout[i] = xu[i]; in TaoBoundSolution()
452 PetscCall(VecRestoreArray(Xout, &xout)); in TaoBoundSolution()
|
| /petsc/src/ksp/ksp/tests/ ! |
| H A D | ex27.c | 127 PetscErrorCode PCShellApply_Matinv(PC pc, Vec xin, Vec xout) in PCShellApply_Matinv() argument
133 PetscCall(MatMult(X, xin, xout)); in PCShellApply_Matinv()
|
| /petsc/src/vec/vec/utils/ ! |
| H A D | comb.c | 76 struct PetscScalarInt *xout = (struct PetscScalarInt *)out; in PetscSplitReduction_Local() local
85 if (xin[i].i == PETSC_SR_REDUCE_SUM) xout[i].v += xin[i].v; in PetscSplitReduction_Local()
86 …else if (xin[i].i == PETSC_SR_REDUCE_MAX) xout[i].v = PetscMax(PetscRealPart(xout[i].v), PetscReal… in PetscSplitReduction_Local()
87 …else if (xin[i].i == PETSC_SR_REDUCE_MIN) xout[i].v = PetscMin(PetscRealPart(xout[i].v), PetscReal… in PetscSplitReduction_Local()
|
| /petsc/src/ksp/pc/impls/tfs/ ! |
| H A D | tfs.c | 61 static PetscErrorCode PCTFSLocalMult_TFS(PC pc, PetscScalar *xin, PetscScalar *xout) in PCTFSLocalMult_TFS() argument
68 PetscCall(VecPlaceArray(tfs->b, xout)); in PCTFSLocalMult_TFS()
|
| /petsc/src/ksp/pc/impls/shell/ ! |
| H A D | shellpc.c | 550 PetscErrorCode PCShellSetApply(PC pc, PetscErrorCode (*apply)(PC pc, Vec xin, Vec xout)) in PCShellSetApply() argument
608 PetscErrorCode PCShellSetApplySymmetricLeft(PC pc, PetscErrorCode (*apply)(PC pc, Vec xin, Vec xout… in PCShellSetApplySymmetricLeft() argument
637 …scErrorCode PCShellSetApplySymmetricRight(PC pc, PetscErrorCode (*apply)(PC pc, Vec xin, Vec xout)) in PCShellSetApplySymmetricRight() argument
668 …e PCShellSetApplyBA(PC pc, PetscErrorCode (*applyBA)(PC pc, PCSide side, Vec xin, Vec xout, Vec w)) in PCShellSetApplyBA() argument
697 …rorCode PCShellSetApplyTranspose(PC pc, PetscErrorCode (*applytranspose)(PC pc, Vec xin, Vec xout)) in PCShellSetApplyTranspose() argument
726 …e PCShellSetMatApplyTranspose(PC pc, PetscErrorCode (*matapplytranspose)(PC pc, Mat xin, Mat xout)) in PCShellSetMatApplyTranspose() argument
|
| /petsc/src/snes/impls/shell/ ! |
| H A D | snesshell.c | 25 PetscErrorCode SNESShellSetSolve(SNES snes, PetscErrorCode (*solve)(SNES snes, Vec xout)) in SNESShellSetSolve() argument
|
| /petsc/src/ts/interface/ftn-custom/ ! |
| H A D | ztsf.c | 150 static PetscErrorCode ourtransform(PetscCtx ctx, Vec x, Vec *xout) in ourtransform() argument
152 …allback((TS)ctx, _cb.transform, (void *, Vec *, Vec *, PetscErrorCode *), (_ctx, &x, xout, &ierr)); in ourtransform()
|
| /petsc/src/ksp/pc/impls/bjacobi/bjkokkos/ ! |
| H A D | bjkokkos.kokkos.cxx | 526 static PetscErrorCode PCApply_BJKOKKOS(PC pc, Vec bin, Vec xout) in PCApply_BJKOKKOS() argument
574 PetscCall(VecGetArrayAndMemType(xout, &glb_xdata, &mtype)); in PCApply_BJKOKKOS()
752 PetscCall(VecRestoreArrayAndMemType(xout, &glb_xdata)); in PCApply_BJKOKKOS()
757 PetscCall(VecCopy(xout, bvec)); in PCApply_BJKOKKOS()
758 PetscCall(VecScatterBegin(plex_batch, bvec, xout, INSERT_VALUES, SCATTER_REVERSE)); in PCApply_BJKOKKOS()
759 PetscCall(VecScatterEnd(plex_batch, bvec, xout, INSERT_VALUES, SCATTER_REVERSE)); in PCApply_BJKOKKOS()
|
| /petsc/src/mat/impls/h2opus/cuda/ ! |
| H A D | math2opus.cu | 1755 PetscScalar *xin, *xout; in MatH2OpusMapVec() local
1776 PetscCall(VecGetArrayWrite(*out, &xout)); in MatH2OpusMapVec()
1778 PetscCall(PetscSFReduceBegin(a->sf, MPIU_SCALAR, xin, xout, MPI_REPLACE)); in MatH2OpusMapVec()
1779 PetscCall(PetscSFReduceEnd(a->sf, MPIU_SCALAR, xin, xout, MPI_REPLACE)); in MatH2OpusMapVec()
1781 PetscCall(PetscSFBcastBegin(a->sf, MPIU_SCALAR, xin, xout, MPI_REPLACE)); in MatH2OpusMapVec()
1782 PetscCall(PetscSFBcastEnd(a->sf, MPIU_SCALAR, xin, xout, MPI_REPLACE)); in MatH2OpusMapVec()
1785 PetscCall(VecRestoreArrayWrite(*out, &xout)); in MatH2OpusMapVec()
|
| /petsc/src/dm/partitioner/impls/multistage/ ! |
| H A D | mspart.c | 41 PetscInt *xin = (PetscInt *)in, *xout = (PetscInt *)out; in PetscLCM_Local() local
48 for (PetscInt i = 0; i < count; i++) xout[i] = PetscLCM(xin[i], xout[i]); in PetscLCM_Local()
|
| /petsc/include/ ! |
| H A D | petscksp.h | 1093 PETSC_EXTERN_TYPEDEF typedef PetscErrorCode PCShellPSolveFn(PC pc, KSP ksp, Vec xim, Vec xout);
|