| /petsc/src/dm/impls/da/ |
| H A D | dageometry.c | 163 PetscInt mi[2]; in private_DMDALocatePointsIS_2D_Regular() local
175 for (PetscInt d = 0; d < 2; d++) mi[d] = (PetscInt)((coor_p[d] - gmin[d]) / dx[d]); in private_DMDALocatePointsIS_2D_Regular()
177 if (mi[0] < xs) continue; in private_DMDALocatePointsIS_2D_Regular()
178 if (mi[0] > (xe - 1)) continue; in private_DMDALocatePointsIS_2D_Regular()
179 if (mi[1] < ys) continue; in private_DMDALocatePointsIS_2D_Regular()
180 if (mi[1] > (ye - 1)) continue; in private_DMDALocatePointsIS_2D_Regular()
182 if (mi[0] == (xe - 1)) mi[0]--; in private_DMDALocatePointsIS_2D_Regular()
183 if (mi[1] == (ye - 1)) mi[1]--; in private_DMDALocatePointsIS_2D_Regular()
185 cellidx[p] = (mi[0] - xs) + (mi[1] - ys) * mxlocal; in private_DMDALocatePointsIS_2D_Regular()
230 PetscInt mi[3]; in private_DMDALocatePointsIS_3D_Regular() local
[all …]
|
| /petsc/src/tao/constrained/tutorials/ |
| H A D | maros.c | 33 PetscInt mi; /* number of inequality constraints */ member
175 user->mi = user->n; in InitializeProblem()
179 PetscCall(MatSetSizes(user->Ain, PETSC_DECIDE, PETSC_DECIDE, user->mi, user->mi)); in InitializeProblem()
184 …for (i = 0; i < user->mi; i++) PetscCall(MatSetValues(user->Ain, 1, &i, 1, &i, &one, INSERT_VALUES… in InitializeProblem()
192 PetscCall(VecSetSizes(user->bin, PETSC_DECIDE, user->mi)); in InitializeProblem()
195 user->m = user->me + user->mi; in InitializeProblem()
|
| /petsc/src/dm/tutorials/ |
| H A D | swarm_ex3.c | 37 PetscInt mi, mj; in _DMLocatePoints_DMDARegular_IS() local
42 mi = (PetscInt)((coorx - (-1.0)) / dx); in _DMLocatePoints_DMDARegular_IS()
48 if ((mi >= si) && (mi < si + milocal)) cellidx[p] = (mi - si) + (mj - sj) * milocal; in _DMLocatePoints_DMDARegular_IS()
|
| /petsc/src/tao/constrained/impls/ipm/ |
| H A D | ipm.c | 196 ipmP->nb = ipmP->mi = ipmP->me = 0; in TaoSetup_IPM()
239 ipmP->mi = 0; in IPMInitializeBounds()
263 PetscCall(VecGetSize(tao->constraints_inequality, &ipmP->mi)); in IPMInitializeBounds()
265 ipmP->mi = 0; in IPMInitializeBounds()
267 ipmP->nb = ipmP->nxlb + ipmP->nxub + ipmP->mi; in IPMInitializeBounds()
301 PetscCall(PetscMalloc1(ipmP->mi, &ucind)); in IPMInitializeBounds()
304 if (ipmP->mi > 0) { in IPMInitializeBounds()
321 xl_offset = ipmP->mi; in IPMInitializeBounds()
348 xu_offset = ipmP->mi + ipmP->nxlb; in IPMInitializeBounds()
627 if (ipmP->mi > 0) { in IPMEvaluate()
[all …]
|
| H A D | ipm.h | 9 PetscInt mi, me, n, nxb, nib, nb, nslack; member
|
| /petsc/src/ksp/ksp/impls/fcg/pipefcg/ |
| H A D | pipefcg.c | 82 PetscInt i, j, k, idx, kdx, mi; in KSPSolve_PIPEFCG_cycle() local
197 mi = pipefcg->mmax; in KSPSolve_PIPEFCG_cycle()
200 mi = ((i - 1) % pipefcg->mmax) + 1; in KSPSolve_PIPEFCG_cycle()
208 for (k = PetscMax(0, i - mi), j = 0; k < i; ++j, ++k) { in KSPSolve_PIPEFCG_cycle()
230 for (k = PetscMax(0, i - mi), j = 0; k < i; ++j, ++k) { in KSPSolve_PIPEFCG_cycle()
|
| /petsc/src/ksp/ksp/impls/fcg/ |
| H A D | fcg.c | 74 PetscInt i, k, idx, mi; in KSPSolve_FCG() local
159 mi = fcg->mmax; in KSPSolve_FCG()
162 mi = ((i - 1) % fcg->mmax) + 1; in KSPSolve_FCG()
174 l = PetscMax(0, i - mi); in KSPSolve_FCG()
|
| /petsc/src/ksp/ksp/impls/gcr/pipegcr/ |
| H A D | pipegcr.c | 61 PetscInt i, j, k, idx, kdx, mi; in KSPSolve_PIPEGCR_cycle() local
146 mi = pipegcr->mmax; in KSPSolve_PIPEGCR_cycle()
149 mi = ((i - 1) % pipegcr->mmax) + 1; in KSPSolve_PIPEGCR_cycle()
156 for (k = PetscMax(0, i - mi), j = 0; k < i; j++, k++) { in KSPSolve_PIPEGCR_cycle()
215 for (k = PetscMax(0, i - mi), j = 0; k < i; j++, k++) { in KSPSolve_PIPEGCR_cycle()
|
| /petsc/src/mat/impls/nest/ |
| H A D | matnest.c | 1103 PetscInt m, n, M, N, mi, ni, Mi, Ni; in MatNestSetSubMat_Nest() local
1111 PetscCall(ISGetLocalSize(bA->isglobal.row[idxm], &mi)); in MatNestSetSubMat_Nest()
1116 …mi && n == ni, PetscObjectComm((PetscObject)mat), PETSC_ERR_ARG_INCOMP, "Submatrix local dimension… in MatNestSetSubMat_Nest()
1502 PetscInt i, j, m, mi, *ix; in MatNestCreateAggregateL2G_Private() local
1508 PetscCall(ISGetLocalSize(islocal[i], &mi)); in MatNestCreateAggregateL2G_Private()
1511 PetscCall(ISGetLocalSize(isglobal[i], &mi)); in MatNestCreateAggregateL2G_Private()
1513 m += mi; in MatNestCreateAggregateL2G_Private()
1546 PetscCall(ISGetLocalSize(islocal[i], &mi)); in MatNestCreateAggregateL2G_Private()
1548 for (j = 0; j < mi; j++) ix[m + j] = j; in MatNestCreateAggregateL2G_Private()
1549 PetscCall(ISLocalToGlobalMappingApply(smap, mi, ix + m, ix + m)); in MatNestCreateAggregateL2G_Private()
[all …]
|