1: /*
  2:    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
  3:    SLEPc - Scalable Library for Eigenvalue Problem Computations
  4:    Copyright (c) 2002-, 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: {
 64:   if (EPSRegisterAllCalled) PetscFunctionReturn(0);
 65:   EPSRegisterAllCalled = PETSC_TRUE;
 66:   EPSRegister(EPSPOWER,EPSCreate_Power);
 67:   EPSRegister(EPSSUBSPACE,EPSCreate_Subspace);
 68:   EPSRegister(EPSARNOLDI,EPSCreate_Arnoldi);
 69:   EPSRegister(EPSLANCZOS,EPSCreate_Lanczos);
 70:   EPSRegister(EPSKRYLOVSCHUR,EPSCreate_KrylovSchur);
 71:   EPSRegister(EPSGD,EPSCreate_GD);
 72:   EPSRegister(EPSJD,EPSCreate_JD);
 73:   EPSRegister(EPSRQCG,EPSCreate_RQCG);
 74:   EPSRegister(EPSLOBPCG,EPSCreate_LOBPCG);
 75:   EPSRegister(EPSCISS,EPSCreate_CISS);
 76:   EPSRegister(EPSLYAPII,EPSCreate_LyapII);
 77:   EPSRegister(EPSLAPACK,EPSCreate_LAPACK);
 78: #if defined(SLEPC_HAVE_ARPACK)
 79:   EPSRegister(EPSARPACK,EPSCreate_ARPACK);
 80: #endif
 81: #if defined(SLEPC_HAVE_TRLAN)
 82:   EPSRegister(EPSTRLAN,EPSCreate_TRLAN);
 83: #endif
 84: #if defined(SLEPC_HAVE_BLOPEX)
 85:   EPSRegister(EPSBLOPEX,EPSCreate_BLOPEX);
 86: #endif
 87: #if defined(SLEPC_HAVE_PRIMME)
 88:   EPSRegister(EPSPRIMME,EPSCreate_PRIMME);
 89: #endif
 90: #if defined(SLEPC_HAVE_FEAST)
 91:   EPSRegister(EPSFEAST,EPSCreate_FEAST);
 92: #endif
 93: #if defined(SLEPC_HAVE_SCALAPACK)
 94:   EPSRegister(EPSSCALAPACK,EPSCreate_ScaLAPACK);
 95: #endif
 96: #if defined(SLEPC_HAVE_ELPA)
 97:   EPSRegister(EPSELPA,EPSCreate_ELPA);
 98: #endif
 99: #if defined(SLEPC_HAVE_ELEMENTAL)
100:   EPSRegister(EPSELEMENTAL,EPSCreate_Elemental);
101: #endif
102: #if defined(SLEPC_HAVE_EVSL)
103:   EPSRegister(EPSEVSL,EPSCreate_EVSL);
104: #endif
105:   PetscFunctionReturn(0);
106: }

108: /*@C
109:   EPSMonitorRegisterAll - Registers all the monitors in the EPS package.

111:   Not Collective

113:   Level: advanced

115: .seealso: EPSMonitorRegister()
116: @*/
117: PetscErrorCode EPSMonitorRegisterAll(void)
118: {
119:   if (EPSMonitorRegisterAllCalled) PetscFunctionReturn(0);
120:   EPSMonitorRegisterAllCalled = PETSC_TRUE;

122:   EPSMonitorRegister("first_approximation",PETSCVIEWERASCII,PETSC_VIEWER_DEFAULT,EPSMonitorFirst,NULL,NULL);
123:   EPSMonitorRegister("first_approximation",PETSCVIEWERDRAW,PETSC_VIEWER_DRAW_LG,EPSMonitorFirstDrawLG,EPSMonitorFirstDrawLGCreate,NULL);
124:   EPSMonitorRegister("all_approximations",PETSCVIEWERASCII,PETSC_VIEWER_DEFAULT,EPSMonitorAll,NULL,NULL);
125:   EPSMonitorRegister("all_approximations",PETSCVIEWERDRAW,PETSC_VIEWER_DRAW_LG,EPSMonitorAllDrawLG,EPSMonitorAllDrawLGCreate,NULL);
126:   EPSMonitorRegister("convergence_history",PETSCVIEWERASCII,PETSC_VIEWER_DEFAULT,EPSMonitorConverged,EPSMonitorConvergedCreate,EPSMonitorConvergedDestroy);
127:   EPSMonitorRegister("convergence_history",PETSCVIEWERDRAW,PETSC_VIEWER_DRAW_LG,EPSMonitorConvergedDrawLG,EPSMonitorConvergedDrawLGCreate,EPSMonitorConvergedDestroy);
128:   PetscFunctionReturn(0);
129: }