Searched refs:nodeVec (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/dm/dt/dualspace/impls/lagrange/ |
| H A D | dspacelagrange.c | 314 PetscReal *nodeVec; /* for each node a vector of size nodeVecDim */ member
320 …Dim, PetscInt *nodeVecDim, PetscInt *nNodes, const PetscInt *nodeIdx[], const PetscReal *nodeVec[]) in PetscLagNodeIndicesGetData_Internal() argument
327 *nodeVec = ni->nodeVec; in PetscLagNodeIndicesGetData_Internal()
348 PetscCall(PetscMalloc1(ni->nNodes * ni->nodeVecDim, &((*niNew)->nodeVec))); in PetscLagNodeIndicesDuplicate()
349 PetscCall(PetscArraycpy((*niNew)->nodeVec, ni->nodeVec, ni->nNodes * ni->nodeVecDim)); in PetscLagNodeIndicesDuplicate()
363 PetscCall(PetscFree((*ni)->nodeVec)); in PetscLagNodeIndicesDestroy()
555 const PetscReal *nodeVec = nodep->nodeVec; in PetscLagNodeIndicesPushForward() local
639 for (j = 0; j < pNk; j++) val += nodeVec[n * pNk + j] * Jstar[j * Nk + i]; in PetscLagNodeIndicesPushForward()
688 PetscCall(PetscMalloc1(nNodes * Nk, &ni->nodeVec)); in PetscLagNodeIndicesTensor()
704 for (e = 0; e < NkF; e++) val += projFstar[d * NkF + e] * fiberi->nodeVec[j * NkF + e]; in PetscLagNodeIndicesTensor()
[all …]
|
| /petsc/src/dm/dt/dualspace/impls/lagrange/tests/ |
| H A D | ex1.c | 220 const PetscReal *nodeVec; in testLagrange() local
224 …dicesGetData_Internal(lag->allNodeIndices, &nodeIdxDim, &nodeVecDim, &nNodes, &nodeIdx, &nodeVec)); in testLagrange()
239 … nodeVecDim; j++) PetscCall(PetscPrintf(PETSC_COMM_SELF, " %g,", (double)nodeVec[i * nodeVecDim + … in testLagrange()
265 PetscCall(PetscArraycmp(intNodeVec, nodeVec, nodeVecDim * intNnodes, &same)); in testLagrange()
|