Searched refs:permOrnt (Results 1 – 1 of 1) sorted by relevance
2472 PetscInt *perm, *permOrnt; in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange() local2500 PetscCall(PetscLagNodeIndicesGetPermutation(ni, &permOrnt)); in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()2503 PetscInt *nind = &(ni->nodeIdx[permOrnt[n] * nodeIdxDim]); in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()2508 PetscInt *mind = &(ni->nodeIdx[permOrnt[nEnd] * nodeIdxDim]); in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()2537 for (m = n; m < nEnd; m++) nnz[permOrnt[m]] = groupSize; in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()2548 PetscInt *nind = &(ni->nodeIdx[permOrnt[n] * nodeIdxDim]); in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()2553 PetscInt *mind = &(ni->nodeIdx[permOrnt[nEnd] * nodeIdxDim]); in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()2568 W[(m - n) * nodeVecDim + d] = ni->nodeVec[permOrnt[m] * nodeVecDim + d]; in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()2603 …for (d = 0; d < nodeVecDim; d++) W[(m - n) * nodeVecDim + d] = ni->nodeVec[permOrnt[m] * nodeVecDi… in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()2615 PetscCall(MatSetValues(A, groupSize, &permOrnt[n], groupSize, &perm[n], V, INSERT_VALUES)); in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()