SundanceVectorAssemblyKernel.cpp
Go to the documentation of this file.
00001 /* @HEADER@ */
00002 // ************************************************************************
00003 // 
00004 //                             Sundance
00005 //                 Copyright 2011 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 "SundanceOut.hpp"
00043 #include "PlayaTabs.hpp"
00044 #include "SundanceVectorAssemblyKernel.hpp"
00045 #include "Teuchos_Time.hpp"
00046 #include "Teuchos_TimeMonitor.hpp"
00047 
00048 
00049 using namespace Sundance;
00050 using namespace Sundance;
00051 using namespace Sundance;
00052 using namespace Teuchos;
00053 using namespace Playa;
00054 using std::setw;
00055 using std::endl;
00056       
00057 VectorAssemblyKernel::VectorAssemblyKernel(
00058   const Array<RCP<DOFMapBase> >& dofMap,
00059   const Array<RCP<Array<int> > >& isBCIndex,
00060   const Array<int>& lowestLocalIndex,
00061   Array<Vector<double> >& b,
00062   bool partitionBCs,
00063   int verb
00064   )
00065   : VectorFillingAssemblyKernel(dofMap, isBCIndex, lowestLocalIndex,
00066     b, partitionBCs, verb)
00067 {}
00068 
00069 
00070 void VectorAssemblyKernel::fill(
00071   bool isBC, 
00072   const IntegralGroup& group,
00073   const RCP<Array<double> >& localValues) 
00074 {
00075   Tabs tab0;
00076   SUNDANCE_MSG1(verb(), tab0 << "in VectorAssemblyKernel::fill()");
00077 
00078   TEUCHOS_TEST_FOR_EXCEPT(!group.isOneForm());
00079 
00080   bool useCofacets = group.usesMaximalCofacets();
00081 
00082   if (group.isOneForm())
00083   {
00084     insertLocalVectorBatch(isBC, useCofacets, 
00085       group.testID(), group.testBlock(), group.mvIndices(),
00086       *localValues);
00087   }
00088 
00089   SUNDANCE_MSG1(verb(), tab0 << "done VectorAssemblyKernel::fill()");
00090 }
00091   
00092 
00093 void VectorAssemblyKernel:: prepareForWorkSet(
00094   const Array<Set<int> >& requiredTests,
00095   const Array<Set<int> >& /* requiredUnks */,
00096   RCP<StdFwkEvalMediator> mediator)
00097 {
00098   Tabs tab0;
00099   SUNDANCE_MSG1(verb(), tab0 
00100     << "in VectorAssemblyKernel::prepareForWorkSet()");
00101   IntegrationCellSpecifier intCellSpec = mediator->integrationCellSpec();
00102   buildLocalDOFMaps(mediator, intCellSpec, requiredTests);
00103   SUNDANCE_MSG1(verb(), tab0 << "done VectorAssemblyKernel::prepareForWorkSet()");
00104 }

Site Contact