Line data    Source code

       1             : /*
       2             :    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
       3             :    SLEPc - Scalable Library for Eigenvalue Problem Computations
       4             :    Copyright (c) 2002-, Universitat Politecnica de Valencia, Spain
       5             : 
       6             :    This file is part of SLEPc.
       7             :    SLEPc is distributed under a 2-clause BSD license (see LICENSE).
       8             :    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
       9             : */
      10             : 
      11             : #include <slepc/private/stimpl.h>          /*I   "slepcst.h"   I*/
      12             : 
      13             : SLEPC_EXTERN PetscErrorCode STCreate_Shell(ST);
      14             : SLEPC_EXTERN PetscErrorCode STCreate_Shift(ST);
      15             : SLEPC_EXTERN PetscErrorCode STCreate_Sinvert(ST);
      16             : SLEPC_EXTERN PetscErrorCode STCreate_Cayley(ST);
      17             : SLEPC_EXTERN PetscErrorCode STCreate_Precond(ST);
      18             : SLEPC_EXTERN PetscErrorCode STCreate_Filter(ST);
      19             : 
      20             : /*@C
      21             :    STRegisterAll - Registers all of the spectral transformations in the ST package.
      22             : 
      23             :    Not Collective
      24             : 
      25             :    Level: advanced
      26             : 
      27             : .seealso: STRegister()
      28             : @*/
      29        1510 : PetscErrorCode STRegisterAll(void)
      30             : {
      31        1510 :   PetscFunctionBegin;
      32        1510 :   if (STRegisterAllCalled) PetscFunctionReturn(PETSC_SUCCESS);
      33         728 :   STRegisterAllCalled = PETSC_TRUE;
      34         728 :   PetscCall(STRegister(STSHELL,STCreate_Shell));
      35         728 :   PetscCall(STRegister(STSHIFT,STCreate_Shift));
      36         728 :   PetscCall(STRegister(STSINVERT,STCreate_Sinvert));
      37         728 :   PetscCall(STRegister(STCAYLEY,STCreate_Cayley));
      38         728 :   PetscCall(STRegister(STPRECOND,STCreate_Precond));
      39         728 :   PetscCall(STRegister(STFILTER,STCreate_Filter));
      40         728 :   PetscFunctionReturn(PETSC_SUCCESS);
      41             : }