| /petsc/src/vec/vec/tests/ |
| H A D | ex36.c | 14 PetscInt i, istart, iend, n = 6, m, *indices; in main() local 35 PetscCall(VecGetOwnershipRange(x, &istart, &iend)); in main() 36 m = iend - istart; in main() 41 for (i = istart; i < iend; i++) { in main() 42 values[i - istart] = (rank + 1) * i * 2; in main() 43 if (set_values_negidx) indices[i - istart] = (-1 + 2 * (i % 2)) * i; in main() 44 else indices[i - istart] = i; in main() 66 if (get_values_negidx) indices[i] = (-1 + 2 * ((istart + i) % 2)) * (istart + i); in main() 67 else indices[i] = istart + i; in main()
|
| /petsc/src/ksp/pc/impls/wb/ |
| H A D | wb.c | 19 …, p, dof, Nint, Nface, Nwire, Nsurf, *Iint, *Isurf, cint = 0, csurf = 0, istart, jstart, kstart, *… in DMDAGetWireBasketInterpolation() local 39 PetscCall(DMDAGetGhostCorners(da, &istart, &jstart, &kstart, &mwidth, &nwidth, &pwidth)); in DMDAGetWireBasketInterpolation() 40 istart = istart ? -1 : 0; in DMDAGetWireBasketInterpolation() 57 N = (m - istart) * (n - jstart) * (p - kstart); in DMDAGetWireBasketInterpolation() 58 Nint = (m - 2 - istart) * (n - 2 - jstart) * (p - 2 - kstart); in DMDAGetWireBasketInterpolation() 59 …Nface = 2 * ((m - 2 - istart) * (n - 2 - jstart) + (m - 2 - istart) * (p - 2 - kstart) + (n - 2 - … in DMDAGetWireBasketInterpolation() 60 Nwire = 4 * ((m - 2 - istart) + (n - 2 - jstart) + (p - 2 - kstart)) + 8; in DMDAGetWireBasketInterpolation() 70 …PetscCheck(m - istart >= 3, PETSC_COMM_SELF, PETSC_ERR_SUP, "Number of grid points per process in … in DMDAGetWireBasketInterpolation() 77 for (i = 1; i < m - istart - 1; i++) xsurf[cnt++ + Nsurf] = 1; in DMDAGetWireBasketInterpolation() 82 for (i = 1; i < m - istart - 1; i++) xsurf[cnt++ + 4 * Nsurf] = 1; in DMDAGetWireBasketInterpolation() [all …]
|
| /petsc/src/mat/impls/aij/seq/aijperm/ |
| H A D | aijperm.c | 169 PetscInt i, ngroup, istart, ipos; in MatSeqAIJPERM_create_perm() local 222 istart = 0; in MatSeqAIJPERM_create_perm() 226 aijperm->xgroup[ngroup] = istart; in MatSeqAIJPERM_create_perm() 228 istart += rows_in_bucket[i]; in MatSeqAIJPERM_create_perm() 232 aijperm->xgroup[ngroup] = istart; in MatSeqAIJPERM_create_perm() 304 PetscInt istart, iend, isize; in MatMult_SeqAIJPERM() local 345 for (istart = jstart; istart <= jend; istart += NDIM) { in MatMult_SeqAIJPERM() 348 iend = istart + (NDIM - 1); in MatMult_SeqAIJPERM() 352 isize = iend - istart + 1; in MatMult_SeqAIJPERM() 358 iold = iperm[istart + i]; in MatMult_SeqAIJPERM() [all …]
|
| /petsc/src/mat/tests/ |
| H A D | ex241f.F90 | 12 PetscInt :: istart, iend, row, i1, i0 33 PetscCallA(MatGetOwnershipRange(L, istart, iend, ierr)) 36 do row = istart, iend - 1 51 do row = istart, iend - 1
|
| H A D | ex195.c | 17 PetscInt m, M, n, istart, iend, ii, i, J, j, K = 10; in main() local 35 PetscCall(MatGetOwnershipRange(A1, &istart, &iend)); in main() 36 for (ii = istart; ii < iend; ii++) { in main()
|
| /petsc/src/vec/vec/tutorials/ |
| H A D | ex3f.F90 | 18 PetscInt :: i, istart, iend 39 PetscCallA(VecGetOwnershipRange(x, istart, iend, ierr)) 44 do i = istart, iend - 1
|
| H A D | ex3.c | 14 PetscInt i, istart, iend, n = 6, nlocal; in main() local 41 PetscCall(VecGetOwnershipRange(x, &istart, &iend)); in main()
|
| /petsc/src/mat/impls/aij/seq/bas/ |
| H A D | spbas.c | 183 PetscInt istart, i1end, i2end; /* start of newly sorted array part, end of both parts */ in spbas_mergesort_icols() local 206 for (istart = 0; istart < nrows; istart += 2 * istep) { in spbas_mergesort_icols() 208 i1 = istart; in spbas_mergesort_icols() 211 i2 = istart + istep; in spbas_mergesort_icols() 216 for (i = istart; i < i2end; i++) { in spbas_mergesort_icols() 530 PetscInt istart, i1end, i2end; /* start of newly sorted array part, end of both parts */ in spbas_mergesort() local 562 for (istart = 0; istart < nnz; istart += 2 * istep) { in spbas_mergesort() 564 i1 = istart; in spbas_mergesort() 567 i2 = istart + istep; in spbas_mergesort() 573 for (i = istart; i < i2end; i++) { in spbas_mergesort() [all …]
|
| /petsc/src/dm/impls/da/ |
| H A D | gr1.c | 34 PetscInt i, j, k, M, N, P, istart, isize, jstart, jsize, kstart, ksize, dim, cnt; in DMDASetUniformCoordinates() local 44 PetscCall(DMDAGetCorners(da, &istart, &jstart, &kstart, &isize, &jsize, &ksize)); in DMDASetUniformCoordinates() 51 for (i = 0; i < isize; i++) coors[i] = xmin + hx * (i + istart); in DMDASetUniformCoordinates() 62 coors[cnt++] = xmin + hx * (i + istart); in DMDASetUniformCoordinates() 79 coors[cnt++] = xmin + hx * (i + istart); in DMDASetUniformCoordinates() 148 PetscInt i, n, N, dof, istart, isize, j, nbounds; in VecView_MPI_Draw_DA1d() local 181 PetscCall(DMDAGetCorners(da, &istart, NULL, NULL, &isize, NULL, NULL)); in VecView_MPI_Draw_DA1d()
|
| H A D | fdda.c | 927 …PetscInt istart, iend, jstart, jend, kstart, kend, zs, nz, gzs, gnz, ii, jj, kk, M, … in DMCreateMatrix_DA_3d_MPISELL() local 952 istart = (bx == DM_BOUNDARY_PERIODIC) ? -s : (PetscMax(-s, -i)); in DMCreateMatrix_DA_3d_MPISELL() 965 for (ii = istart; ii < iend + 1; ii++) { in DMCreateMatrix_DA_3d_MPISELL() 994 istart = (bx == DM_BOUNDARY_PERIODIC) ? -s : (PetscMax(-s, -i)); in DMCreateMatrix_DA_3d_MPISELL() 1007 for (ii = istart; ii < iend + 1; ii++) { in DMCreateMatrix_DA_3d_MPISELL() 1273 …PetscInt istart, iend, jstart, jend, kstart, kend, zs, nz, gzs, gnz, ii, jj, kk, M, … in DMCreateMatrix_DA_3d_MPIAIJ() local 1308 istart = (bx == DM_BOUNDARY_PERIODIC) ? -s : (PetscMax(-s, -i)); in DMCreateMatrix_DA_3d_MPIAIJ() 1321 for (ii = istart; ii < iend + 1; ii++) { in DMCreateMatrix_DA_3d_MPIAIJ() 1351 istart = (bx == DM_BOUNDARY_PERIODIC) ? -s : (PetscMax(-s, -i)); in DMCreateMatrix_DA_3d_MPIAIJ() 1365 for (ii = istart; ii < iend + 1; ii++) { in DMCreateMatrix_DA_3d_MPIAIJ() [all …]
|
| /petsc/src/tao/pde_constrained/tutorials/ |
| H A D | elliptic.c | 539 PetscInt m, n, i, j, k, l, linear_index, is, js, ks, ls, istart, iend, iblock; in EllipticInitialize() local 623 istart = 0; in EllipticInitialize() 626 PetscCall(ISCreateStride(PETSC_COMM_SELF, hi - lo, lo2 + istart, 1, &is_from_y)); in EllipticInitialize() 628 istart = istart + hi - lo; in EllipticInitialize() 646 istart = 0; in EllipticInitialize() 649 PetscCall(ISCreateStride(PETSC_COMM_SELF, hi - lo, lo2 + istart, 1, &is_from_d)); in EllipticInitialize() 651 istart = istart + hi - lo; in EllipticInitialize() 692 PetscCall(VecGetOwnershipRange(XX, &istart, &iend)); in EllipticInitialize() 693 for (linear_index = istart; linear_index < iend; linear_index++) { in EllipticInitialize() 715 istart = 0; in EllipticInitialize() [all …]
|
| H A D | parabolic.c | 658 PetscInt m, n, i, j, k, linear_index, istart, iend, iblock, lo, hi, lo2, hi2; in ParabolicInitialize() local 719 PetscCall(VecGetOwnershipRange(XX, &istart, &iend)); in ParabolicInitialize() 720 for (linear_index = istart; linear_index < iend; linear_index++) { in ParabolicInitialize() 784 PetscCall(MatGetOwnershipRange(user->Grad, &istart, &iend)); in ParabolicInitialize() 786 for (i = istart; i < iend; i++) { in ParabolicInitialize() 818 PetscCall(MatGetOwnershipRange(user->Av, &istart, &iend)); in ParabolicInitialize() 820 for (i = istart; i < iend; i++) { in ParabolicInitialize() 854 PetscCall(MatGetOwnershipRange(user->L, &istart, &iend)); in ParabolicInitialize() 856 for (i = istart; i < iend; i++) { in ParabolicInitialize() 973 istart = 0; in ParabolicInitialize() [all …]
|
| H A D | hyperbolic.c | 675 PetscInt n, i, j, linear_index, istart, iend, iblock, lo, hi; in HyperbolicInitialize() local 703 PetscCall(MatGetOwnershipRange(user->Grad, &istart, &iend)); in HyperbolicInitialize() 705 for (i = istart; i < iend; i++) { in HyperbolicInitialize() 729 PetscCall(MatGetOwnershipRange(user->Gradxy[0], &istart, &iend)); in HyperbolicInitialize() 731 for (i = istart; i < iend; i++) { in HyperbolicInitialize() 747 PetscCall(MatGetOwnershipRange(user->Gradxy[1], &istart, &iend)); in HyperbolicInitialize() 749 for (i = istart; i < iend; i++) { in HyperbolicInitialize() 770 PetscCall(MatGetOwnershipRange(user->M, &istart, &iend)); in HyperbolicInitialize() 772 for (i = istart; i < iend; i++) { in HyperbolicInitialize() 803 PetscCall(VecGetOwnershipRange(XX, &istart, &iend)); in HyperbolicInitialize() [all …]
|
| /petsc/src/snes/tests/ |
| H A D | ex12f.F90 | 143 PetscInt ii, istart, iend 163 istart = 1 165 istart = 0 175 do i = istart, iend - 1
|
| /petsc/src/ml/regressor/impls/linear/ |
| H A D | linear.c | 456 PetscInt m, N, istart, i, kspits; in PetscRegressorFit_Linear() local 488 PetscCall(VecGetOwnershipRange(column_means, &istart, NULL)); in PetscRegressorFit_Linear() 490 for (i = 0; i < m; i++) column_means_local[i] = column_means_global[istart + i]; in PetscRegressorFit_Linear()
|
| /petsc/include/petsc/private/ |
| H A D | kspimpl.h | 266 PetscInt n, istart; in KSPSetNoisy_Private() local 271 PetscCall(VecGetOwnershipRange(v, &istart, NULL)); in KSPSetNoisy_Private() 274 for (PetscInt i = 0; i < n; ++i) a[i] = KSPNoisyHash_Private(i + istart); in KSPSetNoisy_Private()
|
| /petsc/src/ksp/pc/tests/ |
| H A D | ex8f.F90 | 40 PetscInt n, dim, istart, iend
|
| /petsc/src/binding/petsc4py/test/ |
| H A D | test_dmda.py | 297 istart, iend, jstart, jend = da.getRanges() 300 for i in range(istart, iend):
|