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