1 2 #ifndef lint 3 static char vcid[] = "$Id: tsregall.c,v 1.6 1997/02/03 15:55:18 curfman 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" /* ADIC Ignore */ 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 copy this routine and modify 19 it to incorporate a call to TSRegister() for the new method. 20 21 Restricting the choices: 22 To prevent all of the methods from being registered and thus 23 save memory, copy this routine and modify it to register only 24 those methods you desire. Make sure that the replacement routine 25 is linked before libpetscts.a. 26 27 .keywords: TS, timestepper, register, all 28 29 .seealso: TSRegister(), TSRegisterDestroy() 30 @*/ 31 int TSRegisterAll() 32 { 33 TSRegisterAllCalled = 1; 34 35 TSRegister(TS_EULER, 0,"euler", TSCreate_Euler); 36 TSRegister(TS_BEULER, 0,"beuler", TSCreate_BEuler); 37 TSRegister(TS_PSEUDO, 0,"pseudo", TSCreate_Pseudo); 38 return 0; 39 } 40