PlayaSerialVector.cpp
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 #include "PlayaVectorDecl.hpp"
00043 #include "PlayaSerialVector.hpp"
00044 #include "PlayaSerialVectorSpace.hpp"
00045 #include "Teuchos_Assert.hpp"
00046 
00047 #ifndef HAVE_TEUCHOS_EXPLICIT_INSTANTIATION
00048 #include "PlayaVectorImpl.hpp"
00049 #include "PlayaLinearOperatorImpl.hpp"
00050 #endif
00051 
00052 using namespace Teuchos;
00053 using namespace Playa;
00054 
00055 SerialVector::SerialVector(const VectorSpace<double>& vs)
00056   : SingleChunkVector<double>(),
00057     vecSpace_(vs),
00058     data_(vs.dim()),
00059     dim_(vs.dim())
00060 {
00061   const SerialVectorSpace* rvs 
00062     = dynamic_cast<const SerialVectorSpace*>(vs.ptr().get());
00063   TEUCHOS_TEST_FOR_EXCEPTION(rvs==0, std::runtime_error,
00064     "could not cast vector space to SerialVectorSpace in "
00065     "SerialVector ctor");
00066 }
00067 
00068 
00069 void SerialVector::setElement(int index, const double& value)
00070 {
00071   data_[index] = value;
00072 }
00073 
00074 void SerialVector::addToElement(int index, const double& value)
00075 {
00076   data_[index] += value;
00077 }
00078 
00079 void SerialVector::setElements(int numElems, const int* globalIndices,
00080   const double* values)
00081 {
00082   for (int i=0; i<numElems; i++)
00083   {
00084     data_[globalIndices[i]] = values[i];
00085   }
00086 }
00087 
00088 void SerialVector::addToElements(int numElems, const int* globalIndices,
00089   const double* values)
00090 {
00091   for (int i=0; i<numElems; i++)
00092   {
00093     data_[globalIndices[i]] += values[i];
00094   }
00095 }
00096 
00097 const SerialVector* SerialVector::getConcrete(const Vector<double>& x)
00098 {
00099   const SerialVector* rtn = dynamic_cast<const SerialVector*>(x.ptr().get());
00100   TEUCHOS_TEST_FOR_EXCEPT(rtn==0);
00101   return rtn;
00102 }
00103 
00104 SerialVector* SerialVector::getConcrete(Vector<double>& x)
00105 {
00106   SerialVector* rtn = dynamic_cast<SerialVector*>(x.ptr().get());
00107   TEUCHOS_TEST_FOR_EXCEPT(rtn==0);
00108   return rtn;
00109 }
00110 
00111 void SerialVector::finalizeAssembly()
00112 {
00113   // no-op
00114 }
00115 
00116 void SerialVector::getElements(const int* globalIndices, int numElems,
00117   Array<double>& elems) const
00118 {
00119   elems.resize(numElems);
00120   for (int i=0; i<numElems; i++)
00121   {
00122     elems[i] = (*this)[globalIndices[i]];
00123   }
00124 }
00125 
00126 std::string SerialVector::description() const 
00127 {
00128   std::ostringstream oss;
00129   oss << "SerialVector[dim=" << dim_ << "]" ;
00130   return oss.str();
00131 }
00132 

Site Contact