1 #ifdef PETSC_RCS_HEADER 2 static char vcid[] = "$Id: tsregall.c,v 1.20 1998/07/27 21:55:09 balay Exp bsmith $"; 3 #endif 4 5 #include "src/ts/tsimpl.h" /*I "ts.h" I*/ 6 EXTERN_C_BEGIN 7 extern int TSCreate_Euler(TS); 8 extern int TSCreate_BEuler(TS); 9 extern int TSCreate_Pseudo(TS); 10 extern int TSCreate_PVode(TS); 11 extern int TSCreate_CN(TS); 12 EXTERN_C_END 13 14 #undef __FUNC__ 15 #define __FUNC__ "TSRegisterAll" 16 /*@C 17 TSRegisterAll - Registers all of the timesteppers in the TS 18 package. 19 20 Not Collective 21 22 .keywords: TS, timestepper, register, all 23 24 .seealso: TSRegisterDestroy() 25 @*/ 26 int TSRegisterAll(char *path) 27 { 28 PetscFunctionBegin; 29 TSRegisterAllCalled = 1; 30 31 TSRegister(TS_EULER, path,"TSCreate_Euler", TSCreate_Euler); 32 TSRegister(TS_BEULER, path,"TSCreate_BEuler",TSCreate_BEuler); 33 TSRegister(TS_CRANK_NICHOLSON, path,"TSCreate_CN",TSCreate_CN); 34 TSRegister(TS_PSEUDO, path,"TSCreate_Pseudo",TSCreate_Pseudo); 35 #if defined(HAVE_PVODE) && !defined(__cplusplus) 36 TSRegister(TS_PVODE, path,"TSCreate_PVode", TSCreate_PVode); 37 #endif 38 PetscFunctionReturn(0); 39 } 40