Searched refs:subDim (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/dm/dt/space/impls/subspace/ |
| H A D | spacesubspace.c | 51 PetscInt origDim, subDim, origNc, subNc, o, s; in PetscSpaceView_Subspace() local
55 PetscCall(PetscSpaceGetNumVariables(sp, &subDim)); in PetscSpaceView_Subspace()
64 PetscCall(PetscViewerASCIIPrintf(viewer, " %g", (double)subsp->Jx[o * subDim + 0])); in PetscSpaceView_Subspace()
66 …for (s = 1; s < subDim; s++) PetscCall(PetscViewerASCIIPrintf(viewer, " %g", (double)subsp->Jx[o *… in PetscSpaceView_Subspace()
96 PetscInt origDim, subDim, origNc, subNc, subNb, origNb, i, j, k, l, m, n, o; in PetscSpaceEvaluate_Subspace() local
101 PetscCall(PetscSpaceGetNumVariables(sp, &subDim)); in PetscSpaceEvaluate_Subspace()
116 …for (k = 0; k < subDim; k++) inpoints[i * origDim + j] += subsp->Jx[j * subDim + k] * points[i * s… in PetscSpaceEvaluate_Subspace()
119 …for (j = 0; j < PetscMin(subDim, origDim); j++) inpoints[i * origDim + j] += points[i * subDim + j… in PetscSpaceEvaluate_Subspace()
130 PetscCall(DMGetWorkArray(sp->dm, origNc * subDim * subDim, MPIU_REAL, &psi)); in PetscSpaceEvaluate_Subspace()
131 for (i = 0; i < npoints * subNb * subNc * subDim; i++) D[i] = 0.0; in PetscSpaceEvaluate_Subspace()
[all …]
|
| /petsc/src/dm/impls/stag/ |
| H A D | stagutils.c | 67 PetscInt dof[DMSTAG_MAX_STRATA], subDim; in DMStagGetProductCoordinateArrays_Private() local
75 PetscCall(DMGetDimension(subDM, &subDim)); in DMStagGetProductCoordinateArrays_Private()
76 …PetscCheck(subDim == 1, PetscObjectComm((PetscObject)dm), PETSC_ERR_ARG_WRONGSTATE, "Coordinate su… in DMStagGetProductCoordinateArrays_Private()
211 PetscInt dof[DMSTAG_MAX_STRATA], subDim; in DMStagGetProductCoordinateLocationSlot() local
214 PetscCall(DMGetDimension(subDM, &subDim)); in DMStagGetProductCoordinateLocationSlot()
215 …PetscCheck(subDim == 1, PetscObjectComm((PetscObject)dm), PETSC_ERR_ARG_WRONGSTATE, "Coordinate su… in DMStagGetProductCoordinateLocationSlot()
|