1a5eb4965SSatish Balay #ifdef PETSC_RCS_HEADER 2*67d5d79cSLois Curfman McInnes static char vcid[] = "$Id: tsregall.c,v 1.18 1998/04/22 14:24:17 curfman Exp curfman $"; 3eb293426SBarry Smith #endif 4eb293426SBarry Smith 5eb293426SBarry Smith #include "src/ts/tsimpl.h" /*I "ts.h" I*/ 6eb293426SBarry Smith extern int TSCreate_Euler(TS); 7eb293426SBarry Smith extern int TSCreate_BEuler(TS); 8eb293426SBarry Smith extern int TSCreate_Pseudo(TS); 93914022bSBarry Smith extern int TSCreate_PVode(TS); 10eb293426SBarry Smith 115615d1e5SSatish Balay #undef __FUNC__ 12d4bb536fSBarry Smith #define __FUNC__ "TSRegisterAll" 13eb293426SBarry Smith /*@C 14eb293426SBarry Smith TSRegisterAll - Registers all of the timesteppers in the TS 15eb293426SBarry Smith package. 16eb293426SBarry Smith 17fee21e36SBarry Smith Not Collective 18fee21e36SBarry Smith 19fb4a63b6SLois Curfman McInnes .keywords: TS, timestepper, register, all 20eb293426SBarry Smith 2182bf6240SBarry Smith .seealso: TSRegisterDestroy() 22eb293426SBarry Smith @*/ 2382bf6240SBarry Smith int TSRegisterAll(char *path) 24eb293426SBarry Smith { 253a40ed3dSBarry Smith PetscFunctionBegin; 2684cb2905SBarry Smith TSRegisterAllCalled = 1; 2784cb2905SBarry Smith 2882bf6240SBarry Smith TSRegister(TS_EULER, path,"TSCreate_Euler", TSCreate_Euler); 2982bf6240SBarry Smith TSRegister(TS_BEULER, path,"TSCreate_BEuler",TSCreate_BEuler); 30*67d5d79cSLois Curfman McInnes TSRegister(TS_CRANK_NICHOLSON, path,"TSCreate_CN",TSCreate_CN); 3182bf6240SBarry Smith TSRegister(TS_PSEUDO, path,"TSCreate_Pseudo",TSCreate_Pseudo); 32a5020ba8SBarry Smith #if defined(HAVE_PVODE) && !defined(__cplusplus) 3382bf6240SBarry Smith TSRegister(TS_PVODE, path,"TSCreate_PVode", TSCreate_PVode); 343914022bSBarry Smith #endif 353a40ed3dSBarry Smith PetscFunctionReturn(0); 36eb293426SBarry Smith } 37