Nektar++
SubSteppingExtrapolateWeakPressure.cpp
Go to the documentation of this file.
1///////////////////////////////////////////////////////////////////////////////
2//
3// File: SubSteppingExtrapolateWeakPressure.cpp
4//
5// For more information, please see: http://www.nektar.info
6//
7// The MIT License
8//
9// Copyright (c) 2006 Division of Applied Mathematics, Brown University (USA),
10// Department of Aeronautics, Imperial College London (UK), and Scientific
11// Computing and Imaging Institute, University of Utah (USA).
12//
13// Permission is hereby granted, free of charge, to any person obtaining a
14// copy of this software and associated documentation files (the "Software"),
15// to deal in the Software without restriction, including without limitation
16// the rights to use, copy, modify, merge, publish, distribute, sublicense,
17// and/or sell copies of the Software, and to permit persons to whom the
18// Software is furnished to do so, subject to the following conditions:
19//
20// The above copyright notice and this permission notice shall be included
21// in all copies or substantial portions of the Software.
22//
23// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
24// OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
25// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
26// THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
27// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
28// FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
29// DEALINGS IN THE SOFTWARE.
30//
31// Description: Abstract base class for SubSteppingExtrapolate with Weak
32// Pressure VCS
33// mainly redefines SubStepSetPressureBCs
34///////////////////////////////////////////////////////////////////////////////
35
37
38namespace Nektar
39{
40/**
41 * Registers the class with the Factory.
42 */
45 "SubSteppingWeakPressure", SubSteppingExtrapolateWeakPressure::create,
46 "SubSteppingWeakPressure");
47
52 const SolverUtils::AdvectionSharedPtr advObject)
53 : SubSteppingExtrapolate(pSession, pFields, pPressure, pVel, advObject)
54{
55}
56
58 const Array<OneD, const Array<OneD, NekDouble>> &inarray,
59 [[maybe_unused]] const NekDouble Aii_Dt, NekDouble kinvis)
60{
62
64
65 // Calculate non-linear and viscous BCs at current level and
66 // put in m_pressureHBCs[0]
67 CalcNeumannPressureBCs(inarray, nullvelfields, kinvis);
68
69 // Extrapolate to m_pressureHBCs to n+1
71
72 // Add (phi,gamma0 u^{n+1}/Dt) term to m_presureHBC
73 AddVelBC();
74
75 // Copy m_pressureHBCs to m_PbndExp
77
78 // Evaluate High order outflow conditiosn if required.
79 CalcOutflowBCs(inarray, kinvis);
80}
81
82// In weak pressure formulation we also require \int q u.n ds on outflow
83// boundary
85 const int cnt, const int nreg, Array<OneD, Array<OneD, NekDouble>> &u)
86{
87 if (!m_houtflow.get()) // no outflow on partition so just return
88 {
89 return;
90 }
91
92 int nbcoeffs = m_PBndExp[nreg]->GetNcoeffs();
93 // int nqb = m_PBndExp[nreg]->GetTotPoints();
94
95 Array<OneD, NekDouble> IProdVnTmp(nbcoeffs);
96
98
99 for (int i = 0; i < m_curl_dim; ++i)
100 {
101 EvaluateBDFArray(m_houtflow->m_outflowVelBnd[cnt][i]);
102
103 ubnd[i] = m_houtflow->m_outflowVelBnd[cnt][i][m_intSteps - 1];
104
105 // point input u to the first part of the array for later uee.
106 u[i] = m_houtflow->m_outflowVelBnd[cnt][i][0];
107 }
108
109 m_PBndExp[nreg]->NormVectorIProductWRTBase(ubnd, IProdVnTmp);
110
111 Vmath::Svtvp(nbcoeffs, -1.0 / m_timestep, IProdVnTmp, 1,
112 m_PBndExp[nreg]->UpdateCoeffs(), 1,
113 m_PBndExp[nreg]->UpdateCoeffs(), 1);
114}
115
116} // namespace Nektar
Array< OneD, Array< OneD, NekDouble > > m_pressureHBCs
Storage for current and previous levels of high order pressure boundary conditions.
Definition: Extrapolate.h:277
int m_curl_dim
Curl-curl dimensionality.
Definition: Extrapolate.h:247
void CopyPressureHBCsToPbndExp(void)
void EvaluateBDFArray(Array< OneD, Array< OneD, NekDouble > > &array)
int m_intSteps
Maximum points used in pressure BC evaluation.
Definition: Extrapolate.h:271
void CalcNeumannPressureBCs(const Array< OneD, const Array< OneD, NekDouble > > &fields, const Array< OneD, const Array< OneD, NekDouble > > &N, NekDouble kinvis)
Definition: Extrapolate.h:132
HighOrderOutflowSharedPtr m_houtflow
Definition: Extrapolate.h:291
NekDouble m_timestep
Definition: Extrapolate.h:273
Array< OneD, MultiRegions::ExpListSharedPtr > m_PBndExp
pressure boundary conditions expansion container
Definition: Extrapolate.h:256
void ExtrapolateArray(Array< OneD, Array< OneD, NekDouble > > &array)
int m_pressureCalls
number of times the high-order pressure BCs have been called
Definition: Extrapolate.h:262
void CalcOutflowBCs(const Array< OneD, const Array< OneD, NekDouble > > &fields, NekDouble kinvis)
tKey RegisterCreatorFunction(tKey idKey, CreatorFunction classCreator, std::string pDesc="")
Register a class with the factory.
void v_SubStepSetPressureBCs(const Array< OneD, const Array< OneD, NekDouble > > &inarray, NekDouble Aii_Dt, NekDouble kinvis) override
static ExtrapolateSharedPtr create(const LibUtilities::SessionReaderSharedPtr &pSession, Array< OneD, MultiRegions::ExpListSharedPtr > &pFields, MultiRegions::ExpListSharedPtr &pPressure, const Array< OneD, int > &pVel, const SolverUtils::AdvectionSharedPtr &advObject)
Creates an instance of this class.
void v_AddNormVelOnOBC(const int nbcoeffs, const int nreg, Array< OneD, Array< OneD, NekDouble > > &u) override
SubSteppingExtrapolateWeakPressure(const LibUtilities::SessionReaderSharedPtr pSession, Array< OneD, MultiRegions::ExpListSharedPtr > pFields, MultiRegions::ExpListSharedPtr pPressure, const Array< OneD, int > pVel, const SolverUtils::AdvectionSharedPtr advObject)
std::shared_ptr< SessionReader > SessionReaderSharedPtr
std::shared_ptr< ExpList > ExpListSharedPtr
Shared pointer to an ExpList object.
std::shared_ptr< Advection > AdvectionSharedPtr
A shared pointer to an Advection object.
Definition: Advection.h:54
ExtrapolateFactory & GetExtrapolateFactory()
Definition: Extrapolate.cpp:47
double NekDouble
void Svtvp(int n, const T alpha, const T *x, const int incx, const T *y, const int incy, T *z, const int incz)
Svtvp (scalar times vector plus vector): z = alpha*x + y.
Definition: Vmath.hpp:396