| /petsc/src/dm/interface/ |
| H A D | dmi.c | 78 …Section gs, PetscInt numFields, const PetscInt fields[], const PetscInt numComps[], const PetscInt… in PetscSectionSelectFields_Private() argument
90 if (numComps) { in PetscSectionSelectFields_Private()
94 if (numComps[f] < 0) continue; in PetscSectionSelectFields_Private()
96 …numComps[f] <= Nc, PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Field %" PetscInt_FMT ": Number of … in PetscSectionSelectFields_Private()
97 …for (PetscInt c = 0; c < numComps[f]; ++c, ++off) PetscCheck(comps[off] < Nc, PETSC_COMM_SELF, PET… in PetscSectionSelectFields_Private()
98 bs += numComps[f]; in PetscSectionSelectFields_Private()
123 if (numComps && numComps[f] >= 0) { in PetscSectionSelectFields_Private()
128 sfdof = (fdof / Nc) * numComps[f]; in PetscSectionSelectFields_Private()
139 off += numComps[f]; in PetscSectionSelectFields_Private()
187 if (numComps && numComps[f] >= 0) { in PetscSectionSelectFields_Private()
[all …]
|
| /petsc/src/snes/tutorials/network/power/ |
| H A D | pffunctions.c | 36 PetscInt offsetfrom, offsetto, goffsetfrom, goffsetto, numComps; in FormJacobian_Power_private() local
52 PetscCall(DMNetworkGetNumComponents(networkdm, vtx[v], &numComps)); in FormJacobian_Power_private()
53 for (j = 0; j < numComps; j++) { in FormJacobian_Power_private()
246 PetscInt offsetfrom, offsetto, offset, i, j, key, numComps; in FormFunction_Power() local
261 PetscCall(DMNetworkGetNumComponents(networkdm, vtx[v], &numComps)); in FormFunction_Power()
264 for (j = 0; j < numComps; j++) { in FormFunction_Power()
357 PetscInt key, numComps, j, offset; in SetInitialGuess_Power() local
373 PetscCall(DMNetworkGetNumComponents(networkdm, vtx[i], &numComps)); in SetInitialGuess_Power()
374 for (j = 0; j < numComps; j++) { in SetInitialGuess_Power()
|
| H A D | power2.c | 31 PetscInt numComps; in FormFunction_Subnet() local
35 PetscCall(DMNetworkGetNumComponents(networkdm, vtx[v], &numComps)); in FormFunction_Subnet()
37 for (j = 0; j < numComps; j++) { in FormFunction_Subnet()
177 PetscInt numComps; in FormJacobian_Subnet() local
181 PetscCall(DMNetworkGetNumComponents(networkdm, vtx[v], &numComps)); in FormJacobian_Subnet()
182 for (j = 0; j < numComps; j++) { in FormJacobian_Subnet()
377 PetscInt key, numComps, j, offset; in SetInitialValues_Subnet() local
387 PetscCall(DMNetworkGetNumComponents(networkdm, vtx[i], &numComps)); in SetInitialValues_Subnet()
388 for (j = 0; j < numComps; j++) { in SetInitialValues_Subnet()
|
| /petsc/src/ts/tutorials/power_grid/stability_9bus/ |
| H A D | ex9busdmnetwork.c | 362 PetscInt key, numComps, j; in SetInitialGuess() local
390 PetscCall(DMNetworkGetNumComponents(networkdm, v, &numComps)); in SetInitialGuess()
391 for (j = 0; j < numComps; j++) { in SetInitialGuess()
525 PetscInt numComps; in FormIFunction() local
532 PetscCall(DMNetworkGetNumComponents(networkdm, v, &numComps)); in FormIFunction()
534 for (j = 0; j < numComps; j++) { in FormIFunction()
775 PetscInt i, j, offsetbus, offsetgen, key, numComps; in AlgFunction() local
783 PetscCall(DMNetworkGetNumComponents(networkdm, v, &numComps)); in AlgFunction()
785 for (j = 0; j < numComps; j++) { in AlgFunction()
|
| /petsc/src/dm/impls/plex/ |
| H A D | plexsection.c | 523 PetscInt bd2, field, numComps, numValues; in DMCreateLocalSection_Plex() local
527 …dary(dsBC, bd, NULL, &type, NULL, &label, &numValues, &values, &field, &numComps, &comps, NULL, NU… in DMCreateLocalSection_Plex()
543 …if (numComps) PetscCall(ISCreateGeneral(PETSC_COMM_SELF, numComps, comps, PETSC_COPY_VALUES, &bcCo… in DMCreateLocalSection_Plex()
|
| /petsc/src/ts/tutorials/ |
| H A D | ex11.c | 704 static PetscErrorCode ErrorIndicator_Simple(PetscInt dim, PetscReal volume, PetscInt numComps, cons… in ErrorIndicator_Simple() argument
710 for (i = 0; i < numComps; i++) { in ErrorIndicator_Simple()
|