1a5eb4965SSatish Balay #ifdef PETSC_RCS_HEADER 2*fb2e594dSBarry Smith static char vcid[] = "$Id: tsregall.c,v 1.20 1998/07/27 21:55:09 balay Exp bsmith $"; 3eb293426SBarry Smith #endif 4eb293426SBarry Smith 5eb293426SBarry Smith #include "src/ts/tsimpl.h" /*I "ts.h" I*/ 6*fb2e594dSBarry Smith EXTERN_C_BEGIN 7eb293426SBarry Smith extern int TSCreate_Euler(TS); 8eb293426SBarry Smith extern int TSCreate_BEuler(TS); 9eb293426SBarry Smith extern int TSCreate_Pseudo(TS); 103914022bSBarry Smith extern int TSCreate_PVode(TS); 115b12fa75SSatish Balay extern int TSCreate_CN(TS); 12*fb2e594dSBarry Smith EXTERN_C_END 13eb293426SBarry Smith 145615d1e5SSatish Balay #undef __FUNC__ 15d4bb536fSBarry Smith #define __FUNC__ "TSRegisterAll" 16eb293426SBarry Smith /*@C 17eb293426SBarry Smith TSRegisterAll - Registers all of the timesteppers in the TS 18eb293426SBarry Smith package. 19eb293426SBarry Smith 20fee21e36SBarry Smith Not Collective 21fee21e36SBarry Smith 22fb4a63b6SLois Curfman McInnes .keywords: TS, timestepper, register, all 23eb293426SBarry Smith 2482bf6240SBarry Smith .seealso: TSRegisterDestroy() 25eb293426SBarry Smith @*/ 2682bf6240SBarry Smith int TSRegisterAll(char *path) 27eb293426SBarry Smith { 283a40ed3dSBarry Smith PetscFunctionBegin; 2984cb2905SBarry Smith TSRegisterAllCalled = 1; 3084cb2905SBarry Smith 3182bf6240SBarry Smith TSRegister(TS_EULER, path,"TSCreate_Euler", TSCreate_Euler); 3282bf6240SBarry Smith TSRegister(TS_BEULER, path,"TSCreate_BEuler",TSCreate_BEuler); 3367d5d79cSLois Curfman McInnes TSRegister(TS_CRANK_NICHOLSON, path,"TSCreate_CN",TSCreate_CN); 3482bf6240SBarry Smith TSRegister(TS_PSEUDO, path,"TSCreate_Pseudo",TSCreate_Pseudo); 35a5020ba8SBarry Smith #if defined(HAVE_PVODE) && !defined(__cplusplus) 3682bf6240SBarry Smith TSRegister(TS_PVODE, path,"TSCreate_PVode", TSCreate_PVode); 373914022bSBarry Smith #endif 383a40ed3dSBarry Smith PetscFunctionReturn(0); 39eb293426SBarry Smith } 40