1 /*$Id: tsregall.c,v 1.32 2001/03/23 23:24:34 balay Exp $*/ 2 3 #include "src/ts/tsimpl.h" /*I "petscts.h" I*/ 4 EXTERN_C_BEGIN 5 EXTERN int TSCreate_Euler(TS); 6 EXTERN int TSCreate_BEuler(TS); 7 EXTERN int TSCreate_Pseudo(TS); 8 EXTERN int TSCreate_PVode(TS); 9 EXTERN int TSCreate_CN(TS); 10 11 EXTERN int GTSSerialize_BEuler(MPI_Comm, TS *, PetscViewer, PetscTruth); 12 EXTERN_C_END 13 14 #undef __FUNCT__ 15 #define __FUNCT__ "TSRegisterAll" 16 /*@C 17 TSRegisterAll - Registers all of the timesteppers in the TS package. 18 19 Not Collective 20 21 Input parameter: 22 . path - The dynamic library path 23 24 Level: advanced 25 26 .keywords: TS, timestepper, register, all 27 .seealso: TSCreate(), TSRegister(), TSRegisterDestroy() 28 @*/ 29 int TSRegisterAll(const char path[]) 30 { 31 int ierr; 32 33 PetscFunctionBegin; 34 TSRegisterAllCalled = PETSC_TRUE; 35 36 ierr = TSRegisterDynamic(TS_EULER, path, "TSCreate_Euler", TSCreate_Euler); CHKERRQ(ierr); 37 ierr = TSRegisterDynamic(TS_BEULER, path, "TSCreate_BEuler",TSCreate_BEuler); CHKERRQ(ierr); 38 ierr = TSRegisterDynamic(TS_CRANK_NICHOLSON, path, "TSCreate_CN", TSCreate_CN); CHKERRQ(ierr); 39 ierr = TSRegisterDynamic(TS_PSEUDO, path, "TSCreate_Pseudo", TSCreate_Pseudo); CHKERRQ(ierr); 40 #if defined(PETSC_HAVE_PVODE) && !defined(__cplusplus) 41 ierr = TSRegisterDynamic(TS_PVODE, path, "TSCreate_PVode", TSCreate_PVode); CHKERRQ(ierr); 42 #endif 43 PetscFunctionReturn(0); 44 } 45 46 #undef __FUNCT__ 47 #define __FUNCT__ "TSSerializeRegisterAll" 48 /*@C 49 TSSerializeRegisterAll - Registers all of the serialization routines in the TS package. 50 51 Not Collective 52 53 Input parameter: 54 . path - The dynamic library path 55 56 Level: advanced 57 58 .keywords: ts, register, all, serialize 59 .seealso: TSSerialize(), TSSerializeRegister(), TSSerializeRegisterDestroy() 60 @*/ 61 int TSSerializeRegisterAll(const char path[]) 62 { 63 PetscFunctionBegin; 64 TSSerializeRegisterAllCalled = PETSC_TRUE; 65 PetscFunctionReturn(0); 66 } 67