Actual source code: sregis.c
petsc-3.7.3 2016-08-01
2: #include <petsc/private/matimpl.h> /*I "petscmat.h" I*/
4: PETSC_INTERN PetscErrorCode MatGetOrdering_Natural(Mat,MatOrderingType,IS*,IS*);
5: PETSC_INTERN PetscErrorCode MatGetOrdering_ND(Mat,MatOrderingType,IS*,IS*);
6: PETSC_INTERN PetscErrorCode MatGetOrdering_1WD(Mat,MatOrderingType,IS*,IS*);
7: PETSC_INTERN PetscErrorCode MatGetOrdering_QMD(Mat,MatOrderingType,IS*,IS*);
8: PETSC_INTERN PetscErrorCode MatGetOrdering_RCM(Mat,MatOrderingType,IS*,IS*);
9: PETSC_INTERN PetscErrorCode MatGetOrdering_RowLength(Mat,MatOrderingType,IS*,IS*);
10: PETSC_INTERN PetscErrorCode MatGetOrdering_DSC(Mat,MatOrderingType,IS*,IS*);
11: PETSC_INTERN PetscErrorCode MatGetOrdering_WBM(Mat,MatOrderingType,IS*,IS*);
12: PETSC_INTERN PetscErrorCode MatGetOrdering_Spectral(Mat,MatOrderingType,IS*,IS*);
13: #if defined(PETSC_HAVE_SUITESPARSE)
14: PETSC_INTERN PetscErrorCode MatGetOrdering_AMD(Mat,MatOrderingType,IS*,IS*);
15: #endif
19: /*@C
20: MatOrderingRegisterAll - Registers all of the matrix
21: reordering routines in PETSc.
23: Not Collective
25: Level: developer
27: Adding new methods:
28: To add a new method to the registry. Copy this routine and
29: modify it to incorporate a call to MatReorderRegister() for
30: the new method, after the current list.
32: Restricting the choices: To prevent all of the methods from being
33: registered and thus save memory, copy this routine and comment out
34: those orderigs you do not wish to include. Make sure that the
35: replacement routine is linked before libpetscmat.a.
37: .keywords: matrix, reordering, register, all
39: .seealso: MatOrderingRegister(), MatOrderingRegisterDestroy()
40: @*/
41: PetscErrorCode MatOrderingRegisterAll(void)
42: {
46: if (MatOrderingRegisterAllCalled) return(0);
47: MatOrderingRegisterAllCalled = PETSC_TRUE;
49: MatOrderingRegister(MATORDERINGNATURAL, MatGetOrdering_Natural);
50: MatOrderingRegister(MATORDERINGND, MatGetOrdering_ND);
51: MatOrderingRegister(MATORDERING1WD, MatGetOrdering_1WD);
52: MatOrderingRegister(MATORDERINGRCM, MatGetOrdering_RCM);
53: MatOrderingRegister(MATORDERINGQMD, MatGetOrdering_QMD);
54: MatOrderingRegister(MATORDERINGROWLENGTH,MatGetOrdering_RowLength);
55: #if defined(PETSC_HAVE_SUPERLU_DIST)
56: MatOrderingRegister(MATORDERINGWBM, MatGetOrdering_WBM);
57: #endif
58: MatOrderingRegister(MATORDERINGSPECTRAL, MatGetOrdering_Spectral);
59: #if defined(PETSC_HAVE_SUITESPARSE)
60: MatOrderingRegister(MATORDERINGAMD, MatGetOrdering_AMD);
61: #endif
62: return(0);
63: }