| /petsc/src/mat/graphops/color/impls/minpack/ ! |
| H A D | degr.c | 11 PetscInt jcol, ic, ip, jp, ir; in MINPACKdegr() local 87 for (ip = ipntr[ir]; ip <= i__3; ++ip) { in MINPACKdegr() 88 ic = indcol[ip]; in MINPACKdegr()
|
| H A D | seq.c | 11 PetscInt jcol, j, ic, ip, jp, ir; in MINPACKseq() local 100 for (ip = ipntr[ir]; ip <= i__3; ++ip) { in MINPACKseq() 101 ic = indcol[ip]; in MINPACKseq()
|
| H A D | slo.c | 11 PetscInt jcol, ic, ip, jp, ir, mindeg, numdeg, numord; in MINPACKslo() local 164 for (ip = ipntr[ir]; ip <= i__2; ++ip) { in MINPACKslo() 165 ic = indcol[ip]; in MINPACKslo()
|
| H A D | ido.c | 13 PetscInt jcol = 0, ncomp = 0, ic, ip, jp, ir, maxinc, numinc, numord, maxlst, numwgt, numlst; in MINPACKido() local 189 for (ip = ipntr[ir]; ip <= i__2; ++ip) { in MINPACKido() 190 ic = indcol[ip]; in MINPACKido()
|
| /petsc/src/ksp/ksp/tutorials/ ! |
| H A D | ex61f.F90 | 79 integer :: i, j, ij, ij2, ii, jj, nz, ip, dx, dy, icase 182 do ip = 1, nz 183 ii = ilist(ip) 184 jj = jlist(ip) 185 aij = alist(ip) 203 do ip = 1, nz 204 i = ilist(ip) 205 j = jlist(ip) 206 aij = alist(ip)
|
| /petsc/src/ts/tests/ ! |
| H A D | ex3.c | 339 PetscInt i, j, jj, il, ip, ipp, ipq, iq, iquad, iqq; in femBg() local 369 ip = ipq; in femBg() 370 ipq = ip + 1; in femBg() 371 zip = z[ip]; in femBg() 378 nli[il][0] = ip; in femBg() 388 ip = nli[il][iq]; in femBg() 390 i = indx[ip]; in femBg() 419 PetscInt i, j, il, ip, ipp, ipq, iq, iquad, iqq; in femA() local 450 ip = ipq; in femA() 451 ipq = ip + 1; in femA() [all …]
|
| /petsc/src/mat/graphops/order/ ! |
| H A D | genqmd.c | 51 PetscInt ip, np, mindeg, search; in SPARSEPACKgenqmd() local 115 ip = perm[num]; in SPARSEPACKgenqmd() 116 perm[np] = ip; in SPARSEPACKgenqmd() 117 invp[ip] = np; in SPARSEPACKgenqmd()
|
| /petsc/src/dm/tests/ ! |
| H A D | ex30.c | 76 PetscInt row[2], col[9], im, ip; in main() local 81 ip = (i == n - 1) ? n + 1 : i + 1; in main() 86 col[2] = ip; in main() 110 col[2] = ip; in main() 118 col[3] = 2 * ip; in main() 119 col[4] = 2 * ip + 1; in main()
|
| /petsc/src/mat/impls/aij/seq/aijperm/ ! |
| H A D | aijperm.c | 307 …PetscInt ip[NDIM]; /* yp[] and ip[] are treated as vector "registers" for performing the mat-ve… in MatMult_SeqAIJPERM() local 360 ip[i] = ai[iold]; in MatMult_SeqAIJPERM() 379 ipos = ip[i]; in MatMult_SeqAIJPERM() 402 ipos = ip[i] + j; in MatMult_SeqAIJPERM() 416 vec_ipos = _mm256_loadu_si256((__m256i const *)&ip[i]); in MatMult_SeqAIJPERM() 425 ipos = ip[i] + j; in MatMult_SeqAIJPERM() 430 ipos = ip[i] + j; in MatMult_SeqAIJPERM() 484 PetscInt ip[NDIM]; in MatMultAdd_SeqAIJPERM() local 545 ip[i] = ai[iold]; in MatMultAdd_SeqAIJPERM() 562 ipos = ip[i] + j; in MatMultAdd_SeqAIJPERM() [all …]
|
| /petsc/src/vec/is/ao/impls/basic/ ! |
| H A D | aobasic.c | 158 PetscInt napp, *allpetsc, *allapp, ip, ia, N, i, *petsc = NULL, start; in AOCreate_Basic() local 225 ip = allpetsc[i]; in AOCreate_Basic() 228 …ip], PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Duplicate in PETSc ordering at position %" PetscI… in AOCreate_Basic() 229 aobasic->app[ip] = ia + 1; in AOCreate_Basic() 230 …MT ". Already mapped to %" PetscInt_FMT ", not %" PetscInt_FMT ".", i, aobasic->petsc[ia] - 1, ip); in AOCreate_Basic() 231 aobasic->petsc[ia] = ip + 1; in AOCreate_Basic()
|
| /petsc/src/sys/tests/ ! |
| H A D | ex8.c | 143 PetscInt ip = iperm[i]; in main() local 144 …T ", %g, \"%s\"}\n", rank, fromranks[ip], fromdata[ip].rank, (double)PetscRealPart(fromdata[ip].va… in main()
|
| /petsc/src/dm/impls/stag/tests/ ! |
| H A D | ex5.c | 25 PetscInt iu, ip; in main() local 46 PetscCall(DMStagGetLocationSlot(dmSol, ELEMENT, 0, &ip)); in main() 53 arrSol[e][ip] = PRESSURE_CONST; in main() 54 arrRHS[e][ip] = PRESSURE_CONST; in main()
|
| H A D | ex11.c | 21 PetscInt iux, iuy, ip; in main() local 50 PetscCall(DMStagGetLocationSlot(dmSol, DMSTAG_ELEMENT, 0, &ip)); in main() 58 arrSol[ey][ex][ip] = PRESSURE_CONST; in main() 59 arrRHS[ey][ex][ip] = PRESSURE_CONST; in main()
|
| H A D | ex8.c | 21 PetscInt iux, iuy, iuz, ip; in main() local 51 PetscCall(DMStagGetLocationSlot(dmSol, DMSTAG_ELEMENT, 0, &ip)); in main() 62 arrSol[ez][ey][ex][ip] = PRESSURE_CONST; in main() 63 arrRHS[ez][ey][ex][ip] = PRESSURE_CONST; in main()
|
| /petsc/src/mat/impls/aij/seq/bas/ ! |
| H A D | basfactor.c | 98 IS ip = b->row, iip = b->icol; in MatCholeskyFactorNumeric_SeqAIJ_Bas() local 119 PetscCall(ISGetIndices(ip, &rip)); in MatCholeskyFactorNumeric_SeqAIJ_Bas() 138 PetscCall(ISRestoreIndices(ip, &rip)); in MatCholeskyFactorNumeric_SeqAIJ_Bas() 151 PetscCall(ISIdentity(ip, &perm_identity)); in MatCholeskyFactorNumeric_SeqAIJ_Bas()
|
| H A D | spbas.c | 632 PetscInt i, j, ip; in spbas_apply_reordering_rows() local 647 ip = permutation[i]; in spbas_apply_reordering_rows() 648 if (do_values) vals[i] = matrix_A->values[ip]; in spbas_apply_reordering_rows() 649 icols[i] = matrix_A->icols[ip]; in spbas_apply_reordering_rows() 650 row_nnz[i] = matrix_A->row_nnz[ip]; in spbas_apply_reordering_rows() 651 for (j = 0; j < row_nnz[i]; j++) icols[i][j] += ip - i; in spbas_apply_reordering_rows()
|
| /petsc/src/mat/impls/aij/seq/lusol/ ! |
| H A D | lusol.c | 47 int *ip; member 170 PetscCall(PetscFree(lusol->ip)); in MatDestroy_LUSOL() 206 …usol->luparm, lusol->parmlu, lusol->data, lusol->indc, lusol->indr, lusol->ip, lusol->iq, lusol->l… in MatSolve_LUSOL() 271 …usol->luparm, lusol->parmlu, lusol->data, lusol->indc, lusol->indr, lusol->ip, lusol->iq, lusol->l… in MatLUFactorNumeric_LUSOL() 351 PetscCall(PetscMalloc(sizeof(int) * n, &lusol->ip)); in MatLUFactorSymbolic_LUSOL()
|
| /petsc/src/mat/tests/ ! |
| H A D | ex77.c | 14 IS ip, isrow, iscol; in main() local 226 ip = isrow; in main() 232 PetscCall(ISGetIndices(ip, &ip_ptr)); in main() 240 PetscCall(ISRestoreIndices(ip, &ip_ptr)); in main() 244 PetscCall(MatReorderingSeqSBAIJ(sA, ip)); in main()
|
| /petsc/src/vec/is/ao/impls/memscalable/ ! |
| H A D | aomemscalable.c | 279 PetscInt n = napp, ip, ia; in AOCreateMemoryScalable_private() local 334 ip = from_array[i]; in AOCreateMemoryScalable_private() 336 sindices[start[j]++] = ip; in AOCreateMemoryScalable_private() 339 ip = from_array[i] - owners[rank]; in AOCreateMemoryScalable_private() 341 aomap_loc[ip] = ia; in AOCreateMemoryScalable_private() 370 ip = rbuf[i] - owners[rank]; /* local index */ in AOCreateMemoryScalable_private() 372 aomap_loc[ip] = ia; in AOCreateMemoryScalable_private()
|
| /petsc/src/snes/tutorials/ ! |
| H A D | ex55k.kokkos.cxx | 203 PetscInt *coo_i, *coo_j, *ip, *jp; in FormJacobianLocalVec() local 206 ip = coo_i; in FormJacobianLocalVec() 244 for (PetscInt k = 0; k < 5; k++) ip[k] = jp[2]; in FormJacobianLocalVec() 245 ip += 5; in FormJacobianLocalVec()
|
| /petsc/src/dm/impls/stag/tutorials/ ! |
| H A D | ex1.c | 92 PetscInt iu, ip, ixu, ixp; in main() local 141 PetscCall(DMStagGetLocationSlot(dmSol, ELEMENT, 0, &ip)); in main() 151 arrSol[e][ip] = b - a - (c / 2.0) + c * coordp; in main()
|
| /petsc/src/mat/impls/sbaij/seq/cholmod/ ! |
| H A D | sbaijcholmod.c | 458 const PetscInt *ip; in MatCholeskyFactorSymbolic_CHOLMOD() local 459 PetscCall(ISGetIndices(perm, &ip)); in MatCholeskyFactorSymbolic_CHOLMOD() 460 chol->factor = cholmod_X_analyze_p(&cholA, (PetscInt *)ip, fset, fsize, chol->common); in MatCholeskyFactorSymbolic_CHOLMOD() 462 PetscCall(ISRestoreIndices(perm, &ip)); in MatCholeskyFactorSymbolic_CHOLMOD()
|
| /petsc/src/snes/tutorials/network/power/ ! |
| H A D | power.h | 60 PetscScalar ip; /* Active power component of constant current load: MW pu V */ member
|
| /petsc/src/ts/tutorials/advection-diffusion-reaction/ ! |
| H A D | shashi.F90 | 205 PetscInt i, ip 299 do ip = 1, 26 300 part_p(ip) = (an_r(ip)/an_t)*pt
|
| /petsc/src/mat/impls/aij/seq/kokkos/ ! |
| H A D | aijkok.kokkos.cxx | 1986 const PetscInt *ip; in MatLUFactorNumeric_SeqAIJKokkos() local 1988 PetscCall(ISGetIndices(rowperm, &ip)); in MatLUFactorNumeric_SeqAIJKokkos() 1990 …allCXX(Kokkos::deep_copy(factors->rowperm, PetscIntKokkosViewHost(const_cast<PetscInt *>(ip), m))); in MatLUFactorNumeric_SeqAIJKokkos() 1991 PetscCall(ISRestoreIndices(rowperm, &ip)); in MatLUFactorNumeric_SeqAIJKokkos() 1999 const PetscInt *ip; in MatLUFactorNumeric_SeqAIJKokkos() local 2001 PetscCall(ISGetIndices(colperm, &ip)); in MatLUFactorNumeric_SeqAIJKokkos() 2003 …allCXX(Kokkos::deep_copy(factors->colperm, PetscIntKokkosViewHost(const_cast<PetscInt *>(ip), n))); in MatLUFactorNumeric_SeqAIJKokkos() 2004 PetscCall(ISRestoreIndices(colperm, &ip)); in MatLUFactorNumeric_SeqAIJKokkos() 2215 const PetscInt *ip; in MatCholeskyFactorNumeric_SeqAIJKokkos() local 2217 PetscCall(ISGetIndices(rowperm, &ip)); in MatCholeskyFactorNumeric_SeqAIJKokkos() [all …]
|