Searched refs:dimA (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/dm/dt/dualspace/impls/lagrange/ |
| H A D | dspacelagrange.c | 1185 PetscInt dimA, dimB; in PetscQuadraturePointsMerge() local
1194 PetscCall(PetscQuadratureGetData(quadA, &dimA, NULL, &nA, &pointsA, NULL)); in PetscQuadraturePointsMerge()
1196 …PetscCheck(dimA == dimB, PETSC_COMM_SELF, PETSC_ERR_ARG_INCOMP, "Quadrature points must be in the … in PetscQuadraturePointsMerge()
1204 for (d = 0; d < dimA; d++) in PetscQuadraturePointsMerge()
1205 if (PetscAbsReal(pointsB[i * dimA + d] - pointsA[j * dimA + d]) > PETSC_SMALL) break; in PetscQuadraturePointsMerge()
1206 if (d == dimA) { in PetscQuadraturePointsMerge()
1215 PetscCall(PetscMalloc1(nJoint * dimA, &pointsJoint)); in PetscQuadraturePointsMerge()
1216 PetscCall(PetscArraycpy(pointsJoint, pointsA, nA * dimA)); in PetscQuadraturePointsMerge()
1219 for (d = 0; d < dimA; d++) pointsJoint[bToJ[i] * dimA + d] = pointsB[i * dimA + d]; in PetscQuadraturePointsMerge()
1223 PetscCall(PetscQuadratureSetData(qJ, dimA, 0, nJoint, pointsJoint, NULL)); in PetscQuadraturePointsMerge()
|
| /petsc/src/dm/dt/dualspace/interface/ |
| H A D | dualspace.c | 1500 PetscInt sizeA, sizeB, dimA, dimB; in PetscDualSpaceEqual() local
1513 PetscCall(DMGetDimension(A->dm, &dimA)); in PetscDualSpaceEqual()
1515 if (dimA != dimB) PetscFunctionReturn(PETSC_SUCCESS); in PetscDualSpaceEqual()
1519 for (PetscInt d = 0; d < dimA; d++) { in PetscDualSpaceEqual()
|