PlayaEpetraVector.hpp
Go to the documentation of this file.
00001 /* @HEADER@ */
00002 // ************************************************************************
00003 // 
00004 //                 Playa: Programmable Linear Algebra
00005 //                 Copyright 2012 Sandia Corporation
00006 // 
00007 // Under the terms of Contract DE-AC04-94AL85000 with Sandia Corporation,
00008 // the U.S. Government retains certain rights in this software.
00009 //
00010 // Redistribution and use in source and binary forms, with or without
00011 // modification, are permitted provided that the following conditions are
00012 // met:
00013 //
00014 // 1. Redistributions of source code must retain the above copyright
00015 // notice, this list of conditions and the following disclaimer.
00016 //
00017 // 2. Redistributions in binary form must reproduce the above copyright
00018 // notice, this list of conditions and the following disclaimer in the
00019 // documentation and/or other materials provided with the distribution.
00020 //
00021 // 3. Neither the name of the Corporation nor the names of the
00022 // contributors may be used to endorse or promote products derived from
00023 // this software without specific prior written permission.
00024 //
00025 // THIS SOFTWARE IS PROVIDED BY SANDIA CORPORATION "AS IS" AND ANY
00026 // EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
00027 // IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
00028 // PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL SANDIA CORPORATION OR THE
00029 // CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
00030 // EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
00031 // PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
00032 // PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
00033 // LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
00034 // NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
00035 // SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
00036 //
00037 // Questions? Contact Kevin Long (kevin.long@ttu.edu)
00038 // 
00039 
00040 /* @HEADER@ */
00041 
00042 #ifndef PLAYA_EPETRAVECTOR_HPP
00043 #define PLAYA_EPETRAVECTOR_HPP
00044 
00045 #include "PlayaDefs.hpp"
00046 #include "PlayaPrintable.hpp"
00047 #include "PlayaVectorDecl.hpp"
00048 #include "PlayaLoadableVector.hpp"
00049 #include "PlayaSingleChunkVector.hpp"
00050 #include "Epetra_FEVector.h"
00051 #include "Epetra_Vector.h"
00052 #include "PlayaEpetraVectorSpace.hpp"
00053 
00054 
00055 namespace Playa
00056 {
00057 using Teuchos::RCP;
00058 /**
00059  * Playa::VectorBase wrapper for Epetra_Vector
00060  */
00061 class EpetraVector : public SingleChunkVector<double>,
00062                      public LoadableVector<double>,
00063                      public Printable,
00064                      public Teuchos::Describable
00065 {
00066 public:
00067 
00068   /** Construct with an Epetra vector space. */
00069   EpetraVector(const VectorSpace<double>& vs);
00070 
00071   /** Construct with an Epetra vector space
00072       and an existing Epetra vector. */
00073   EpetraVector(const VectorSpace<double>& vs,
00074     const RCP<Epetra_Vector>& vec);
00075 
00076 
00077   /** \name VectorBase interface */
00078   //@{
00079   /** Return the space in which this vector lives */
00080   RCP< const VectorSpaceBase<double> > space() const {return vecSpace_.ptr();}
00081   //@}
00082 
00083   /** \name IndexableVector interface */
00084   //@{
00085   /** read the element at the given global index */
00086   virtual const double& operator[](int globalIndex) const 
00087     {return getElement(globalIndex);}
00088 
00089   /** writable access to the element at the given global index */
00090   virtual double& operator[](int globalIndex) ;
00091   //@}
00092 
00093   /** \name LoadableVector interface */
00094   //@{
00095   /** set a single element */
00096   void setElement(int globalIndex, const double& value);
00097 
00098   /** add to a single element */
00099   void addToElement(int globalIndex, const double& value);
00100 
00101   /** set a group of elements */
00102   void setElements(int numElems, const int* globalIndices, 
00103     const double* values);
00104 
00105 
00106   /** add to a group of elements */
00107   void addToElements(int numElems, const int* globalIndices, 
00108     const double* values);
00109 
00110   /** */
00111   void finalizeAssembly();
00112   //@}
00113 
00114   /** \name AccessibleVector interface */
00115   //@{
00116   /** */
00117   const double& getElement(int globalIndex) const ;
00118 
00119   /** */
00120   void getElements(const int* globalIndices, int numElems,
00121     Teuchos::Array<double>& elems) const ;
00122   //@}
00123 
00124   /** \name Printable interface */
00125   //@{
00126   /** Print to a stream */
00127   void print(std::ostream& os) const ;
00128   //@}
00129       
00130 
00131   /** */
00132   const RCP<Epetra_Vector>& epetraVec() const 
00133     {return epetraVec_;}
00134 
00135   /** */
00136   RCP<Epetra_Vector>& epetraVec() {return epetraVec_;}
00137 
00138   /** Get a read-only Epetra_Vector */
00139   static const Epetra_Vector& getConcrete(const Playa::Vector<double>& tsfVec);
00140   /** Get a read-write Epetra_Vector */
00141   static Epetra_Vector& getConcrete(Playa::Vector<double>& tsfVec);
00142   /** Get a read-write Epetra_Vector pointer */
00143   static Epetra_Vector* getConcretePtr(Playa::Vector<double>& tsfVec);
00144 
00145   
00146   /** */
00147   virtual void update(const double& alpha, const VectorBase<double>* other,
00148     const double& gamma);
00149     
00150 
00151   /** */
00152   virtual void update(
00153     const double& alpha, const VectorBase<double>* x,
00154     const double& beta, const VectorBase<double>* y,
00155     const double& gamma) ;
00156 
00157   /** */
00158   virtual double dot(const VectorBase<double>* other) const ;
00159 
00160   /** */
00161   virtual double norm2() const ;
00162 protected:    
00163 
00164   /** \name Single chunk data access interface */
00165   //@{
00166   /** */
00167   virtual const double* dataPtr() const {return &(epetraVec_->operator[](0));}
00168   /** */
00169   virtual double* dataPtr() {return &(epetraVec_->operator[](0));}
00170 
00171   /** Size of the (single) chunk of data values */
00172   virtual int chunkSize() const {return numLocalElements_;}
00173   //@}
00174 
00175 private:
00176 
00177   VectorSpace<double> vecSpace_;
00178 
00179   RCP<Epetra_Vector> epetraVec_;
00180 
00181   int numLocalElements_;
00182   
00183 };
00184   
00185 }
00186 
00187 
00188 #endif

Site Contact