1 2 #include <petsc/private/isimpl.h> /*I "petscis.h" I*/ 3 PETSC_EXTERN PetscErrorCode ISCreate_General(IS); 4 PETSC_EXTERN PetscErrorCode ISCreate_Stride(IS); 5 PETSC_EXTERN PetscErrorCode ISCreate_Block(IS); 6 7 #undef __FUNCT__ 8 #define __FUNCT__ "ISRegisterAll" 9 /*@C 10 ISRegisterAll - Registers all of the index set components in the IS package. 11 12 Not Collective 13 14 Level: advanced 15 16 .keywords: IS, register, all 17 .seealso: ISRegister(), ISRegisterDestroy() 18 @*/ 19 PetscErrorCode ISRegisterAll(void) 20 { 21 PetscErrorCode ierr; 22 23 PetscFunctionBegin; 24 if (ISRegisterAllCalled) PetscFunctionReturn(0); 25 ISRegisterAllCalled = PETSC_TRUE; 26 27 ierr = ISRegister(ISGENERAL, ISCreate_General);CHKERRQ(ierr); 28 ierr = ISRegister(ISSTRIDE, ISCreate_Stride);CHKERRQ(ierr); 29 ierr = ISRegister(ISBLOCK, ISCreate_Block);CHKERRQ(ierr); 30 PetscFunctionReturn(0); 31 } 32 33