00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
00031
00032
00033
00034
00035
00036
00037
00038
00039
00040
00041
00042
00043
00044
00045
00046
00047 #ifndef __Teko_BlockingEpetra_hpp__
00048 #define __Teko_BlockingEpetra_hpp__
00049
00050 #include "Teuchos_RCP.hpp"
00051
00052
00053 #include "Epetra_Map.h"
00054 #include "Epetra_Comm.h"
00055 #include "Epetra_CrsMatrix.h"
00056 #include "Epetra_Vector.h"
00057 #include "Epetra_MultiVector.h"
00058 #include "Epetra_Export.h"
00059 #include "Epetra_Import.h"
00060 #include "Epetra_IntVector.h"
00061
00062 #include <vector>
00063
00064 namespace Teko {
00065 namespace Epetra {
00066 namespace Blocking {
00067
00068 typedef std::pair<Teuchos::RCP<Epetra_Map>,Teuchos::RCP<Epetra_Map> > MapPair;
00069 typedef std::pair<Teuchos::RCP<Epetra_Import>,Teuchos::RCP<Epetra_Export> > ImExPair;
00070
00084 const MapPair buildSubMap(const std::vector< int > & gid, const Epetra_Comm &comm);
00085
00095 const ImExPair buildExportImport(const Epetra_Map & baseMap,const MapPair & maps);
00096
00106 void many2one(Epetra_MultiVector & one, const std::vector<Teuchos::RCP<const Epetra_MultiVector> > & many,
00107 const std::vector<Teuchos::RCP<Epetra_Export> > & subExport);
00108
00115 void one2many(std::vector<Teuchos::RCP<Epetra_MultiVector> > & many, const Epetra_MultiVector & single,
00116 const std::vector<Teuchos::RCP<Epetra_Import> > & subImport);
00117
00125 void buildSubVectors(const std::vector<MapPair> & maps,
00126 std::vector<Teuchos::RCP<Epetra_MultiVector> > & vectors,int count);
00127
00133 Teuchos::RCP<Epetra_IntVector> getSubBlockColumnGIDs(const Epetra_CrsMatrix & A,const MapPair & mapPair);
00134
00148 Teuchos::RCP<Epetra_CrsMatrix> buildSubBlock(int i,int j,const Epetra_CrsMatrix & A,const std::vector<MapPair> & subMaps);
00149
00163 void rebuildSubBlock(int i,int j,const Epetra_CrsMatrix & A,const std::vector<MapPair> & subMaps,Epetra_CrsMatrix & mat);
00164
00165 }
00166 }
00167 }
00168
00169 #endif