Actual source code: epsregis.c

slepc-3.16.0 2021-09-30
Report Typos and Errors
  1: /*
  2:    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
  3:    SLEPc - Scalable Library for Eigenvalue Problem Computations
  4:    Copyright (c) 2002-2021, Universitat Politecnica de Valencia, Spain

  6:    This file is part of SLEPc.
  7:    SLEPc is distributed under a 2-clause BSD license (see LICENSE).
  8:    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
  9: */

 11: #include <slepc/private/epsimpl.h>

 13: SLEPC_EXTERN PetscErrorCode EPSCreate_Power(EPS);
 14: SLEPC_EXTERN PetscErrorCode EPSCreate_Subspace(EPS);
 15: SLEPC_EXTERN PetscErrorCode EPSCreate_Arnoldi(EPS);
 16: SLEPC_EXTERN PetscErrorCode EPSCreate_Lanczos(EPS);
 17: SLEPC_EXTERN PetscErrorCode EPSCreate_KrylovSchur(EPS);
 18: SLEPC_EXTERN PetscErrorCode EPSCreate_GD(EPS);
 19: SLEPC_EXTERN PetscErrorCode EPSCreate_JD(EPS);
 20: SLEPC_EXTERN PetscErrorCode EPSCreate_RQCG(EPS);
 21: SLEPC_EXTERN PetscErrorCode EPSCreate_LOBPCG(EPS);
 22: SLEPC_EXTERN PetscErrorCode EPSCreate_CISS(EPS);
 23: SLEPC_EXTERN PetscErrorCode EPSCreate_LyapII(EPS);
 24: SLEPC_EXTERN PetscErrorCode EPSCreate_LAPACK(EPS);
 25: #if defined(SLEPC_HAVE_ARPACK)
 26: SLEPC_EXTERN PetscErrorCode EPSCreate_ARPACK(EPS);
 27: #endif
 28: #if defined(SLEPC_HAVE_TRLAN)
 29: SLEPC_EXTERN PetscErrorCode EPSCreate_TRLAN(EPS);
 30: #endif
 31: #if defined(SLEPC_HAVE_BLOPEX)
 32: SLEPC_EXTERN PetscErrorCode EPSCreate_BLOPEX(EPS);
 33: #endif
 34: #if defined(SLEPC_HAVE_PRIMME)
 35: SLEPC_EXTERN PetscErrorCode EPSCreate_PRIMME(EPS);
 36: #endif
 37: #if defined(SLEPC_HAVE_FEAST)
 38: SLEPC_EXTERN PetscErrorCode EPSCreate_FEAST(EPS);
 39: #endif
 40: #if defined(SLEPC_HAVE_SCALAPACK)
 41: SLEPC_EXTERN PetscErrorCode EPSCreate_ScaLAPACK(EPS);
 42: #endif
 43: #if defined(SLEPC_HAVE_ELPA)
 44: SLEPC_EXTERN PetscErrorCode EPSCreate_ELPA(EPS);
 45: #endif
 46: #if defined(SLEPC_HAVE_ELEMENTAL)
 47: SLEPC_EXTERN PetscErrorCode EPSCreate_Elemental(EPS);
 48: #endif
 49: #if defined(SLEPC_HAVE_EVSL)
 50: SLEPC_EXTERN PetscErrorCode EPSCreate_EVSL(EPS);
 51: #endif

 53: /*@C
 54:   EPSRegisterAll - Registers all the eigenvalue solvers in the EPS package.

 56:   Not Collective

 58:   Level: advanced

 60: .seealso:  EPSRegister()
 61: @*/
 62: PetscErrorCode EPSRegisterAll(void)
 63: {

 67:   if (EPSRegisterAllCalled) return(0);
 68:   EPSRegisterAllCalled = PETSC_TRUE;
 69:   EPSRegister(EPSPOWER,EPSCreate_Power);
 70:   EPSRegister(EPSSUBSPACE,EPSCreate_Subspace);
 71:   EPSRegister(EPSARNOLDI,EPSCreate_Arnoldi);
 72:   EPSRegister(EPSLANCZOS,EPSCreate_Lanczos);
 73:   EPSRegister(EPSKRYLOVSCHUR,EPSCreate_KrylovSchur);
 74:   EPSRegister(EPSGD,EPSCreate_GD);
 75:   EPSRegister(EPSJD,EPSCreate_JD);
 76:   EPSRegister(EPSRQCG,EPSCreate_RQCG);
 77:   EPSRegister(EPSLOBPCG,EPSCreate_LOBPCG);
 78:   EPSRegister(EPSCISS,EPSCreate_CISS);
 79:   EPSRegister(EPSLYAPII,EPSCreate_LyapII);
 80:   EPSRegister(EPSLAPACK,EPSCreate_LAPACK);
 81: #if defined(SLEPC_HAVE_ARPACK)
 82:   EPSRegister(EPSARPACK,EPSCreate_ARPACK);
 83: #endif
 84: #if defined(SLEPC_HAVE_TRLAN)
 85:   EPSRegister(EPSTRLAN,EPSCreate_TRLAN);
 86: #endif
 87: #if defined(SLEPC_HAVE_BLOPEX)
 88:   EPSRegister(EPSBLOPEX,EPSCreate_BLOPEX);
 89: #endif
 90: #if defined(SLEPC_HAVE_PRIMME)
 91:   EPSRegister(EPSPRIMME,EPSCreate_PRIMME);
 92: #endif
 93: #if defined(SLEPC_HAVE_FEAST)
 94:   EPSRegister(EPSFEAST,EPSCreate_FEAST);
 95: #endif
 96: #if defined(SLEPC_HAVE_SCALAPACK)
 97:   EPSRegister(EPSSCALAPACK,EPSCreate_ScaLAPACK);
 98: #endif
 99: #if defined(SLEPC_HAVE_ELPA)
100:   EPSRegister(EPSELPA,EPSCreate_ELPA);
101: #endif
102: #if defined(SLEPC_HAVE_ELEMENTAL)
103:   EPSRegister(EPSELEMENTAL,EPSCreate_Elemental);
104: #endif
105: #if defined(SLEPC_HAVE_EVSL)
106:   EPSRegister(EPSEVSL,EPSCreate_EVSL);
107: #endif
108:   return(0);
109: }

