Lines Matching refs:nodeVecDim
311 PetscInt nodeVecDim; member
320 …tData_Internal(PetscLagNodeIndices ni, PetscInt *nodeIdxDim, PetscInt *nodeVecDim, PetscInt *nNode… in PetscLagNodeIndicesGetData_Internal() argument
324 *nodeVecDim = ni->nodeVecDim; in PetscLagNodeIndicesGetData_Internal()
344 (*niNew)->nodeVecDim = ni->nodeVecDim; in PetscLagNodeIndicesDuplicate()
348 PetscCall(PetscMalloc1(ni->nNodes * ni->nodeVecDim, &((*niNew)->nodeVec))); in PetscLagNodeIndicesDuplicate()
349 PetscCall(PetscArraycpy((*niNew)->nodeVec, ni->nodeVec, ni->nNodes * ni->nodeVecDim)); in PetscLagNodeIndicesDuplicate()
482 ni->nodeVecDim = 0; in PetscLagNodeIndicesCreateSimplexVertices()
508 ni->nodeVecDim = 0; in PetscLagNodeIndicesCreateTensorVertices()
673 ni->nodeVecDim = Nk; in PetscLagNodeIndicesTensor()
753 PetscInt nodeIdxDim, nodeVecDim, nNodes; in PetscLagNodeIndicesMerge() local
759 ni->nodeVecDim = nodeVecDim = niA->nodeVecDim; in PetscLagNodeIndicesMerge()
760 …PetscCheck(niB->nodeVecDim == nodeVecDim, PETSC_COMM_SELF, PETSC_ERR_ARG_INCOMP, "Cannot merge Pet… in PetscLagNodeIndicesMerge()
764 PetscCall(PetscMalloc1(nNodes * nodeVecDim, &ni->nodeVec)); in PetscLagNodeIndicesMerge()
766 PetscCall(PetscArraycpy(ni->nodeVec, niA->nodeVec, niA->nNodes * nodeVecDim)); in PetscLagNodeIndicesMerge()
768 …PetscCall(PetscArraycpy(&ni->nodeVec[niA->nNodes * nodeVecDim], niB->nodeVec, niB->nNodes * nodeVe… in PetscLagNodeIndicesMerge()
1362 ni->nodeVecDim = Nk; in PetscDualSpaceLagrangeCreateSimplexNodeMat()
1456 ni->nodeVecDim = Nk; in PetscDualSpaceLagrangeCreateAllNodeIdx()
1948 PetscInt nodeVecDim = ni->nodeVecDim; in MatPermuteByNodeIdx() local
1959 PetscCall(PetscMalloc1(nodeVecDim * m, &nVecPerm)); in MatPermuteByNodeIdx()
1963 …for (j = 0; j < nodeVecDim; j++) nVecPerm[i * nodeVecDim + j] = ni->nodeVec[perm[i] * nodeVecDim +… in MatPermuteByNodeIdx()
2470 PetscInt nodeIdxDim, nodeVecDim, nNodes; in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange() local
2492 ni->nodeVecDim = nodeVecDim = intNodeIndices->nodeVecDim; in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2495 PetscCall(PetscMalloc1(nNodes * nodeVecDim, &ni->nodeVec)); in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2542 …PetscCheck(maxGroupSize <= nodeVecDim, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Dofs are not in blocks th… in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2546 …PetscCall(PetscMalloc3(maxGroupSize * nodeVecDim, &V, maxGroupSize * nodeVecDim, &W, nodeVecDim * … in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2566 for (d = 0; d < nodeVecDim; d++) { in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2567 V[(m - n) * nodeVecDim + d] = intNodeIndices->nodeVec[perm[m] * nodeVecDim + d]; in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2568 W[(m - n) * nodeVecDim + d] = ni->nodeVec[permOrnt[m] * nodeVecDim + d]; in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2577 PetscCall(PetscBLASIntCast(nodeVecDim, &bm)); in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2582 PetscCall(PetscBLASIntCast(2 * nodeVecDim, &blwork)); in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2592 V[i * groupSize + j] = W[i * nodeVecDim + j]; in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2603 …for (d = 0; d < nodeVecDim; d++) W[(m - n) * nodeVecDim + d] = ni->nodeVec[permOrnt[m] * nodeVecDi… in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2607 for (PetscInt j = 0; j < nodeVecDim; j++) { in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2608 …= 0; k < groupSize; k++) W[i * nodeVecDim + j] -= V[i * groupSize + k] * intNodeIndices->nodeVec[p… in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2609 res += PetscAbsScalar(W[i * nodeVecDim + j]); in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2705 PetscInt nCopies = Nc / lag->intNodeIndices->nodeVecDim; in PetscDualSpaceGetSymmetries_Lagrange()
2715 …PetscCheck(lag->intNodeIndices->nodeVecDim * nCopies == Nc, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Node… in PetscDualSpaceGetSymmetries_Lagrange()