1 2 #ifndef lint 3 static char vcid[] = "$Id: tsregall.c,v 1.4 1997/01/06 20:28:06 balay Exp bsmith $"; 4 #endif 5 6 #include "src/ts/tsimpl.h" /*I "ts.h" I*/ 7 extern int TSCreate_Euler(TS); 8 extern int TSCreate_BEuler(TS); 9 extern int TSCreate_Pseudo(TS); 10 11 #undef __FUNC__ 12 #define __FUNC__ "TSRegisterAll" 13 /*@C 14 TSRegisterAll - Registers all of the timesteppers in the TS 15 package. 16 17 Adding new methods: 18 To add a new method to the registry 19 $ Copy this routine and modify it to incorporate 20 $ a call to TSRegister() for the new method. 21 22 Restricting the choices: 23 To prevent all of the methods from being registered and thus 24 save memory, copy this routine and modify it to register only 25 those methods you desire. Make sure that the replacement routine 26 is linked before libpetscts.a. 27 28 .keywords: TS, timestepper, register, all 29 30 .seealso: TSRegister(), TSRegisterDestroy() 31 @*/ 32 int TSRegisterAll() 33 { 34 TSRegisterAllCalled = 1; 35 36 TSRegister(TS_EULER, 0,"euler", TSCreate_Euler); 37 TSRegister(TS_BEULER, 0,"beuler", TSCreate_BEuler); 38 TSRegister(TS_PSEUDO, 0,"pseudo", TSCreate_Pseudo); 39 return 0; 40 } 41