/trunk/include/slepcvec.h
New file
0,0 → 1,41
| /* |
| User interface for vectors composed by vectors. |
| |
| - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - |
| SLEPc - Scalable Library for Eigenvalue Problem Computations |
| Copyright (c) 2002-2010, Universidad Politecnica de Valencia, Spain |
| |
| This file is part of SLEPc. |
| |
| SLEPc is free software: you can redistribute it and/or modify it under the |
| terms of version 3 of the GNU Lesser General Public License as published by |
| the Free Software Foundation. |
| |
| SLEPc is distributed in the hope that it will be useful, but WITHOUT ANY |
| WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS |
| FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for |
| more details. |
| |
| You should have received a copy of the GNU Lesser General Public License |
| along with SLEPc. If not, see <http://www.gnu.org/licenses/>. |
| - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - |
| */ |
| |
| #if !defined(__SLEPCVEC_H) |
| #define __SLEPCVEC_H |
| PETSC_EXTERN_CXX_BEGIN |
| |
| #define VECCOMP "comp" |
| |
| PetscErrorCode PETSCVEC_DLLEXPORT VecRegister_Comp(const char path[]); |
| PetscErrorCode PETSCVEC_DLLEXPORT VecCreateComp(MPI_Comm comm, PetscInt *Nx, |
| PetscInt n, const VecType t, |
| Vec Vparent, Vec *V); |
| PetscErrorCode PETSCVEC_DLLEXPORT VecCreateCompWithVecs(Vec *x, PetscInt n, |
| Vec Vparent, Vec *V); |
| PetscErrorCode VecCompGetVecs(Vec win, const Vec **x, PetscInt *n); |
| PetscErrorCode VecCompSetVecs(Vec win, Vec *x, PetscInt n); |
| |
| PETSC_EXTERN_CXX_END |
| #endif |
| |
/trunk/src/eps/impls/davidson/common/dvd_improvex.c
25,7 → 25,7
| |
| #include "davidson.h" |
| #include "slepcblaslapack.h" |
| #include "veccomp.h" |
| #include "slepcvec.h" |
| |
| PetscErrorCode dvd_improvex_PfuncV(dvdDashboard *d, void *funcV, Vec *D, |
| PetscInt max_size_D, PetscInt r_s, PetscInt r_e, Vec *auxV, |
/trunk/src/vec/veccomp.c
22,7 → 22,7
| #include "petscmat.h" |
| #include "private/vecimpl.h" /*I "petscvec.h" I*/ |
| #include "veccomp_private.h" |
| #include "veccomp.h" |
| #include "slepcvec.h" |
| |
| typedef struct { |
| PetscInt n, /* number of active subvectors */ |
54,7 → 54,7
| #include "veccomp0.h" |
| |
| #undef __FUNCT__ |
| #define __FUNCT__ "VecRegistre_Comp" |
| #define __FUNCT__ "VecRegister_Comp" |
| PetscErrorCode PETSCVEC_DLLEXPORT VecRegister_Comp(const char path[]) |
| { |
| PetscErrorCode ierr; |
262,7 → 262,7
| } |
| |
| #undef __FUNCT__ |
| #define __FUNCT__ "VecCreateCompWithVec" |
| #define __FUNCT__ "VecCreateCompWithVecs" |
| PetscErrorCode PETSCVEC_DLLEXPORT VecCreateCompWithVecs(Vec *x, PetscInt n, |
| Vec Vparent, Vec *V) |
| { |
.
Property changes :
Modified: svn:mergeinfo
Merged /branches/slepc-3_1-branch:r2154