Subversion Repositories slepc-dev

Rev

Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
1376 slepc 1
/*
2
   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
3
      SLEPc - Scalable Library for Eigenvalue Problem Computations
4
      Copyright (c) 2002-2007, Universidad Politecnica de Valencia, Spain
5
 
6
      This file is part of SLEPc. See the README file for conditions of use
7
      and additional information.
8
   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
9
*/
10
 
1302 slepc 11
#if !defined(__SLEPCIP_H)
12
#define __SLEPCIP_H
13
#include "slepc.h"
14
PETSC_EXTERN_CXX_BEGIN
15
 
1345 slepc 16
extern PetscCookie IP_COOKIE;
17
 
1364 slepc 18
/*E
19
    IPOrthogonalizationType - determines what type of orthogonalization to use
20
 
21
    Level: advanced
22
 
23
.seealso: IPSetOrthogonalization(), IPGetOrthogonalization(), IPOrthogonalize()
24
E*/
1302 slepc 25
typedef enum { IP_MGS_ORTH,  IP_CGS_ORTH } IPOrthogonalizationType;
1364 slepc 26
 
27
/*E
28
    IPOrthogonalizationRefinementType - determines what type of refinement
29
    to use during orthogonalization
30
 
31
    Level: advanced
32
 
33
.seealso: IPSetOrthogonalization(), IPGetOrthogonalization(), IPOrthogonalize()
34
E*/
1302 slepc 35
typedef enum { IP_ORTH_REFINE_NEVER, IP_ORTH_REFINE_IFNEEDED,
36
               IP_ORTH_REFINE_ALWAYS } IPOrthogonalizationRefinementType;
37
 
1364 slepc 38
/*S
39
     IP - Abstraction of a vector inner product, that can be defined
40
     in different ways. Using this object is not required for application
41
     programmers.
42
 
43
   Level: beginner
44
 
45
.seealso:  IPCreate()
46
S*/
1302 slepc 47
typedef struct _p_IP* IP;
48
 
49
EXTERN PetscErrorCode IPInitializePackage(char *path);
50
EXTERN PetscErrorCode IPCreate(MPI_Comm,IP*);
1316 slepc 51
EXTERN PetscErrorCode IPSetOptionsPrefix(IP,const char *);
1302 slepc 52
EXTERN PetscErrorCode IPAppendOptionsPrefix(IP,const char *);
53
EXTERN PetscErrorCode IPSetFromOptions(IP);
54
EXTERN PetscErrorCode IPSetOrthogonalization(IP,IPOrthogonalizationType,IPOrthogonalizationRefinementType,PetscReal);
55
EXTERN PetscErrorCode IPGetOrthogonalization(IP,IPOrthogonalizationType*,IPOrthogonalizationRefinementType*,PetscReal*);
56
EXTERN PetscErrorCode IPView(IP,PetscViewer);
57
EXTERN PetscErrorCode IPDestroy(IP);
58
 
1329 slepc 59
EXTERN PetscErrorCode IPOrthogonalize(IP,int,PetscTruth*,Vec*,Vec,PetscScalar*,PetscReal*,PetscTruth*,Vec);
60
EXTERN PetscErrorCode IPOrthogonalizeCGS(IP,int,PetscTruth*,Vec*,Vec,PetscScalar*,PetscReal*,PetscReal*,Vec);
1345 slepc 61
EXTERN PetscErrorCode IPBiOrthogonalize(IP,int,Vec*,Vec*,Vec,PetscScalar*,PetscReal*);
62
EXTERN PetscErrorCode IPQRDecomposition(IP,Vec*,int,int,PetscScalar*,int,Vec);
1302 slepc 63
 
1364 slepc 64
/*E
65
    IPBilinearForm - determines the type of bilinear/sesquilinear form
66
 
67
    Level: developer
68
 
69
.seealso: IPSetBilinearForm(), IPGetBilinearForm()
70
E*/
1329 slepc 71
typedef enum { IPINNER_HERMITIAN, IPINNER_SYMMETRIC } IPBilinearForm;
72
EXTERN PetscErrorCode IPSetBilinearForm(IP,Mat,IPBilinearForm);
73
EXTERN PetscErrorCode IPGetBilinearForm(IP,Mat*,IPBilinearForm*);
74
EXTERN PetscErrorCode IPApplyMatrix(IP,Vec,Vec);
1302 slepc 75
 
76
EXTERN PetscErrorCode IPInnerProduct(IP ip,Vec,Vec,PetscScalar*);
77
EXTERN PetscErrorCode IPInnerProductBegin(IP ip,Vec,Vec,PetscScalar*);
78
EXTERN PetscErrorCode IPInnerProductEnd(IP ip,Vec,Vec,PetscScalar*);
1381 slepc 79
EXTERN PetscErrorCode IPMInnerProduct(IP ip,Vec,PetscInt,const Vec[],PetscScalar*);
80
EXTERN PetscErrorCode IPMInnerProductBegin(IP ip,Vec,PetscInt,const Vec[],PetscScalar*);
81
EXTERN PetscErrorCode IPMInnerProductEnd(IP ip,Vec,PetscInt,const Vec[],PetscScalar*);
1302 slepc 82
EXTERN PetscErrorCode IPNorm(IP ip,Vec,PetscReal*);
83
EXTERN PetscErrorCode IPNormBegin(IP ip,Vec,PetscReal*);
84
EXTERN PetscErrorCode IPNormEnd(IP ip,Vec,PetscReal*);
85
 
1329 slepc 86
EXTERN PetscErrorCode IPGetOperationCounters(IP,int*);
87
EXTERN PetscErrorCode IPResetOperationCounters(IP);
88
 
1302 slepc 89
PETSC_EXTERN_CXX_END
90
#endif