Actual source code: dvecimpl.h

      1: /*
      2:    This should not be included in users code.

      4:   Includes definition of structure for seqential double precision vectors

      6:   These are shared by dvec1.c dvec2.c dvec3.c bvec1.c bvec2.c
      7:   pvectors/pvec.c pvectors/pbvec.c
      8: */

     10: #ifndef __DVECIMPL

     13:  #include vecimpl.h

     15: typedef struct {
     16:   VECHEADER
     17: } Vec_Seq;

     19: EXTERN PetscErrorCode VecMDot_Seq(PetscInt,Vec,const Vec[],PetscScalar * PETSC_RESTRICT);
     20: EXTERN PetscErrorCode VecMTDot_Seq(PetscInt,Vec,const Vec[],PetscScalar *);
     21: EXTERN PetscErrorCode VecMin_Seq(Vec,PetscInt*,PetscReal *);
     22: EXTERN PetscErrorCode VecSet_Seq(Vec,PetscScalar);
     23: EXTERN PetscErrorCode VecSetRandom_Seq(Vec,PetscRandom);
     24: EXTERN PetscErrorCode VecMAXPY_Seq(Vec,PetscInt,const PetscScalar *,Vec *);
     25: EXTERN PetscErrorCode VecAYPX_Seq(Vec,PetscScalar,Vec);
     26: EXTERN PetscErrorCode VecWAXPY_Seq(Vec,PetscScalar,Vec,Vec);
     27: EXTERN PetscErrorCode VecPointwiseMult_Seq(Vec,Vec,Vec);
     28: EXTERN PetscErrorCode VecPointwiseMax_Seq(Vec,Vec,Vec);
     29: EXTERN PetscErrorCode VecPointwiseMaxAbs_Seq(Vec,Vec,Vec);
     30: EXTERN PetscErrorCode VecPointwiseMin_Seq(Vec,Vec,Vec);
     31: EXTERN PetscErrorCode VecPointwiseDivide_Seq(Vec,Vec,Vec);
     32: EXTERN PetscErrorCode VecMaxPointwiseDivide_Seq(Vec,Vec,PetscReal*);
     33: EXTERN PetscErrorCode VecGetArray_Seq(Vec,PetscScalar *[]);
     34: EXTERN PetscErrorCode VecRestoreArray_Seq(Vec,PetscScalar *[]);
     35: EXTERN PetscErrorCode VecPlaceArray_Seq(Vec,const PetscScalar *);
     36: EXTERN PetscErrorCode VecResetArray_Seq(Vec);
     37: EXTERN PetscErrorCode VecReplaceArray_Seq(Vec,const PetscScalar *);
     38: EXTERN PetscErrorCode VecGetSize_Seq(Vec,PetscInt *);
     39: EXTERN PetscErrorCode VecDot_Seq(Vec,Vec,PetscScalar *);
     40: EXTERN PetscErrorCode VecTDot_Seq(Vec,Vec,PetscScalar *);
     41: EXTERN PetscErrorCode VecScale_Seq(Vec,PetscScalar);
     42: EXTERN PetscErrorCode VecCopy_Seq(Vec,Vec);
     43: EXTERN PetscErrorCode VecSwap_Seq(Vec,Vec);
     44: EXTERN PetscErrorCode VecAXPY_Seq(Vec,PetscScalar,Vec);
     45: EXTERN PetscErrorCode VecAXPBY_Seq(Vec,PetscScalar,PetscScalar,Vec);
     46: EXTERN PetscErrorCode VecMax_Seq(Vec,PetscInt*,PetscReal *);
     47: EXTERN PetscErrorCode VecDuplicate_Seq(Vec,Vec *);
     48: EXTERN PetscErrorCode VecConjugate_Seq(Vec);
     49: EXTERN PetscErrorCode VecNorm_Seq(Vec,NormType,PetscReal*);
     50: #endif