Searched refs:mTrace (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/dm/dt/dualspace/impls/lagrange/ |
| H A D | dspacelagrange.c | 1044 PetscInt mTrace, nTrace, mFiber, nFiber, m, n, k, i, j, l; in MatTensorAltV() local
1059 PetscCall(MatGetSize(trace, &mTrace, &nTrace)); in MatTensorAltV()
1065 PetscCall(PetscMalloc2(mTrace, &nnzTrace, mFiber, &nnzFiber)); in MatTensorAltV()
1066 for (i = 0; i < mTrace; i++) { in MatTensorAltV()
1077 m = mTrace * mFiber; in MatTensorAltV()
1080 … for (i = 0; i < mTrace; i++, l++) nnz[l] = (nnzTrace[i] / NkTrace) * (nnzFiber[j] / NkFiber) * Nk; in MatTensorAltV()
1109 for (iT = 0; iT < mTrace; iT++, i++) { in MatTensorAltV()
|