| /petsc/src/mat/graphops/order/ |
| H A D | fnroot.c | 32 …, const PetscInt *xadj, const PetscInt *adjncy, PetscInt *mask, PetscInt *nlvl, PetscInt *xls, Pet… in SPARSEPACKfnroot() argument
49 PetscCall(SPARSEPACKrootls(root, &xadj[1], &adjncy[1], &mask[1], nlvl, &xls[1], &ls[1])); in SPARSEPACKfnroot()
50 ccsize = xls[*nlvl + 1] - 1; in SPARSEPACKfnroot()
51 if (*nlvl == 1 || *nlvl == ccsize) PetscFunctionReturn(PETSC_SUCCESS); in SPARSEPACKfnroot()
55 jstrt = xls[*nlvl]; in SPARSEPACKfnroot()
78 if (nunlvl <= *nlvl) PetscFunctionReturn(PETSC_SUCCESS); in SPARSEPACKfnroot()
79 *nlvl = nunlvl; in SPARSEPACKfnroot()
80 if (*nlvl < ccsize) goto L100; in SPARSEPACKfnroot()
|
| H A D | rootls.c | 24 …, const PetscInt *xadj, const PetscInt *adjncy, PetscInt *mask, PetscInt *nlvl, PetscInt *xls, Pet… in SPARSEPACKrootls() argument
44 *nlvl = 0; in SPARSEPACKrootls()
52 ++(*nlvl); in SPARSEPACKrootls()
53 xls[*nlvl] = lbegin; in SPARSEPACKrootls()
78 xls[*nlvl + 1] = lvlend + 1; in SPARSEPACKrootls()
|
| H A D | gen1wd.c | 36 PetscInt node, nsep, lnum, nlvl, root; in SPARSEPACKgen1wd() local
59 …PetscCall(SPARSEPACKfn1wd(&root, &xadj[1], &adjncy[1], &mask[1], &nsep, &perm[num + 1], &nlvl, &xl… in SPARSEPACKgen1wd()
63 ccsize = xls[nlvl + 1] - 1; in SPARSEPACKgen1wd()
71 …PetscCall(SPARSEPACKrootls(&node, &xadj[1], &adjncy[1], &mask[1], &nlvl, &xls[1], &perm[num + 1])); in SPARSEPACKgen1wd()
73 num = num + xls[nlvl + 1] - 1; in SPARSEPACKgen1wd()
|
| H A D | fndsep.c | 42 PetscInt node, nlvl, i, j, jstop, jstrt, mp1beg, mp1end, midbeg, midend, midlvl; in SPARSEPACKfndsep() local
54 PetscCall(SPARSEPACKfnroot(root, &xadj[1], &adjncy[1], &mask[1], &nlvl, &xls[1], &ls[1])); in SPARSEPACKfndsep()
57 if (nlvl >= 3) goto L200; in SPARSEPACKfndsep()
58 *nsep = xls[nlvl + 1] - 1; in SPARSEPACKfndsep()
68 midlvl = (nlvl + 2) / 2; in SPARSEPACKfndsep()
|
| H A D | fn1wd.c | 30 …etscInt *adjncy, PetscInt *mask, PetscInt *nsep, PetscInt *sep, PetscInt *nlvl, PetscInt *xls, Pet… in SPARSEPACKfn1wd() argument
53 PetscCall(SPARSEPACKfnroot(root, &xadj[1], &adjncy[1], &mask[1], nlvl, &xls[1], &ls[1])); in SPARSEPACKfn1wd()
54 fnlvl = (PetscReal)(*nlvl); in SPARSEPACKfn1wd()
55 *nsep = xls[*nlvl + 1] - 1; in SPARSEPACKfn1wd()
76 if (lvl >= *nlvl) PetscFunctionReturn(PETSC_SUCCESS); in SPARSEPACKfn1wd()
|
| H A D | genrcm.c | 42 PetscInt nlvl, root, i, ccsize; in SPARSEPACKgenrcm() local
74 PetscCall(SPARSEPACKfnroot(&root, &xadj[1], &adjncy[1], &mask[1], &nlvl, &xls[1], &perm[num])); in SPARSEPACKgenrcm()
|