Thyra Package Browser (Single Doxygen Collection)
Version of the Day
adapters
epetra
test
UnitTests
EpetraThyraAdaptersTestHelpers.hpp
Go to the documentation of this file.
1
/*
2
// @HEADER
3
// ***********************************************************************
4
//
5
// Thyra: Interfaces and Support for Abstract Numerical Algorithms
6
// Copyright (2004) Sandia Corporation
7
//
8
// Under terms of Contract DE-AC04-94AL85000, there is a non-exclusive
9
// license for use of this work by or on behalf of the U.S. Government.
10
//
11
// Redistribution and use in source and binary forms, with or without
12
// modification, are permitted provided that the following conditions are
13
// met:
14
//
15
// 1. Redistributions of source code must retain the above copyright
16
// notice, this list of conditions and the following disclaimer.
17
//
18
// 2. Redistributions in binary form must reproduce the above copyright
19
// notice, this list of conditions and the following disclaimer in the
20
// documentation and/or other materials provided with the distribution.
21
//
22
// 3. Neither the name of the Corporation nor the names of the
23
// contributors may be used to endorse or promote products derived from
24
// this software without specific prior written permission.
25
//
26
// THIS SOFTWARE IS PROVIDED BY SANDIA CORPORATION "AS IS" AND ANY
27
// EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28
// IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29
// PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL SANDIA CORPORATION OR THE
30
// CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
31
// EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
32
// PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
33
// PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
34
// LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
35
// NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
36
// SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
37
//
38
// Questions? Contact Roscoe A. Bartlett (bartlettra@ornl.gov)
39
//
40
// ***********************************************************************
41
// @HEADER
42
*/
43
44
#include "
Thyra_EpetraThyraWrappers.hpp
"
45
#include "Epetra_SerialComm.h"
46
#ifdef HAVE_MPI
47
# include "Epetra_MpiComm.h"
48
#endif
49
#include "Epetra_Map.h"
50
#include "Epetra_CrsMatrix.h"
51
#include "
Teuchos_as.hpp
"
52
#include "
Teuchos_Array.hpp
"
53
#include "
Teuchos_RCP.hpp
"
54
#include "
Teuchos_Comm.hpp
"
55
#include "
Teuchos_UnitTestHarness.hpp
"
56
57
58
namespace
{
59
60
61
//
62
// Helper code and declarations
63
//
64
65
using
Teuchos::as
;
66
using
Teuchos::RCP
;
67
using
Teuchos::rcp
;
68
using
Teuchos::Ptr
;
69
using
Teuchos::outArg;
70
using
Teuchos::Array
;
71
using
Teuchos::Comm
;
72
typedef
Teuchos_Ordinal
Ordinal
;
73
74
75
int
g_localDim
= 4;
76
bool
g_dumpAll =
false
;
77
bool
g_show_all_tests =
false
;
78
79
80
TEUCHOS_STATIC_SETUP
()
81
{
82
Teuchos::UnitTestRepository::getCLP
().
setOption
(
83
"local-dim"
, &
g_localDim
,
"Local dimension of each vector."
);
84
Teuchos::UnitTestRepository::getCLP
().
setOption
(
85
"show-all-tests"
,
"no-show-all-tests"
, &g_show_all_tests,
86
"Set if all tests are shown or not."
);
87
Teuchos::UnitTestRepository::getCLP
().
setOption
(
88
"dump-all"
,
"no-dump-all"
, &g_dumpAll,
89
"Dump lots of data"
);
90
}
91
92
93
RCP<const Epetra_Comm> getEpetraComm()
94
{
95
#ifdef HAVE_MPI
96
return
rcp
(
new
Epetra_MpiComm(MPI_COMM_WORLD));
97
#else
98
return
rcp
(
new
Epetra_SerialComm());
99
#endif
100
}
101
102
103
104
}
// namespace
Teuchos_RCP.hpp
Teuchos_as.hpp
Teuchos::rcp
TEUCHOS_DEPRECATED RCP< T > rcp(T *p, Dealloc_T dealloc, bool owns_mem)
Teuchos::UnitTestRepository::getCLP
static CommandLineProcessor & getCLP()
Teuchos_Array.hpp
Thyra::TEUCHOS_STATIC_SETUP
TEUCHOS_STATIC_SETUP()
Definition:
TpetraThyraWrappers_UnitTests.cpp:187
Thyra::g_localDim
const int g_localDim
Definition:
TpetraThyraWrappers_UnitTests.cpp:82
Teuchos::RCP
Teuchos::Ptr
Teuchos_UnitTestHarness.hpp
Teuchos::Array
Teuchos_Ordinal
TEUCHOS_ORDINAL_TYPE Teuchos_Ordinal
Teuchos::CommandLineProcessor::setOption
void setOption(const char option_true[], const char option_false[], bool *option_val, const char documentation[]=NULL)
Teuchos::as
TypeTo as(const TypeFrom &t)
Ordinal
Teuchos_Ordinal Ordinal
Teuchos::Comm
Definition:
Thyra_EpetraThyraWrappers.hpp:50
Teuchos_Comm.hpp
Thyra_EpetraThyraWrappers.hpp
Generated by
1.8.16