| /petsc/src/sys/utils/ |
| H A D | sortso.c | 810 PetscInt ri = runstart; in PetscTimSortBuildRun_Private() local
818 if ((*cmp)((arr) + (ri + 1) * size, (arr) + ri * size, ctx) < 0) { in PetscTimSortBuildRun_Private()
819 ++ri; in PetscTimSortBuildRun_Private()
820 while (ri < n - 1) { in PetscTimSortBuildRun_Private()
821 if ((*cmp)((arr) + (ri + 1) * size, (arr) + ri * size, ctx) >= 0) break; in PetscTimSortBuildRun_Private()
822 ++ri; in PetscTimSortBuildRun_Private()
825 PetscInt lo = runstart, hi = ri; in PetscTimSortBuildRun_Private()
829 ++ri; in PetscTimSortBuildRun_Private()
830 while (ri < n - 1) { in PetscTimSortBuildRun_Private()
831 if ((*cmp)((arr) + (ri + 1) * size, (arr) + ri * size, ctx) < 0) break; in PetscTimSortBuildRun_Private()
[all …]
|
| /petsc/src/ksp/pc/impls/mg/ |
| H A D | gdsw.c | 265 const PetscInt *ri, *rg; in PCMGGDSWCreateCoarseSpace_Private() local
270 PetscCall(ISGetIndices(sI[i], &ri)); in PCMGGDSWCreateCoarseSpace_Private()
273 PetscCall(MatSetValues(preallocator, nri, ri, ncg, cidx + c, NULL, INSERT_VALUES)); in PCMGGDSWCreateCoarseSpace_Private()
275 PetscCall(ISRestoreIndices(sI[i], &ri)); in PCMGGDSWCreateCoarseSpace_Private()
305 const PetscInt *ri, *rg; in PCMGGDSWCreateCoarseSpace_Private() local
315 PetscCall(ISGetIndices(sI[i], &ri)); in PCMGGDSWCreateCoarseSpace_Private()
320 PetscCall(MatSetValues(*cspace, nri, ri, ncg, cidx + c, v, INSERT_VALUES)); in PCMGGDSWCreateCoarseSpace_Private()
325 PetscCall(ISRestoreIndices(sI[i], &ri)); in PCMGGDSWCreateCoarseSpace_Private()
|
| /petsc/src/mat/tests/ |
| H A D | ex23.c | 305 …PetscInt ri, ci, rr[3] = {0, 1, 0}, cr[4] = {1, 2, 0, 1}, rk[3] = {0, 2, 1}, ck[4] =… in main() local
308 for (ri = 0; ri < 2; ri++) { in main()
311 r = (PetscInt *)(ri == 0 ? rr : rk); in main()
324 …e (%" PetscInt_FMT " %" PetscInt_FMT ", bs %" PetscInt_FMT " %" PetscInt_FMT ")", ri, ci, rb, cb)); in main()
|
| /petsc/src/ts/tutorials/ |
| H A D | ex11.h | 588 static PetscScalar s, c0, p0, r0, u0, w0, x0, x2, ri, cx, sgn0, wsp0, gasc1, gasc2, gasc3, gasc4; in riemannsolver() local
644 ri = u0 - sgn0 * 2. * gasc4 * c0; in riemannsolver()
645 cx = sgn0 * .5 * gasc1 / gasc2 * ((*xp - *xcen) / *dtt - ri); in riemannsolver()
646 *uxm = ri + sgn0 * 2. * gasc4 * cx; in riemannsolver()
|
| /petsc/doc/tutorials/ |
| H A D | in_person.md | 40 - PETSc Tutorial/Implicit Solvers, [PRACE Summer School](http://events.prace-ri.eu/conferenceDispla…
|
| /petsc/src/dm/impls/plex/ |
| H A D | plexgeometry.c | 4047 const PetscReal ri = PetscRealPart(constants[0]); in coordMap_annulus() local
4050 xp[0] = (x[0] * (ro - ri) + ri) * PetscCosReal(0.5 * PETSC_PI * x[1]); in coordMap_annulus()
4051 xp[1] = (x[0] * (ro - ri) + ri) * PetscSinReal(0.5 * PETSC_PI * x[1]); in coordMap_annulus()
4064 const PetscReal ri = PetscRealPart(constants[0]); in coordMap_shell() local
4066 const PetscReal rp = (x[2] + 1) * 0.5 * (ro - ri) + ri; in coordMap_shell()
|
| /petsc/src/mat/impls/sbaij/seq/ |
| H A D | sbaij2.c | 1445 const PetscScalar *l, *li, *ri; in MatDiagonalScale_SeqSBAIJ() local
1468 ri = l + bs * aj[ai[i] + j]; in MatDiagonalScale_SeqSBAIJ()
1470 x = ri[k]; in MatDiagonalScale_SeqSBAIJ()
|
| /petsc/src/mat/impls/baij/seq/ |
| H A D | baij2.c | 3259 const PetscScalar *l, *r, *li, *ri; in MatDiagonalScale_SeqBAIJ() local
3299 ri = r + bs * aj[iai + j]; in MatDiagonalScale_SeqBAIJ()
3301 x = ri[k]; in MatDiagonalScale_SeqBAIJ()
|