Searched refs:workF (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/dm/dt/dualspace/impls/lagrange/ |
| H A D | dspacelagrange.c | 661 PetscReal *workF, *workF2, *workT, *workT2, *work, *work2; in PetscLagNodeIndicesTensor() local
695 …PetscCall(PetscMalloc6(MkT, &workT, MkT, &workT2, MkF, &workF, MkF, &workF2, Nk, &work, Nk, &work2… in PetscLagNodeIndicesTensor()
705 workF[d] = val; in PetscLagNodeIndicesTensor()
709 for (d = 0; d < MkF; d++) workF2[d] = workF[d]; in PetscLagNodeIndicesTensor()
710 PetscCall(PetscDTAltVStar(dim, PetscAbsInt(kF), 1, workF2, workF)); in PetscLagNodeIndicesTensor()
713 PetscCall(PetscDTAltVWedgeMatrix(dim, PetscAbsInt(kF), PetscAbsInt(kT), workF, wedgeMat)); in PetscLagNodeIndicesTensor()
742 PetscCall(PetscFree6(workT, workT2, workF, workF2, work, work2)); in PetscLagNodeIndicesTensor()
1049 PetscReal *workT, *workT2, *workF, *workF2, *work, *workstar; in MatTensorAltV() local
1098 PetscCall(PetscMalloc5(dT, &workT, dF, &workF, Nk, &work, Nk, &workstar, Nk, &workS)); in MatTensorAltV()
1122 workF[il] = val; in MatTensorAltV()
[all …]
|