| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex61f.F90 | 15 subroutine split_indices(total, num_pieces, ibeg, iend) argument 20 integer :: ibeg(num_pieces), iend(num_pieces) local 28 iend(i) = ioffset + (itmp1 + 1) 29 ioffset = iend(i) 34 iend(i) = ibeg(i) - 1 36 iend(i) = ioffset + itmp1 37 ioffset = iend(i) 58 integer, dimension(MAXTHREADS) :: ibeg, iend variable 108 call split_indices(NCASES, nthreads, ibeg, iend) 180 do icase = ibeg(ith), iend(ith)
|
| /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/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()
|
| /petsc/src/mat/impls/aij/seq/aijperm/ |
| H A D | aijperm.c | 304 PetscInt istart, iend, isize; in MatMult_SeqAIJPERM() local 348 iend = istart + (NDIM - 1); in MatMult_SeqAIJPERM() 350 if (iend > jend) iend = jend; in MatMult_SeqAIJPERM() 352 isize = iend - istart + 1; in MatMult_SeqAIJPERM() 481 PetscInt istart, iend, isize; in MatMultAdd_SeqAIJPERM() local 535 iend = istart + (NDIM - 1); in MatMultAdd_SeqAIJPERM() 536 if (iend > jend) iend = jend; in MatMultAdd_SeqAIJPERM() 537 isize = iend - istart + 1; in MatMultAdd_SeqAIJPERM()
|
| /petsc/src/dm/impls/da/ |
| 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 953 iend = (bx == DM_BOUNDARY_PERIODIC) ? s : (PetscMin(s, m - i - 1)); in DMCreateMatrix_DA_3d_MPISELL() 965 for (ii = istart; ii < iend + 1; ii++) { in DMCreateMatrix_DA_3d_MPISELL() 995 iend = (bx == DM_BOUNDARY_PERIODIC) ? s : (PetscMin(s, m - i - 1)); 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 1309 iend = (bx == DM_BOUNDARY_PERIODIC) ? s : (PetscMin(s, m - i - 1)); in DMCreateMatrix_DA_3d_MPIAIJ() 1321 for (ii = istart; ii < iend + 1; ii++) { in DMCreateMatrix_DA_3d_MPIAIJ() 1352 iend = (bx == DM_BOUNDARY_PERIODIC) ? s : (PetscMin(s, m - i - 1)); in DMCreateMatrix_DA_3d_MPIAIJ() 1365 for (ii = istart; ii < iend + 1; ii++) { in DMCreateMatrix_DA_3d_MPIAIJ() [all …]
|
| /petsc/src/snes/tests/ |
| H A D | ex12f.F90 | 143 PetscInt ii, istart, iend 171 iend = n - 1 173 iend = n 175 do i = istart, iend - 1
|
| /petsc/src/tao/pde_constrained/tutorials/ |
| 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 …]
|
| 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 692 PetscCall(VecGetOwnershipRange(XX, &istart, &iend)); in EllipticInitialize() 693 for (linear_index = istart; linear_index < iend; linear_index++) { in EllipticInitialize() 798 PetscCall(MatGetOwnershipRange(user->Grad, &istart, &iend)); in EllipticInitialize() 800 for (i = istart; i < iend; i++) { in EllipticInitialize() 832 PetscCall(MatGetOwnershipRange(user->Av, &istart, &iend)); in EllipticInitialize() 834 for (i = istart; i < iend; i++) { in EllipticInitialize() 865 PetscCall(MatGetOwnershipRange(user->L, &istart, &iend)); in EllipticInitialize() 867 for (i = istart; i < iend; i++) { in EllipticInitialize() 905 PetscCall(MatGetOwnershipRange(user->Grad, &istart, &iend)); 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() 1085 PetscCall(MatGetOwnershipRange(user->Qblock, &istart, &iend)); in ParabolicInitialize() [all …]
|
| /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):
|
| /petsc/src/mat/impls/hypre/ |
| H A D | mhypre.c | 2013 HYPRE_Int jj, ibeg, iend, irow; local 2017 iend = i[irow + 1]; 2018 for (jj = ibeg; jj < iend; jj++)
|