Searched refs:ibeg (Results 1 – 2 of 2) sorted by relevance
| /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
27 ibeg(i) = ioffset + 1
32 ibeg(i) = ioffset + 1
33 if (ibeg(i) > total) then
34 iend(i) = ibeg(i) - 1
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/impls/hypre/ |
| H A D | mhypre.c | 2013 HYPRE_Int jj, ibeg, iend, irow; local
2016 ibeg = i[irow];
2018 for (jj = ibeg; jj < iend; jj++)
|