Date: 2023-01-26T12:18:40+00:00

Actual source code: petsc-interface.h
slepc-3.18.2 2023-01-26
Report Typos and Errors

      1: /* @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ */
      2: /* @@@ BLOPEX (version 1.1) LGPL Version 2.1 or above.See www.gnu.org. */
      3: /* @@@ Copyright 2010 BLOPEX team https://github.com/lobpcg/blopex     */
      4: /* @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ */

      6: #if !defined(PETSC_INTERFACE_HEADER)
      7: #define PETSC_INTERFACE_HEADER

      9: #include <interpreter.h>

     11: #if !defined(PETSC_USE_COMPLEX)
     12: BlopexInt PETSC_dpotrf_interface (char *uplo, BlopexInt *n, double *a, BlopexInt * lda, BlopexInt *info);
     13: BlopexInt PETSC_dsygv_interface (BlopexInt *itype, char *jobz, char *uplo, BlopexInt *
     14:                     n, double *a, BlopexInt *lda, double *b, BlopexInt *ldb,
     15:                     double *w, double *work, BlopexInt *lwork, BlopexInt *info);
     16: #else
     17: BlopexInt PETSC_zpotrf_interface (char *uplo, BlopexInt *n, komplex *a, BlopexInt * lda, BlopexInt *info);
     18: BlopexInt PETSC_zsygv_interface (BlopexInt *itype, char *jobz, char *uplo, BlopexInt *
     19:                     n, komplex *a, BlopexInt *lda, komplex *b, BlopexInt *ldb,
     20:                     double *w, komplex *work, BlopexInt *lwork, double *rwork, BlopexInt *info);
     21: #endif

     23: void *
     24: PETSC_MimicVector(void *vvector);

     26: BlopexInt
     27: PETSC_DestroyVector(void *vvector);

     29: BlopexInt
     30: PETSC_InnerProd(void *x, void *y, void *result);

     32: BlopexInt
     33: PETSC_CopyVector(void *x, void *y);

     35: BlopexInt
     36: PETSC_ClearVector(void *x);

     38: BlopexInt
     39: PETSC_SetRandomValues(void* v, BlopexInt seed);

     41: BlopexInt
     42: PETSC_ScaleVector(void *alpha, void   *x);

     44: BlopexInt
     45: PETSC_Axpy(void *alpha,
     46:                 void   *x,
     47:                 void   *y);

     49: int
     50: LOBPCG_InitRandomContext(MPI_Comm,PetscRandom);

     52: int
     53: LOBPCG_SetFromOptionsRandomContext(void);

     55: int
     56: LOBPCG_DestroyRandomContext(void);

     58: int
     59: PETSCSetupInterpreter(mv_InterfaceInterpreter *ii);

     61: #endif /* PETSC_INTERFACE_HEADER */