|
Teko Version of the Day
|
00001 /* 00002 // @HEADER 00003 // 00004 // *********************************************************************** 00005 // 00006 // Teko: A package for block and physics based preconditioning 00007 // Copyright 2010 Sandia Corporation 00008 // 00009 // Under the terms of Contract DE-AC04-94AL85000 with Sandia Corporation, 00010 // the U.S. Government retains certain rights in this software. 00011 // 00012 // Redistribution and use in source and binary forms, with or without 00013 // modification, are permitted provided that the following conditions are 00014 // met: 00015 // 00016 // 1. Redistributions of source code must retain the above copyright 00017 // notice, this list of conditions and the following disclaimer. 00018 // 00019 // 2. Redistributions in binary form must reproduce the above copyright 00020 // notice, this list of conditions and the following disclaimer in the 00021 // documentation and/or other materials provided with the distribution. 00022 // 00023 // 3. Neither the name of the Corporation nor the names of the 00024 // contributors may be used to endorse or promote products derived from 00025 // this software without specific prior written permission. 00026 // 00027 // THIS SOFTWARE IS PROVIDED BY SANDIA CORPORATION "AS IS" AND ANY 00028 // EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 00029 // IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 00030 // PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL SANDIA CORPORATION OR THE 00031 // CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, 00032 // EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, 00033 // PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR 00034 // PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF 00035 // LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING 00036 // NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS 00037 // SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 00038 // 00039 // Questions? Contact Eric C. Cyr (eccyr@sandia.gov) 00040 // 00041 // *********************************************************************** 00042 // 00043 // @HEADER 00044 00045 */ 00046 00047 #ifndef __Teko_InterlacedEpetra_hpp__ 00048 #define __Teko_InterlacedEpetra_hpp__ 00049 00050 // Teuchos includes 00051 #include "Teuchos_RCP.hpp" 00052 00053 // include basic Epetra information 00054 #ifdef HAVE_MPI 00055 #include "Epetra_MpiComm.h" 00056 #else 00057 #include "Epetra_SerialComm.h" 00058 #endif 00059 #include "Epetra_Map.h" 00060 #include "Epetra_CrsMatrix.h" 00061 #include "Epetra_MultiVector.h" 00062 #include "Epetra_Vector.h" 00063 #include "Epetra_Export.h" 00064 #include "Epetra_Import.h" 00065 00066 #include <vector> 00067 00068 namespace Teko { 00069 namespace Epetra { 00070 namespace Strided { 00071 00091 void buildSubMaps(int numGlobals,int numVars,const Epetra_Comm & comm, 00092 std::vector<std::pair<int,Teuchos::RCP<Epetra_Map> > > & subMaps); 00093 00113 void buildSubMaps(int numGlobals,const std::vector<int> & vars,const Epetra_Comm & comm, 00114 std::vector<std::pair<int,Teuchos::RCP<Epetra_Map> > > & subMaps); 00115 00137 void buildSubMaps(int numGlobals,int numMyElements,int minMyGID,const std::vector<int> & vars,const Epetra_Comm & comm, 00138 std::vector<std::pair<int,Teuchos::RCP<Epetra_Map> > > & subMaps); 00139 00160 void buildSubMaps(const Epetra_Map & globalMap,const std::vector<int> & vars,const Epetra_Comm & comm, 00161 std::vector<std::pair<int,Teuchos::RCP<Epetra_Map> > > & subMaps); 00162 00163 // build conversion import and export operators 00164 void buildExportImport(const Epetra_Map & baseMap, 00165 const std::vector<std::pair<int,Teuchos::RCP<Epetra_Map> > > & subMaps, 00166 std::vector<Teuchos::RCP<Epetra_Export> > & subExport, 00167 std::vector<Teuchos::RCP<Epetra_Import> > & subImport); 00168 00169 // build a vector of subVectors 00170 void buildSubVectors(const std::vector<std::pair<int,Teuchos::RCP<Epetra_Map> > > & subMaps, 00171 std::vector<Teuchos::RCP<Epetra_MultiVector> > & subVectors,int count); 00172 00176 void associateSubVectors(const std::vector<std::pair<int,Teuchos::RCP<Epetra_Map> > > & subMaps, 00177 std::vector<Teuchos::RCP<const Epetra_MultiVector> > & subVectors); 00178 00179 // build a single subblock Epetra_CrsMatrix 00180 Teuchos::RCP<Epetra_CrsMatrix> buildSubBlock(int i,int j,const Epetra_CrsMatrix & A, 00181 const std::vector<std::pair<int,Teuchos::RCP<Epetra_Map> > > & subMaps); 00182 00183 // Rebuild a single subblock of a matrix 00184 void rebuildSubBlock(int i,int j,const Epetra_CrsMatrix & A, 00185 const std::vector<std::pair<int,Teuchos::RCP<Epetra_Map> > > & subMaps,Epetra_CrsMatrix & mat); 00186 00187 // copy contents of many subvectors to a single vector 00188 void many2one(Epetra_MultiVector & one, const std::vector<Teuchos::RCP<const Epetra_MultiVector> > & many, 00189 const std::vector<Teuchos::RCP<Epetra_Export> > & subExport); 00190 00191 // copy contents of a single vector to many subvectors 00192 void one2many(std::vector<Teuchos::RCP<Epetra_MultiVector> > & many,const Epetra_MultiVector & single, 00193 const std::vector<Teuchos::RCP<Epetra_Import> > & subImport); 00194 00195 } 00196 } // end namespace Epetra 00197 } // end namespace Teko 00198 00199 #endif
1.7.4