|
Anasazi Version of the Day
|
00001 // @HEADER 00002 // *********************************************************************** 00003 // 00004 // Anasazi: Block Eigensolvers Package 00005 // Copyright (2010) Sandia Corporation 00006 // 00007 // Under terms of Contract DE-AC04-94AL85000, there is a non-exclusive 00008 // license for use of this work by or on behalf of the U.S. Government. 00009 // 00010 // This library is free software; you can redistribute it and/or modify 00011 // it under the terms of the GNU Lesser General Public License as 00012 // published by the Free Software Foundation; either version 2.1 of the 00013 // License, or (at your option) any later version. 00014 // 00015 // This library is distributed in the hope that it will be useful, but 00016 // WITHOUT ANY WARRANTY; without even the implied warranty of 00017 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 00018 // Lesser General Public License for more details. 00019 // 00020 // You should have received a copy of the GNU Lesser General Public 00021 // License along with this library; if not, write to the Free Software 00022 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 00023 // USA 00024 // Questions? Contact Michael A. Heroux (maherou@sandia.gov) 00025 // 00026 // *********************************************************************** 00027 // @HEADER 00028 00029 #ifndef __TSQR_Trilinos_TsqrTypeAdaptor_Epetra_MultiVector_hpp 00030 #define __TSQR_Trilinos_TsqrTypeAdaptor_Epetra_MultiVector_hpp 00031 00037 00038 #include "Epetra_MultiVector.h" // sic (not .hpp) 00039 #include "TsqrFactory_SequentialTsqr.hpp" 00040 #include "Tsqr_SequentialTsqr.hpp" 00041 #include "Tsqr.hpp" 00042 00045 00046 namespace TSQR { 00047 namespace Trilinos { 00048 00049 template<> 00050 class TsqrTypeAdaptor< double, int, int, Epetra_MultiVector > { 00051 public: 00052 typedef double scalar_type; 00053 typedef int local_ordinal_type; 00054 typedef int global_ordinal_type; 00055 typedef Epetra_MultiVector multivector_type; 00056 00057 typedef TSQR::SequentialTsqr< int, double > node_tsqr_type; 00058 typedef TSQR::Tsqr< int, double, node_tsqr_type > tsqr_type; 00059 typedef SequentialTsqrFactory< local_ordinal_type, scalar_type > factory_type; 00060 typedef Epetra_Comm comm_type; 00061 typedef Teuchos::RCP< const comm_type > comm_ptr; 00062 }; 00063 00064 } // namespace Trilinos 00065 } // namespace TSQR 00066 00067 00068 #endif // __TSQR_Trilinos_TsqrTypeAdaptor_Epetra_MultiVector_hpp
1.7.4