Thyra Package Browser (Single Doxygen Collection) Version of the Day
Loading...
Searching...
No Matches
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
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"
56
57
58namespace {
59
60
61//
62// Helper code and declarations
63//
64
65using Teuchos::as;
66using Teuchos::RCP;
67using Teuchos::rcp;
68using Teuchos::Ptr;
69using Teuchos::outArg;
70using Teuchos::Array;
71using Teuchos::Comm;
73
74
75int g_localDim = 4;
76bool g_dumpAll = false;
77bool g_show_all_tests = false;
78
79
81{
83 "local-dim", &g_localDim, "Local dimension of each vector." );
85 "show-all-tests", "no-show-all-tests", &g_show_all_tests,
86 "Set if all tests are shown or not." );
88 "dump-all", "no-dump-all", &g_dumpAll,
89 "Dump lots of data" );
90}
91
92
93RCP<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_STATIC_SETUP()
TEUCHOS_ORDINAL_TYPE Teuchos_Ordinal
static CommandLineProcessor & getCLP()
Teuchos_Ordinal Ordinal
TypeTo as(const TypeFrom &t)
TEUCHOS_DEPRECATED RCP< T > rcp(T *p, Dealloc_T dealloc, bool owns_mem)