1 2 #include <petsc/private/isimpl.h> /*I "petscis.h" I*/ 3 PETSC_INTERN PetscErrorCode ISCreate_General(IS); 4 PETSC_INTERN PetscErrorCode ISCreate_Stride(IS); 5 PETSC_INTERN PetscErrorCode ISCreate_Block(IS); 6 7 /*@C 8 ISRegisterAll - Registers all of the index set components in the `IS` package. 9 10 Not Collective 11 12 Level: advanced 13 14 .seealso: [](sec_scatter), `IS`, `ISType`, `ISRegister()` 15 @*/ 16 PetscErrorCode ISRegisterAll(void) 17 { 18 PetscFunctionBegin; 19 if (ISRegisterAllCalled) PetscFunctionReturn(PETSC_SUCCESS); 20 ISRegisterAllCalled = PETSC_TRUE; 21 22 PetscCall(ISRegister(ISGENERAL, ISCreate_General)); 23 PetscCall(ISRegister(ISSTRIDE, ISCreate_Stride)); 24 PetscCall(ISRegister(ISBLOCK, ISCreate_Block)); 25 PetscFunctionReturn(PETSC_SUCCESS); 26 } 27