|
Thyra Package Browser (Single Doxygen Collection)
Version of the Day
|
00001 // @HEADER 00002 // *********************************************************************** 00003 // 00004 // Thyra: Interfaces and Support for Abstract Numerical Algorithms 00005 // Copyright (2004) Sandia Corporation 00006 // 00007 // Under terms of Contract DE-AC04-94AL85000, there is a non-exclusive 00008 // license for use of this work by or on behalf of the U.S. Government. 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 Roscoe A. Bartlett (bartlettra@ornl.gov) 00038 // 00039 // *********************************************************************** 00040 // @HEADER 00041 00042 #ifndef THYRA_TPETRA_VECTOR_HPP 00043 #define THYRA_TPETRA_VECTOR_HPP 00044 00045 00046 #include "Thyra_TpetraVector_decl.hpp" 00047 00048 00049 namespace Thyra { 00050 00051 00052 // Constructors/initializers/accessors 00053 00054 00055 template <class Scalar, class LocalOrdinal, class GlobalOrdinal, class Node> 00056 TpetraVector<Scalar,LocalOrdinal,GlobalOrdinal,Node>::TpetraVector() 00057 {} 00058 00059 00060 template <class Scalar, class LocalOrdinal, class GlobalOrdinal, class Node> 00061 void TpetraVector<Scalar,LocalOrdinal,GlobalOrdinal,Node>::initialize( 00062 const RCP<const TpetraVectorSpace<Scalar,LocalOrdinal,GlobalOrdinal,Node> > &tpetraVectorSpace, 00063 const RCP<Tpetra::Vector<Scalar,LocalOrdinal,GlobalOrdinal,Node> > &tpetraVector 00064 ) 00065 { 00066 initializeImpl(tpetraVectorSpace, tpetraVector); 00067 } 00068 00069 00070 template <class Scalar, class LocalOrdinal, class GlobalOrdinal, class Node> 00071 void TpetraVector<Scalar,LocalOrdinal,GlobalOrdinal,Node>::constInitialize( 00072 const RCP<const TpetraVectorSpace<Scalar,LocalOrdinal,GlobalOrdinal,Node> > &tpetraVectorSpace, 00073 const RCP<const Tpetra::Vector<Scalar,LocalOrdinal,GlobalOrdinal,Node> > &tpetraVector 00074 ) 00075 { 00076 initializeImpl(tpetraVectorSpace, tpetraVector); 00077 } 00078 00079 00080 template <class Scalar, class LocalOrdinal, class GlobalOrdinal, class Node> 00081 RCP<Tpetra::Vector<Scalar,LocalOrdinal,GlobalOrdinal,Node> > 00082 TpetraVector<Scalar,LocalOrdinal,GlobalOrdinal,Node>::getTpetraVector() 00083 { 00084 return tpetraVector_.getNonconstObj(); 00085 } 00086 00087 00088 template <class Scalar, class LocalOrdinal, class GlobalOrdinal, class Node> 00089 RCP<const Tpetra::Vector<Scalar,LocalOrdinal,GlobalOrdinal,Node> > 00090 TpetraVector<Scalar,LocalOrdinal,GlobalOrdinal,Node>::getConstTpetraVector() const 00091 { 00092 return tpetraVector_; 00093 } 00094 00095 00096 // Overridden from SpmdVectorBase 00097 00098 00099 template <class Scalar, class LocalOrdinal, class GlobalOrdinal, class Node> 00100 RCP<const SpmdVectorSpaceBase<Scalar> > 00101 TpetraVector<Scalar,LocalOrdinal,GlobalOrdinal,Node>::spmdSpace() const 00102 { 00103 return tpetraVectorSpace_; 00104 } 00105 00106 00107 template <class Scalar, class LocalOrdinal, class GlobalOrdinal, class Node> 00108 void TpetraVector<Scalar,LocalOrdinal,GlobalOrdinal,Node>::getNonconstLocalDataImpl( 00109 const Ptr<ArrayRCP<Scalar> > &localValues ) 00110 { 00111 *localValues = tpetraVector_.getNonconstObj()->get1dViewNonConst(); 00112 } 00113 00114 00115 template <class Scalar, class LocalOrdinal, class GlobalOrdinal, class Node> 00116 void TpetraVector<Scalar,LocalOrdinal,GlobalOrdinal,Node>::getLocalDataImpl( 00117 const Ptr<ArrayRCP<const Scalar> > &localValues ) const 00118 { 00119 *localValues = tpetraVector_->get1dView(); 00120 } 00121 00122 00123 // private 00124 00125 template <class Scalar, class LocalOrdinal, class GlobalOrdinal, class Node> 00126 template<class TpetraVector_t> 00127 void TpetraVector<Scalar,LocalOrdinal,GlobalOrdinal,Node>::initializeImpl( 00128 const RCP<const TpetraVectorSpace<Scalar,LocalOrdinal,GlobalOrdinal,Node> > &tpetraVectorSpace, 00129 const RCP<TpetraVector_t> &tpetraVector 00130 ) 00131 { 00132 #ifdef TEUCHOS_DEBUG 00133 TEUCHOS_ASSERT(nonnull(tpetraVectorSpace)); 00134 TEUCHOS_ASSERT(nonnull(tpetraVector)); 00135 #endif 00136 tpetraVectorSpace_ = tpetraVectorSpace; 00137 tpetraVector_.initialize(tpetraVector); 00138 this->updateSpmdSpace(); 00139 } 00140 00141 00142 } // end namespace Thyra 00143 00144 00145 #endif // THYRA_TPETRA_VECTOR_HPP
1.7.6.1