1*63dd3a1aSKris Buschelman #define PETSCTS_DLL 2eb293426SBarry Smith 3e090d566SSatish Balay #include "src/ts/tsimpl.h" /*I "petscts.h" I*/ 4fb2e594dSBarry Smith EXTERN_C_BEGIN 5*63dd3a1aSKris Buschelman EXTERN PetscErrorCode PETSCTS_DLLEXPORT TSCreate_Euler(TS); 6*63dd3a1aSKris Buschelman EXTERN PetscErrorCode PETSCTS_DLLEXPORT TSCreate_BEuler(TS); 7*63dd3a1aSKris Buschelman EXTERN PetscErrorCode PETSCTS_DLLEXPORT TSCreate_Pseudo(TS); 8*63dd3a1aSKris Buschelman EXTERN PetscErrorCode PETSCTS_DLLEXPORT TSCreate_PVode(TS); 9*63dd3a1aSKris Buschelman EXTERN PetscErrorCode PETSCTS_DLLEXPORT TSCreate_CN(TS); 10*63dd3a1aSKris Buschelman EXTERN PetscErrorCode PETSCTS_DLLEXPORT TSCreate_Rk(TS); 11fb2e594dSBarry Smith EXTERN_C_END 12eb293426SBarry Smith 134a2ae208SSatish Balay #undef __FUNCT__ 144a2ae208SSatish Balay #define __FUNCT__ "TSRegisterAll" 15eb293426SBarry Smith /*@C 16d5d37b61SLois Curfman McInnes TSRegisterAll - Registers all of the timesteppers in the TS package. 17eb293426SBarry Smith 18fee21e36SBarry Smith Not Collective 19fee21e36SBarry Smith 20bdad233fSMatthew Knepley Input parameter: 21bdad233fSMatthew Knepley . path - The dynamic library path 22bdad233fSMatthew Knepley 23d5d37b61SLois Curfman McInnes Level: advanced 24d5d37b61SLois Curfman McInnes 25fb4a63b6SLois Curfman McInnes .keywords: TS, timestepper, register, all 263cea93caSBarry Smith .seealso: TSCreate(), TSRegister(), TSRegisterDestroy(), TSRegisterDynamic() 27eb293426SBarry Smith @*/ 28*63dd3a1aSKris Buschelman PetscErrorCode PETSCTS_DLLEXPORT TSRegisterAll(const char path[]) 29eb293426SBarry Smith { 30dfbe8321SBarry Smith PetscErrorCode ierr; 31bdad233fSMatthew Knepley 323a40ed3dSBarry Smith PetscFunctionBegin; 334c49b128SBarry Smith TSRegisterAllCalled = PETSC_TRUE; 3484cb2905SBarry Smith 35bdad233fSMatthew Knepley ierr = TSRegisterDynamic(TS_EULER, path, "TSCreate_Euler", TSCreate_Euler);CHKERRQ(ierr); 36bdad233fSMatthew Knepley ierr = TSRegisterDynamic(TS_BEULER, path, "TSCreate_BEuler",TSCreate_BEuler);CHKERRQ(ierr); 37bdad233fSMatthew Knepley ierr = TSRegisterDynamic(TS_CRANK_NICHOLSON, path, "TSCreate_CN", TSCreate_CN);CHKERRQ(ierr); 38bdad233fSMatthew Knepley ierr = TSRegisterDynamic(TS_PSEUDO, path, "TSCreate_Pseudo", TSCreate_Pseudo);CHKERRQ(ierr); 392515c552SBarry Smith #if defined(PETSC_HAVE_PVODE) 40bdad233fSMatthew Knepley ierr = TSRegisterDynamic(TS_PVODE, path, "TSCreate_PVode", TSCreate_PVode);CHKERRQ(ierr); 413914022bSBarry Smith #endif 42e4dd521cSBarry Smith ierr = TSRegisterDynamic(TS_RUNGE_KUTTA, path, "TSCreate_Rk", TSCreate_Rk);CHKERRQ(ierr); 433a40ed3dSBarry Smith PetscFunctionReturn(0); 44eb293426SBarry Smith } 45bdad233fSMatthew Knepley 46