| /petsc/src/sys/utils/ |
| H A D | sortd.c | 124 PetscInt itmp; in PetscSortRealWithArrayInt_Private() local
130 if (v[0] > v[1]) SWAP2ri(v[0], v[1], V[0], V[1], rtmp, itmp); in PetscSortRealWithArrayInt_Private()
134 SWAP2ri(v[0], v[right / 2], V[0], V[right / 2], rtmp, itmp); in PetscSortRealWithArrayInt_Private()
140 SWAP2ri(v[last], v[i], V[last], V[i], rtmp, itmp); in PetscSortRealWithArrayInt_Private()
143 SWAP2ri(v[0], v[last], V[0], V[last], rtmp, itmp); in PetscSortRealWithArrayInt_Private()
166 PetscInt itmp; in PetscSortRealWithArrayInt() local
177 SWAP2ri(r[k], r[j], Ii[k], Ii[j], rtmp, itmp); in PetscSortRealWithArrayInt()
281 PetscInt i, mid, last, itmp, j, first; in PetscSortSplit() local
301 itmp = idx[mid]; in PetscSortSplit()
305 idx[j] = itmp; in PetscSortSplit()
[all …]
|
| /petsc/src/mat/impls/sbaij/seq/ |
| H A D | aijsbaij.c | 10 …i, *aj = a->j, m = A->rmap->N, n = A->cmap->n, i, j, k, *bi, *bj, *rowlengths, nz, *rowstart, itmp; in MatConvert_SeqSBAIJ_SeqAIJ() local
74 itmp = i * bs + j; in MatConvert_SeqSBAIJ_SeqAIJ()
76 *(bj + rowstart[itmp]) = (*aj) * bs + k; in MatConvert_SeqSBAIJ_SeqAIJ()
77 *(bv + rowstart[itmp]) = *(av + k * bs + j); in MatConvert_SeqSBAIJ_SeqAIJ()
78 rowstart[itmp]++; in MatConvert_SeqSBAIJ_SeqAIJ()
88 itmp = (*aj) * bs + j; in MatConvert_SeqSBAIJ_SeqAIJ()
90 *(bj + rowstart[itmp]) = i * bs + k; in MatConvert_SeqSBAIJ_SeqAIJ()
91 *(bv + rowstart[itmp]) = aconj ? PetscConj(*(av + j * bs + k)) : *(av + j * bs + k); in MatConvert_SeqSBAIJ_SeqAIJ()
92 rowstart[itmp]++; in MatConvert_SeqSBAIJ_SeqAIJ()
97 itmp = i * bs + j; in MatConvert_SeqSBAIJ_SeqAIJ()
[all …]
|
| /petsc/src/ts/impls/implicit/sundials/ |
| H A D | sundials.c | 417 long int nsteps, its, nfevals, nlinsetups, nfails, itmp; in TSView_Sundials() local
462 PetscCallExternal(CVSpilsGetNumConvFails, cvode->mem, &itmp); in TSView_Sundials()
463 …tscCall(PetscViewerASCIIPrintf(viewer, "SUNDIALS no. of linear convergence failures %ld\n", itmp)); in TSView_Sundials()
467 PetscCallExternal(CVSpilsGetNumPrecEvals, cvode->mem, &itmp); in TSView_Sundials()
468 …etscCall(PetscViewerASCIIPrintf(viewer, "SUNDIALS no. of preconditioner evaluations %ld\n", itmp)); in TSView_Sundials()
469 PetscCallExternal(CVSpilsGetNumPrecSolves, cvode->mem, &itmp); in TSView_Sundials()
470 … PetscCall(PetscViewerASCIIPrintf(viewer, "SUNDIALS no. of preconditioner solves %ld\n", itmp)); in TSView_Sundials()
472 PetscCallExternal(CVSpilsGetNumJtimesEvals, cvode->mem, &itmp); in TSView_Sundials()
473 …PetscViewerASCIIPrintf(viewer, "SUNDIALS no. of Jacobian-vector product evaluations %ld\n", itmp)); in TSView_Sundials()
474 PetscCallExternal(CVSpilsGetNumRhsEvals, cvode->mem, &itmp); in TSView_Sundials()
[all …]
|
| /petsc/src/ts/tutorials/ |
| H A D | ex1f.F90 | 199 PetscInt its, N, i1000, itmp
220 itmp = 4
221 PetscCallA(PetscOptionsGetInt(PETSC_NULL_OPTIONS, PETSC_NULL_CHARACTER, '-my', itmp, flg, ierr))
222 user(lmy) = itmp
|
| /petsc/src/ksp/pc/impls/factor/ilu/ |
| H A D | ilu.c | 43 PetscInt itmp; in PCSetFromOptions_ILU() local
52 …", "levels of fill", "PCFactorSetLevels", (PetscInt)((PC_Factor *)ilu)->info.levels, &itmp, &flg)); in PCSetFromOptions_ILU()
53 if (flg) ((PC_Factor *)ilu)->info.levels = itmp; in PCSetFromOptions_ILU()
|
| /petsc/src/mat/graphops/partition/impls/pmetis/ |
| H A D | pmetis.c | 69 …PetscInt itmp = 0, wgtflag = 0, numflag = 0, ncon = part->ncon, nparts = part->n, options[24], … in MatPartitioningApply_Parmetis_Private() local
99 itmp = pmetis->printout; in MatPartitioningApply_Parmetis_Private()
167 if (PetscLogPrintInfo) pmetis->printout = itmp; in MatPartitioningApply_Parmetis_Private()
|
| /petsc/src/mat/impls/baij/seq/ |
| H A D | baij.c | 1586 PetscInt itmp, i, j, k, M, bn, bp, *idx_i, bs, bs2; in MatGetRow_SeqBAIJ_private() local
1618 itmp = bs * aj[ai[bn] + i]; in MatGetRow_SeqBAIJ_private()
1619 for (j = 0; j < bs; j++) idx_i[j] = itmp++; in MatGetRow_SeqBAIJ_private()
|