Searched refs:fids (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ksp/pc/impls/gamg/ |
| H A D | agg.c | 560 PetscInt *fids; in formProl0() local
573 PetscCall(PetscMalloc5(Mdata * N, &qqc, M * N, &qqr, N, &TAU, LWORK, &WORK, M, &fids)); in formProl0()
598 for (kk = 0; kk < bs; kk++) fids[aggID * bs + kk] = flid_fgid[flid] * bs + kk; in formProl0()
635 PetscCall(MatSetValues(a_Prol, M, fids, N, cids, qqr, INSERT_VALUES)); in formProl0()
636 PetscCall(PetscFree5(qqc, qqr, TAU, WORK, fids)); in formProl0()
|