Panzer  Version of the Day
Panzer_STK_SetupLOWSFactory.cpp
Go to the documentation of this file.
1 // @HEADER
2 // ***********************************************************************
3 //
4 // Panzer: A partial differential equation assembly
5 // engine for strongly coupled complex multiphysics systems
6 // Copyright (2011) Sandia Corporation
7 //
8 // Under the terms of Contract DE-AC04-94AL85000 with Sandia Corporation,
9 // the U.S. Government retains certain rights in this software.
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 Roger P. Pawlowski (rppawlo@sandia.gov) and
39 // Eric C. Cyr (eccyr@sandia.gov)
40 // ***********************************************************************
41 // @HEADER
42 
43 #include "PanzerAdaptersSTK_config.hpp"
44 
47 
48 namespace panzer_stk {
49 
50  template
52  buildLOWSFactory<int>(bool blockedAssembly,
54  const Teuchos::RCP<panzer_stk::STKConnManager<int> > & stkConn_manager,
55  int spatialDim,
57  const Teuchos::RCP<Teuchos::ParameterList> & strat_params,
58  #ifdef PANZER_HAVE_TEKO
59  const Teuchos::RCP<Teko::RequestHandler> & reqHandler,
60  #endif
61  bool writeCoordinates,
62  bool writeTopo
63  );
64 
65 #ifndef PANZER_ORDINAL64_IS_INT
66  template
68  buildLOWSFactory<panzer::Ordinal64>(bool blockedAssembly,
71  int spatialDim,
73  const Teuchos::RCP<Teuchos::ParameterList> & strat_params,
74  #ifdef PANZER_HAVE_TEKO
75  const Teuchos::RCP<Teko::RequestHandler> & reqHandler,
76  #endif
77  bool writeCoordinates,
78  bool writeTopo
79  );
80 #endif
81 
83  buildLOWSFactory(bool blockedAssembly,
85  const Teuchos::RCP<panzer::ConnManagerBase<int> > & conn_manager,
86  int spatialDim,
87  const Teuchos::RCP<const Teuchos::MpiComm<int> > & mpi_comm,
88  const Teuchos::RCP<Teuchos::ParameterList> & strat_params,
89  #ifdef PANZER_HAVE_TEKO
90  const Teuchos::RCP<Teko::RequestHandler> & reqHandler,
91  #endif
92  bool writeCoordinates,
93  bool writeTopo
94  )
95  {
96  #ifdef PANZER_HAVE_TEKO
97  Teuchos::RCP<Teko::RequestHandler> reqHandler_local = reqHandler;
98  if(reqHandler_local==Teuchos::null)
99  reqHandler_local = Teuchos::rcp(new Teko::RequestHandler);
100  #endif
101 
102 #ifndef PANZER_ORDINAL64_IS_INT
104  if(long_conn!=Teuchos::null)
105  return buildLOWSFactory(blockedAssembly,globalIndexer,long_conn,spatialDim,mpi_comm,strat_params,
106  #ifdef PANZER_HAVE_TEKO
107  reqHandler_local,
108  #endif
109  writeCoordinates,
110  writeTopo
111  );
112 #endif
113 
114  Teuchos::RCP<panzer_stk::STKConnManager<int> > int_conn = Teuchos::rcp_dynamic_cast<panzer_stk::STKConnManager<int> >(conn_manager);
115  if(int_conn!=Teuchos::null)
116  return buildLOWSFactory(blockedAssembly,globalIndexer,int_conn,spatialDim,mpi_comm,strat_params,
117  #ifdef PANZER_HAVE_TEKO
118  reqHandler_local,
119  #endif
120  writeCoordinates,
121  writeTopo
122  );
123 
124  // should never reach this
125  TEUCHOS_ASSERT(false);
126  return Teuchos::null;
127  }
128 }
TEUCHOS_DEPRECATED RCP< T > rcp(T *p, Dealloc_T dealloc, bool owns_mem)
#define TEUCHOS_ASSERT(assertion_test)
template Teuchos::RCP< Thyra::LinearOpWithSolveFactoryBase< double > > buildLOWSFactory< int >(bool blockedAssembly, const Teuchos::RCP< const panzer::UniqueGlobalIndexerBase > &globalIndexer, const Teuchos::RCP< panzer_stk::STKConnManager< int > > &stkConn_manager, int spatialDim, const Teuchos::RCP< const Teuchos::MpiComm< int > > &mpi_comm, const Teuchos::RCP< Teuchos::ParameterList > &strat_params, bool writeCoordinates, bool writeTopo)
Teuchos::RCP< Thyra::LinearOpWithSolveFactoryBase< double > > buildLOWSFactory(bool blockedAssembly, const Teuchos::RCP< const panzer::UniqueGlobalIndexerBase > &globalIndexer, const Teuchos::RCP< panzer::ConnManagerBase< int > > &conn_manager, int spatialDim, const Teuchos::RCP< const Teuchos::MpiComm< int > > &mpi_comm, const Teuchos::RCP< Teuchos::ParameterList > &strat_params, bool writeCoordinates, bool writeTopo)