Lines Matching refs:nNodes
312 PetscInt nNodes; member
320 …LagNodeIndices ni, PetscInt *nodeIdxDim, PetscInt *nodeVecDim, PetscInt *nNodes, const PetscInt *n… in PetscLagNodeIndicesGetData_Internal() argument
325 *nNodes = ni->nNodes; in PetscLagNodeIndicesGetData_Internal()
345 (*niNew)->nNodes = ni->nNodes; in PetscLagNodeIndicesDuplicate()
346 PetscCall(PetscMalloc1(ni->nNodes * ni->nodeIdxDim, &((*niNew)->nodeIdx))); in PetscLagNodeIndicesDuplicate()
347 PetscCall(PetscArraycpy((*niNew)->nodeIdx, ni->nodeIdx, ni->nNodes * ni->nodeIdxDim)); 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()
483 ni->nNodes = dim + 1; in PetscLagNodeIndicesCreateSimplexVertices()
501 PetscInt nVerts, nSubVerts = facetni->nNodes; in PetscLagNodeIndicesCreateTensorVertices()
509 ni->nNodes = nVerts = 2 * nSubVerts; in PetscLagNodeIndicesCreateTensorVertices()
548 PetscInt nSubVert = vertp->nNodes; in PetscLagNodeIndicesPushForward()
551 PetscInt nNodes = nodep->nNodes; in PetscLagNodeIndicesPushForward() local
584 for (n = 0; n < nNodes; n++) pfNodeIdx[n * nodeIdxDim + i] = val; in PetscLagNodeIndicesPushForward()
599 … for (n = 0; n < nNodes; n++) pfNodeIdx[n * nodeIdxDim + i] = nodeIdx[n * subNodeIdxDim + subi]; in PetscLagNodeIndicesPushForward()
636 for (n = 0; n < nNodes; n++) { in PetscLagNodeIndicesPushForward()
653 PetscInt nodeIdxDim, nNodes; in PetscLagNodeIndicesTensor() local
674 ni->nNodes = nNodes = tracei->nNodes * fiberi->nNodes; in PetscLagNodeIndicesTensor()
676 PetscCall(PetscMalloc1(nNodes * nodeIdxDim, &ni->nodeIdx)); in PetscLagNodeIndicesTensor()
678 for (l = 0, j = 0; j < fiberi->nNodes; j++) { in PetscLagNodeIndicesTensor()
679 for (i = 0; i < tracei->nNodes; i++, l++) { in PetscLagNodeIndicesTensor()
688 PetscCall(PetscMalloc1(nNodes * Nk, &ni->nodeVec)); in PetscLagNodeIndicesTensor()
698 for (l = 0, j = 0; j < fiberi->nNodes; j++) { in PetscLagNodeIndicesTensor()
714 for (i = 0; i < tracei->nNodes; i++, l++) { in PetscLagNodeIndicesTensor()
753 PetscInt nodeIdxDim, nodeVecDim, nNodes; in PetscLagNodeIndicesMerge() local
761 ni->nNodes = nNodes = niA->nNodes + niB->nNodes; in PetscLagNodeIndicesMerge()
763 PetscCall(PetscMalloc1(nNodes * nodeIdxDim, &ni->nodeIdx)); in PetscLagNodeIndicesMerge()
764 PetscCall(PetscMalloc1(nNodes * nodeVecDim, &ni->nodeVec)); in PetscLagNodeIndicesMerge()
765 PetscCall(PetscArraycpy(ni->nodeIdx, niA->nodeIdx, niA->nNodes * nodeIdxDim)); in PetscLagNodeIndicesMerge()
766 PetscCall(PetscArraycpy(ni->nodeVec, niA->nodeVec, niA->nNodes * nodeVecDim)); in PetscLagNodeIndicesMerge()
767 …PetscCall(PetscArraycpy(&ni->nodeIdx[niA->nNodes * nodeIdxDim], niB->nodeIdx, niB->nNodes * nodeId… in PetscLagNodeIndicesMerge()
768 …PetscCall(PetscArraycpy(&ni->nodeVec[niA->nNodes * nodeVecDim], niB->nodeVec, niB->nNodes * nodeVe… in PetscLagNodeIndicesMerge()
814 PetscInt m = ni->nNodes; in PetscLagNodeIndicesGetPermutation()
1349 PetscInt nNodes, nExtraNodes; in PetscDualSpaceLagrangeCreateSimplexNodeMat() local
1356 PetscCall(PetscDTBinomialInt(dim + sum, dim, &nNodes)); in PetscDualSpaceLagrangeCreateSimplexNodeMat()
1363 ni->nNodes = nNodes * Nk; in PetscDualSpaceLagrangeCreateSimplexNodeMat()
1365 PetscCall(PetscMalloc1(nNodes * Nk * (dim + 1), &ni->nodeIdx)); in PetscDualSpaceLagrangeCreateSimplexNodeMat()
1366 PetscCall(PetscMalloc1(nNodes * Nk * Nk, &ni->nodeVec)); in PetscDualSpaceLagrangeCreateSimplexNodeMat()
1367 for (i = 0; i < nNodes; i++) in PetscDualSpaceLagrangeCreateSimplexNodeMat()
1375 PetscCall(PetscMalloc1(dim * nNodes, &nodeCoords)); in PetscDualSpaceLagrangeCreateSimplexNodeMat()
1377 for (k = 0; k < nNodes; k++) { in PetscDualSpaceLagrangeCreateSimplexNodeMat()
1397 for (k = 0; k < nNodes; k++) { in PetscDualSpaceLagrangeCreateSimplexNodeMat()
1413 PetscCall(PetscQuadratureSetData(intNodes, dim, 0, nNodes, nodeCoords, NULL)); in PetscDualSpaceLagrangeCreateSimplexNodeMat()
1414 PetscCall(MatCreateSeqAIJ(PETSC_COMM_SELF, nNodes * Nk, nNodes * Nk, Nk, NULL, &intMat)); in PetscDualSpaceLagrangeCreateSimplexNodeMat()
1417 for (j = 0; j < nNodes * Nk; j++) { in PetscDualSpaceLagrangeCreateSimplexNodeMat()
1457 ni->nNodes = nDofs; in PetscDualSpaceLagrangeCreateAllNodeIdx()
1491 PetscInt nNodes; in PetscDualSpaceCreateAllDataFromInteriorData() local
1511 for (p = pStart, nNodes = 0, maxNzforms = 0; p < pEnd; p++) { in PetscDualSpaceCreateAllDataFromInteriorData()
1529 nNodes += nNodesp; in PetscDualSpaceCreateAllDataFromInteriorData()
1541 PetscCall(MatCreateSeqAIJ(PETSC_COMM_SELF, nDofs, nNodes * Nc, maxNzforms * Nk, NULL, &allMat)); in PetscDualSpaceCreateAllDataFromInteriorData()
1546 PetscCall(PetscMalloc1(dim * nNodes, &nodes)); in PetscDualSpaceCreateAllDataFromInteriorData()
1633 PetscCall(PetscQuadratureSetData(allNodes, dim, 0, nNodes, nodes, NULL)); in PetscDualSpaceCreateAllDataFromInteriorData()
1653 PetscInt nNodes; in PetscDualSpaceComputeFunctionalsFromAllData_Moments() local
1671 PetscCall(PetscQuadratureGetData(sp->allNodes, NULL, NULL, &nNodes, NULL, &weights)); in PetscDualSpaceComputeFunctionalsFromAllData_Moments()
1672 PetscCall(MatCreateSeqDense(PETSC_COMM_SELF, nDofs, nNodes * Nc, NULL, &allMat)); in PetscDualSpaceComputeFunctionalsFromAllData_Moments()
1675 for (i = 0; i < nNodes * Nc; ++i) array[i] = weights[i]; in PetscDualSpaceComputeFunctionalsFromAllData_Moments()
1697 PetscInt nNodes, spdim; in PetscDualSpaceComputeFunctionalsFromAllData() local
1706 nNodes = 0; in PetscDualSpaceComputeFunctionalsFromAllData()
1707 if (allNodes) PetscCall(PetscQuadratureGetData(allNodes, NULL, NULL, &nNodes, &nodes, NULL)); in PetscDualSpaceComputeFunctionalsFromAllData()
2296 PetscInt nNodes = lag->intNodeIndices->nNodes; in PetscDualSpaceSetUp_Lagrange() local
2300 for (PetscInt n = 0; n < nNodes; n++) { in PetscDualSpaceSetUp_Lagrange()
2470 PetscInt nodeIdxDim, nodeVecDim, nNodes; in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange() local
2493 ni->nNodes = nNodes = intNodeIndices->nNodes; in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2494 PetscCall(PetscMalloc1(nNodes * nodeIdxDim, &ni->nodeIdx)); in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2495 PetscCall(PetscMalloc1(nNodes * nodeVecDim, &ni->nodeVec)); in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2501 PetscCall(PetscMalloc1(nNodes, &nnz)); in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2502 for (n = 0, maxGroupSize = 0; n < nNodes;) { /* incremented in the loop */ in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2507 for (nEnd = n + 1; nEnd < nNodes; nEnd++) { in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2543 PetscCall(MatCreateSeqAIJ(PETSC_COMM_SELF, nNodes, nNodes, 0, nnz, &A)); in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2547 for (n = 0; n < nNodes;) { /* incremented in the loop */ in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2552 for (nEnd = n + 1; nEnd < nNodes; nEnd++) { in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2706 PetscInt nNodes = lag->intNodeIndices->nNodes; in PetscDualSpaceGetSymmetries_Lagrange() local
2716 …PetscCheck(nNodes * nCopies == spintdim, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Node indices incompatib… in PetscDualSpaceGetSymmetries_Lagrange()
2728 for (i = 0; i < nNodes; i++) { in PetscDualSpaceGetSymmetries_Lagrange()