xref: /petsc/src/ts/interface/tsregall.c (revision 606d414c6e034e02e67059b83ebaefc3ebe99698)
1 #ifdef PETSC_RCS_HEADER
2 static char vcid[] = "$Id: tsregall.c,v 1.22 1999/02/01 03:42:09 curfman Exp bsmith $";
3 #endif
4 
5 #include "src/ts/tsimpl.h"     /*I  "ts.h"  I*/
6 EXTERN_C_BEGIN
7 extern int TSCreate_Euler(TS);
8 extern int TSCreate_BEuler(TS);
9 extern int TSCreate_Pseudo(TS);
10 extern int TSCreate_PVode(TS);
11 extern int TSCreate_CN(TS);
12 EXTERN_C_END
13 
14 #undef __FUNC__
15 #define __FUNC__ "TSRegisterAll"
16 /*@C
17    TSRegisterAll - Registers all of the timesteppers in the TS package.
18 
19    Not Collective
20 
21    Level: advanced
22 
23 .keywords: TS, timestepper, register, all
24 
25 .seealso: TSRegisterDestroy()
26 @*/
27 int TSRegisterAll(char *path)
28 {
29   PetscFunctionBegin;
30   TSRegisterAllCalled = 1;
31 
32   TSRegister(TS_EULER,               path,"TSCreate_Euler", TSCreate_Euler);
33   TSRegister(TS_BEULER,              path,"TSCreate_BEuler",TSCreate_BEuler);
34   TSRegister(TS_CRANK_NICHOLSON,     path,"TSCreate_CN",TSCreate_CN);
35   TSRegister(TS_PSEUDO,              path,"TSCreate_Pseudo",TSCreate_Pseudo);
36 #if defined(PETSC_HAVE_PVODE) && !defined(__cplusplus)
37   TSRegister(TS_PVODE,               path,"TSCreate_PVode", TSCreate_PVode);
38 #endif
39   PetscFunctionReturn(0);
40 }
41