Searched refs:iiu (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ksp/pc/impls/bddc/ |
| H A D | bddcprivate.c | 853 PetscInt *iia, *jja, *iiu, *jju; in PCBDDCNedelecSupport() local
860 iiu = pcbddc->mat_graph->xadj; in PCBDDCNedelecSupport()
864 …PetscCall(MatGetRowIJ(matis->A, 0, PETSC_TRUE, PETSC_FALSE, &i, (const PetscInt **)&iiu, (const Pe… in PCBDDCNedelecSupport()
867 PetscCall(PetscMalloc2(n + 1, &iiu, n, &jju)); in PCBDDCNedelecSupport()
868 iiu[0] = 0; in PCBDDCNedelecSupport()
870 iiu[i + 1] = i + 1; in PCBDDCNedelecSupport()
877 for (i = 0; i < n; i++) iia[i + 1] = iiu[i + 1] - iiu[i]; in PCBDDCNedelecSupport()
894 for (j = 0; j < iiu[i + 1] - iiu[i]; j++) jja[iia[i] + j] = jju[iiu[i] + j]; in PCBDDCNedelecSupport()
906 …RestoreRowIJ(matis->A, 0, PETSC_TRUE, PETSC_FALSE, &i, (const PetscInt **)&iiu, (const PetscInt **… in PCBDDCNedelecSupport()
907 if (free) PetscCall(PetscFree2(iiu, jju)); in PCBDDCNedelecSupport()
|