111: /*@C
112:   EPSMonitorRegisterAll - Registers all the monitors in the EPS package.

114:   Not Collective

116:   Level: advanced
117: @*/
118: PetscErrorCode EPSMonitorRegisterAll(void)
119: {

123:   if (EPSMonitorRegisterAllCalled) return(0);
124:   EPSMonitorRegisterAllCalled = PETSC_TRUE;

126:   EPSMonitorRegister("first_approximation",PETSCVIEWERASCII,PETSC_VIEWER_DEFAULT,EPSMonitorFirst,NULL,NULL);
127:   EPSMonitorRegister("first_approximation",PETSCVIEWERDRAW,PETSC_VIEWER_DRAW_LG,EPSMonitorFirstDrawLG,EPSMonitorFirstDrawLGCreate,NULL);
128:   EPSMonitorRegister("all_approximations",PETSCVIEWERASCII,PETSC_VIEWER_DEFAULT,EPSMonitorAll,NULL,NULL);
129:   EPSMonitorRegister("all_approximations",PETSCVIEWERDRAW,PETSC_VIEWER_DRAW_LG,EPSMonitorAllDrawLG,EPSMonitorAllDrawLGCreate,NULL);
130:   EPSMonitorRegister("convergence_history",PETSCVIEWERASCII,PETSC_VIEWER_DEFAULT,EPSMonitorConverged,EPSMonitorConvergedCreate,EPSMonitorConvergedDestroy);
131:   EPSMonitorRegister("convergence_history",PETSCVIEWERDRAW,PETSC_VIEWER_DRAW_LG,EPSMonitorConvergedDrawLG,EPSMonitorConvergedDrawLGCreate,EPSMonitorConvergedDestroy);
132:   return(0);
133: }