| Line 22... |
Line 22... |
*/
|
*/
|
|
|
#include <private/svdimpl.h> /*I "slepcsvd.h" I*/
|
#include <private/svdimpl.h> /*I "slepcsvd.h" I*/
|
|
|
PetscFList SVDList = 0;
|
PetscFList SVDList = 0;
|
|
PetscBool SVDRegisterAllCalled = PETSC_FALSE;
|
PetscClassId SVD_CLASSID = 0;
|
PetscClassId SVD_CLASSID = 0;
|
PetscLogEvent SVD_SetUp = 0,SVD_Solve = 0,SVD_Dense = 0;
|
PetscLogEvent SVD_SetUp = 0,SVD_Solve = 0,SVD_Dense = 0;
|
static PetscBool SVDPackageInitialized = PETSC_FALSE;
|
static PetscBool SVDPackageInitialized = PETSC_FALSE;
|
|
|
#undef __FUNCT__
|
#undef __FUNCT__
|
| Line 41... |
Line 42... |
PetscErrorCode SVDFinalizePackage(void)
|
PetscErrorCode SVDFinalizePackage(void)
|
{
|
{
|
PetscFunctionBegin;
|
PetscFunctionBegin;
|
SVDPackageInitialized = PETSC_FALSE;
|
SVDPackageInitialized = PETSC_FALSE;
|
SVDList = 0;
|
SVDList = 0;
|
|
SVDRegisterAllCalled = PETSC_FALSE;
|
PetscFunctionReturn(0);
|
PetscFunctionReturn(0);
|
}
|
}
|
|
|
#undef __FUNCT__
|
#undef __FUNCT__
|
#define __FUNCT__ "SVDInitializePackage"
|
#define __FUNCT__ "SVDInitializePackage"
|
| Line 430... |
Line 432... |
{
|
{
|
PetscErrorCode ierr;
|
PetscErrorCode ierr;
|
|
|
PetscFunctionBegin;
|
PetscFunctionBegin;
|
ierr = PetscFListDestroy(&SVDList);CHKERRQ(ierr);
|
ierr = PetscFListDestroy(&SVDList);CHKERRQ(ierr);
|
ierr = SVDRegisterAll(PETSC_NULL);CHKERRQ(ierr);
|
SVDRegisterAllCalled = PETSC_FALSE;
|
PetscFunctionReturn(0);
|
PetscFunctionReturn(0);
|
}
|
}
|
|
|
#undef __FUNCT__
|
#undef __FUNCT__
|
#define __FUNCT__ "SVDSetIP"
|
#define __FUNCT__ "SVDSetIP"
|