Actual source code: slepcsys.h
slepc-3.10.1 2018-10-23
Report Typos and Errors

      1: /*
      2:    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
      3:    SLEPc - Scalable Library for Eigenvalue Problem Computations
      4:    Copyright (c) 2002-2018, 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: */
     10: /*
     11:    This include file contains definitions of system functions. It is included
     12:    by all other SLEPc include files.
     13: */

     18: /* ========================================================================== */
     19: /*
     20:    slepcconf.h is created by the configure script and placed in ${PETSC_ARCH}/include.
     21:    It contains macro definitions set at configure time.
     22: */
     23: #include <slepcconf.h>
     24: /*
     25:     slepcversion.h contains version info
     26: */
     27:  #include <slepcversion.h>
     28: #define SLEPC_AUTHOR_INFO "       The SLEPc Team\n    slepc-maint@upv.es\n http://slepc.upv.es\n"

     30: /* ========================================================================== */
     31: /*
     32:    The PETSc include files.
     33: */
     34: #include <petscmat.h>
     35: /*
     36:     slepcmath.h contains definition of basic math functions
     37: */
     38:  #include <slepcmath.h>
     39: /*
     40:     slepcsc.h contains definition of sorting criterion
     41: */
     42:  #include <slepcsc.h>
     43: /*
     44:     slepcmat.h, slepcvec.h contain utilities related to Mat and Vec, extend functionality in PETSc
     45: */
     46:  #include <slepcmat.h>
     47:  #include <slepcvec.h>

     49: /*
     50:     Creation and destruction of context for monitors of type XXXMonitorConverged
     51: */
     52: typedef struct _n_SlepcConvMonitor* SlepcConvMonitor;
     53: PETSC_EXTERN PetscErrorCode SlepcConvMonitorCreate(PetscViewer,PetscViewerFormat,SlepcConvMonitor*);
     54: PETSC_EXTERN PetscErrorCode SlepcConvMonitorDestroy(SlepcConvMonitor*);

     56: /*
     57:     Initialization of SLEPc and other system routines
     58: */
     59: PETSC_EXTERN PetscErrorCode SlepcInitialize(int*,char***,const char[],const char[]);
     60: PETSC_EXTERN PetscErrorCode SlepcInitializeNoPointers(int,char**,const char[],const char[]);
     61: PETSC_EXTERN PetscErrorCode SlepcInitializeNoArguments(void);
     62: PETSC_EXTERN PetscErrorCode SlepcFinalize(void);
     63: PETSC_EXTERN PetscErrorCode SlepcInitializeFortran(void);
     64: PETSC_EXTERN PetscErrorCode SlepcInitialized(PetscBool*);
     65: PETSC_EXTERN PetscErrorCode SlepcGetVersion(char[],size_t);
     66: PETSC_EXTERN PetscErrorCode SlepcGetVersionNumber(PetscInt*,PetscInt*,PetscInt*,PetscInt*);

     68: PETSC_EXTERN PetscErrorCode SlepcSNPrintfScalar(char*,size_t,PetscScalar,PetscBool);

     70: PETSC_DEPRECATED("Use MatCreateRedundantMatrix() followed by MatConvert()") PETSC_STATIC_INLINE PetscErrorCode SlepcMatConvertSeqDense(Mat mat,Mat *newmat) {
     72:   MatCreateRedundantMatrix(mat,0,PETSC_COMM_SELF,MAT_INITIAL_MATRIX,&Ar);
     73:   MatConvert(Ar,MATSEQDENSE,MAT_INITIAL_MATRIX,newmat);
     74:   MatDestroy(&Ar);
     75:   return(0);
     76: }
     77: PETSC_DEPRECATED("Use VecNormalizeComplex()") PETSC_STATIC_INLINE PetscErrorCode SlepcVecNormalize(Vec xr,Vec xi,PetscBool c,PetscReal *nrm) {return VecNormalizeComplex(xr,xi,c,nrm);}
     78: PETSC_DEPRECATED("Use VecCheckOrthogonality()") PETSC_STATIC_INLINE PetscErrorCode SlepcCheckOrthogonality(Vec *V,PetscInt nv,Vec *W,PetscInt nw,Mat B,PetscViewer viewer,PetscReal *lev) {return VecCheckOrthogonality(V,nv,W,nw,B,viewer,lev);}
     79: PETSC_DEPRECATED("Use MatCreateTile()") PETSC_STATIC_INLINE PetscErrorCode SlepcMatTile(PetscScalar a,Mat A,PetscScalar b,Mat B,PetscScalar c,Mat C,PetscScalar d,Mat D,Mat *G) {return MatCreateTile(a,A,b,B,c,C,d,D,G);}

     81: PETSC_EXTERN PetscBool SlepcInitializeCalled;

     83: #if defined(PETSC_USE_COMPLEX)
     84: #define SlepcLogFlopsComplex(a) PetscLogFlops((a))
     85: #else
     86: #define SlepcLogFlopsComplex(a) PetscLogFlops((4.0*a))
     87: #endif

     89: #endif