LCOV - code coverage report
Current view: top level - svd/interface - svdregis.c (source / functions) Hit Total Coverage
Test: SLEPc Lines: 25 25 100.0 %
Date: 2021-08-02 00:32:28 Functions: 2 2 100.0 %
Legend: Lines: hit not hit

          Line data    Source code
       1             : /*
       2             :    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
       3             :    SLEPc - Scalable Library for Eigenvalue Problem Computations
       4             :    Copyright (c) 2002-2021, 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/svdimpl.h>       /*I "slepcsvd.h" I*/
      12             : 
      13             : SLEPC_EXTERN PetscErrorCode SVDCreate_Cross(SVD);
      14             : SLEPC_EXTERN PetscErrorCode SVDCreate_Cyclic(SVD);
      15             : SLEPC_EXTERN PetscErrorCode SVDCreate_LAPACK(SVD);
      16             : SLEPC_EXTERN PetscErrorCode SVDCreate_Lanczos(SVD);
      17             : SLEPC_EXTERN PetscErrorCode SVDCreate_TRLanczos(SVD);
      18             : SLEPC_EXTERN PetscErrorCode SVDCreate_Randomized(SVD);
      19             : #if defined(SLEPC_HAVE_SCALAPACK)
      20             : SLEPC_EXTERN PetscErrorCode SVDCreate_ScaLAPACK(SVD);
      21             : #endif
      22             : #if defined(SLEPC_HAVE_ELEMENTAL)
      23             : SLEPC_EXTERN PetscErrorCode SVDCreate_Elemental(SVD);
      24             : #endif
      25             : #if defined(SLEPC_HAVE_PRIMME)
      26             : SLEPC_EXTERN PetscErrorCode SVDCreate_PRIMME(SVD);
      27             : #endif
      28             : 
      29             : /*@C
      30             :    SVDRegisterAll - Registers all the singular value solvers in the SVD package.
      31             : 
      32             :    Not Collective
      33             : 
      34             :    Level: advanced
      35             : 
      36             : .seealso:  SVDRegister()
      37             : @*/
      38         279 : PetscErrorCode SVDRegisterAll(void)
      39             : {
      40         279 :   PetscErrorCode ierr;
      41             : 
      42         279 :   PetscFunctionBegin;
      43         279 :   if (SVDRegisterAllCalled) PetscFunctionReturn(0);
      44         144 :   SVDRegisterAllCalled = PETSC_TRUE;
      45         144 :   ierr = SVDRegister(SVDCROSS,SVDCreate_Cross);CHKERRQ(ierr);
      46         144 :   ierr = SVDRegister(SVDCYCLIC,SVDCreate_Cyclic);CHKERRQ(ierr);
      47         144 :   ierr = SVDRegister(SVDLAPACK,SVDCreate_LAPACK);CHKERRQ(ierr);
      48         144 :   ierr = SVDRegister(SVDLANCZOS,SVDCreate_Lanczos);CHKERRQ(ierr);
      49         144 :   ierr = SVDRegister(SVDTRLANCZOS,SVDCreate_TRLanczos);CHKERRQ(ierr);
      50         144 :   ierr = SVDRegister(SVDRANDOMIZED,SVDCreate_Randomized);CHKERRQ(ierr);
      51             : #if defined(SLEPC_HAVE_SCALAPACK)
      52             :   ierr = SVDRegister(SVDSCALAPACK,SVDCreate_ScaLAPACK);CHKERRQ(ierr);
      53             : #endif
      54             : #if defined(SLEPC_HAVE_ELEMENTAL)
      55             :   ierr = SVDRegister(SVDELEMENTAL,SVDCreate_Elemental);CHKERRQ(ierr);
      56             : #endif
      57             : #if defined(SLEPC_HAVE_PRIMME)
      58         144 :   ierr = SVDRegister(SVDPRIMME,SVDCreate_PRIMME);CHKERRQ(ierr);
      59             : #endif
      60         144 :   PetscFunctionReturn(0);
      61             : }
      62             : 
      63             : /*@C
      64             :   SVDMonitorRegisterAll - Registers all the monitors in the SVD package.
      65             : 
      66             :   Not Collective
      67             : 
      68             :   Level: advanced
      69             : @*/
      70         144 : PetscErrorCode SVDMonitorRegisterAll(void)
      71             : {
      72         144 :   PetscErrorCode ierr;
      73             : 
      74         144 :   PetscFunctionBegin;
      75         144 :   if (SVDMonitorRegisterAllCalled) PetscFunctionReturn(0);
      76         144 :   SVDMonitorRegisterAllCalled = PETSC_TRUE;
      77             : 
      78         144 :   ierr = SVDMonitorRegister("first_approximation",PETSCVIEWERASCII,PETSC_VIEWER_DEFAULT,SVDMonitorFirst,NULL,NULL);CHKERRQ(ierr);
      79         144 :   ierr = SVDMonitorRegister("first_approximation",PETSCVIEWERDRAW,PETSC_VIEWER_DRAW_LG,SVDMonitorFirstDrawLG,SVDMonitorFirstDrawLGCreate,NULL);CHKERRQ(ierr);
      80         144 :   ierr = SVDMonitorRegister("all_approximations",PETSCVIEWERASCII,PETSC_VIEWER_DEFAULT,SVDMonitorAll,NULL,NULL);CHKERRQ(ierr);
      81         144 :   ierr = SVDMonitorRegister("all_approximations",PETSCVIEWERDRAW,PETSC_VIEWER_DRAW_LG,SVDMonitorAllDrawLG,SVDMonitorAllDrawLGCreate,NULL);CHKERRQ(ierr);
      82         144 :   ierr = SVDMonitorRegister("convergence_history",PETSCVIEWERASCII,PETSC_VIEWER_DEFAULT,SVDMonitorConverged,SVDMonitorConvergedCreate,SVDMonitorConvergedDestroy);CHKERRQ(ierr);
      83         144 :   ierr = SVDMonitorRegister("convergence_history",PETSCVIEWERDRAW,PETSC_VIEWER_DRAW_LG,SVDMonitorConvergedDrawLG,SVDMonitorConvergedDrawLGCreate,SVDMonitorConvergedDestroy);CHKERRQ(ierr);
      84         144 :   PetscFunctionReturn(0);
      85             : }
      86             : 

Generated by: LCOV version 1.14