Teko Version of the Day
Loading...
Searching...
No Matches
Teko_BlockingTpetra.hpp
1/*
2// @HEADER
3//
4// ***********************************************************************
5//
6// Teko: A package for block and physics based preconditioning
7// Copyright 2010 Sandia Corporation
8//
9// Under the terms of Contract DE-AC04-94AL85000 with Sandia Corporation,
10// the U.S. Government retains certain rights in this software.
11//
12// Redistribution and use in source and binary forms, with or without
13// modification, are permitted provided that the following conditions are
14// met:
15//
16// 1. Redistributions of source code must retain the above copyright
17// notice, this list of conditions and the following disclaimer.
18//
19// 2. Redistributions in binary form must reproduce the above copyright
20// notice, this list of conditions and the following disclaimer in the
21// documentation and/or other materials provided with the distribution.
22//
23// 3. Neither the name of the Corporation nor the names of the
24// contributors may be used to endorse or promote products derived from
25// this software without specific prior written permission.
26//
27// THIS SOFTWARE IS PROVIDED BY SANDIA CORPORATION "AS IS" AND ANY
28// EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
29// IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
30// PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL SANDIA CORPORATION OR THE
31// CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
32// EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
33// PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
34// PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
35// LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
36// NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
37// SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
38//
39// Questions? Contact Eric C. Cyr (eccyr@sandia.gov)
40//
41// ***********************************************************************
42//
43// @HEADER
44
45*/
46
47#ifndef __Teko_BlockingTpetra_hpp__
48#define __Teko_BlockingTpetra_hpp__
49
50#include "Teuchos_RCP.hpp"
51
52// include basic Tpetra information
53#include "Tpetra_Map.hpp"
54#include "Tpetra_CrsMatrix.hpp"
55#include "Tpetra_Vector.hpp"
56#include "Tpetra_MultiVector.hpp"
57#include "Tpetra_Export.hpp"
58#include "Tpetra_Import.hpp"
59
60#include "Teko_ConfigDefs.hpp"
61
62#include <vector>
63
64namespace Teko {
65namespace TpetraHelpers {
66namespace Blocking {
67
68typedef std::pair<Teuchos::RCP<Tpetra::Map<LO,GO,NT> >,Teuchos::RCP<Tpetra::Map<LO,GO,NT> > > MapPair;
69typedef std::pair<Teuchos::RCP<Tpetra::Import<LO,GO,NT> >,Teuchos::RCP<Tpetra::Export<LO,GO,NT> > > ImExPair;
70
84const MapPair buildSubMap(const std::vector< GO > & gid, const Teuchos::Comm<int> &comm);
85
95const ImExPair buildExportImport(const Tpetra::Map<LO,GO,NT> & baseMap,const MapPair & maps);
96
106void many2one(Tpetra::MultiVector<ST,LO,GO,NT> & one, const std::vector<Teuchos::RCP<const Tpetra::MultiVector<ST,LO,GO,NT> > > & many,
107 const std::vector<Teuchos::RCP<Tpetra::Export<LO,GO,NT> > > & subExport);
108
115void one2many(std::vector<Teuchos::RCP<Tpetra::MultiVector<ST,LO,GO,NT> > > & many, const Tpetra::MultiVector<ST,LO,GO,NT> & single,
116 const std::vector<Teuchos::RCP<Tpetra::Import<LO,GO,NT> > > & subImport);
117
125void buildSubVectors(const std::vector<MapPair> & maps,
126 std::vector<Teuchos::RCP<Tpetra::MultiVector<ST,LO,GO,NT> > > & vectors,int count);
127
133Teuchos::RCP<Tpetra::Vector<GO,LO,GO,NT> > getSubBlockColumnGIDs(const Tpetra::CrsMatrix<ST,LO,GO,NT> & A,const MapPair & mapPair);
134
148Teuchos::RCP<Tpetra::CrsMatrix<ST,LO,GO,NT> > buildSubBlock(int i,int j,const Teuchos::RCP<const Tpetra::CrsMatrix<ST,LO,GO,NT> >& A,const std::vector<MapPair> & subMaps);
149
163void rebuildSubBlock(int i,int j,const Teuchos::RCP<const Tpetra::CrsMatrix<ST,LO,GO,NT> >& A,const std::vector<MapPair> & subMaps,Tpetra::CrsMatrix<ST,LO,GO,NT> & mat);
164
165} // end Blocking
166} // end Epetra
167} // end Teko
168
169#endif