Tpetra parallel linear algebra  Version of the Day
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Pages
Epetra_TsqrMessenger.hpp
Go to the documentation of this file.
1 // @HEADER
2 // ***********************************************************************
3 //
4 // Tpetra: Templated Linear Algebra Services Package
5 // Copyright (2008) Sandia Corporation
6 //
7 // Under the terms of Contract DE-AC04-94AL85000 with Sandia Corporation,
8 // the U.S. Government retains certain rights in this software.
9 //
10 // Redistribution and use in source and binary forms, with or without
11 // modification, are permitted provided that the following conditions are
12 // met:
13 //
14 // 1. Redistributions of source code must retain the above copyright
15 // notice, this list of conditions and the following disclaimer.
16 //
17 // 2. Redistributions in binary form must reproduce the above copyright
18 // notice, this list of conditions and the following disclaimer in the
19 // documentation and/or other materials provided with the distribution.
20 //
21 // 3. Neither the name of the Corporation nor the names of the
22 // contributors may be used to endorse or promote products derived from
23 // this software without specific prior written permission.
24 //
25 // THIS SOFTWARE IS PROVIDED BY SANDIA CORPORATION "AS IS" AND ANY
26 // EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27 // IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
28 // PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL SANDIA CORPORATION OR THE
29 // CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
30 // EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
31 // PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
32 // PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
33 // LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
34 // NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
35 // SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
36 //
37 // ************************************************************************
38 // @HEADER
39 
54 
55 #ifndef EPETRA_TSQRMESSENGER_HPP
56 #define EPETRA_TSQRMESSENGER_HPP
57 
58 #include <Tpetra_ConfigDefs.hpp>
59 
60 #if defined(HAVE_TPETRA_EPETRA) && defined(HAVE_TPETRA_TSQR)
61 
62 // Include Epetra's MPI wrappers.
63 #include <Epetra_Comm.h>
64 
65 // Include Teuchos' MPI wrappers.
66 #include <Teuchos_Comm.hpp>
67 
68 #include <Teuchos_RCP.hpp>
69 #include <Tsqr_TeuchosMessenger.hpp>
70 
71 
72 namespace TSQR {
73  namespace Epetra {
74 
83  Teuchos::RCP<const Teuchos::Comm<int> >
84  extractTeuchosComm (const Teuchos::RCP<const Epetra_Comm>& epetraComm);
85 
87  template<class Datum>
88  Teuchos::RCP<TSQR::MessengerBase<Datum> >
89  makeTsqrMessenger (const Teuchos::RCP<const Epetra_Comm>& pComm)
90  {
91  typedef TSQR::MessengerBase<Datum> base_mess_type;
92  typedef TSQR::TeuchosMessenger<Datum> mess_type;
93 
94  Teuchos::RCP<mess_type> pMess =
95  Teuchos::rcp (new mess_type (extractTeuchosComm (pComm)));
96  return Teuchos::rcp_implicit_cast<base_mess_type> (pMess);
97  }
98  } // namespace Epetra
99 } // namespace TSQR
100 
101 #endif // defined(HAVE_TPETRA_EPETRA) && defined(HAVE_TPETRA_TSQR)
102 
103 #endif // EPETRA_TSQRMESSENGER_HPP
104