Nektar++
Public Member Functions | Protected Member Functions | Protected Attributes | Static Protected Attributes | Static Private Attributes | List of all members
Nektar::Extrapolate Class Referenceabstract

#include <Extrapolate.h>

Inheritance diagram for Nektar::Extrapolate:
[legend]

Public Member Functions

 Extrapolate (const LibUtilities::SessionReaderSharedPtr pSession, Array< OneD, MultiRegions::ExpListSharedPtr > pFields, MultiRegions::ExpListSharedPtr pPressure, const Array< OneD, int > pVel, const SolverUtils::AdvectionSharedPtr advObject)
 
virtual ~Extrapolate ()
 
void GenerateHOPBCMap (const LibUtilities::SessionReaderSharedPtr &pSsession)
 
void UpdateRobinPrimCoeff (void)
 
void SubSteppingTimeIntegration (const LibUtilities::TimeIntegrationSchemeSharedPtr &IntegrationScheme)
 
void SubStepSaveFields (const int nstep)
 
void SubStepSetPressureBCs (const Array< OneD, const Array< OneD, NekDouble >> &inarray, const NekDouble Aii_DT, NekDouble kinvis)
 
void SubStepAdvance (const int nstep, NekDouble time)
 
void MountHOPBCs (int HBCdata, NekDouble kinvis, Array< OneD, NekDouble > &Q, Array< OneD, const NekDouble > &Advection)
 
void EvaluatePressureBCs (const Array< OneD, const Array< OneD, NekDouble >> &fields, const Array< OneD, const Array< OneD, NekDouble >> &N, NekDouble kinvis)
 
void SetForcing (const std::vector< SolverUtils::ForcingSharedPtr > &forcing)
 
void AddDuDt (void)
 
void AddVelBC (void)
 
void ExtrapolatePressureHBCs (void)
 
void CopyPressureHBCsToPbndExp (void)
 
Array< OneD, NekDoubleGetMaxStdVelocity (const Array< OneD, Array< OneD, NekDouble >> inarray)
 
void CorrectPressureBCs (const Array< OneD, NekDouble > &pressure)
 
void IProductNormVelocityOnHBC (const Array< OneD, const Array< OneD, NekDouble >> &Vel, Array< OneD, NekDouble > &IprodVn)
 
void IProductNormVelocityBCOnHBC (Array< OneD, NekDouble > &IprodVn)
 
std::string GetSubStepName (void)
 
void ExtrapolateArray (Array< OneD, Array< OneD, NekDouble >> &array)
 
void EvaluateBDFArray (Array< OneD, Array< OneD, NekDouble >> &array)
 
void ExtrapolateArray (Array< OneD, Array< OneD, NekDouble >> &oldarrays, Array< OneD, NekDouble > &newarray, Array< OneD, NekDouble > &outarray)
 
void AddNormVelOnOBC (const int nbcoeffs, const int nreg, Array< OneD, Array< OneD, NekDouble >> &u)
 
void AddPressureToOutflowBCs (NekDouble kinvis)
 

Protected Member Functions

virtual void v_EvaluatePressureBCs (const Array< OneD, const Array< OneD, NekDouble >> &inarray, const Array< OneD, const Array< OneD, NekDouble >> &N, NekDouble kinvis)=0
 
virtual void v_SubSteppingTimeIntegration (const LibUtilities::TimeIntegrationSchemeSharedPtr &IntegrationScheme)=0
 
virtual void v_SubStepSaveFields (int nstep)=0
 
virtual void v_SubStepSetPressureBCs (const Array< OneD, const Array< OneD, NekDouble >> &inarray, NekDouble Aii_DT, NekDouble kinvis)=0
 
virtual void v_SubStepAdvance (int nstep, NekDouble time)=0
 
virtual void v_MountHOPBCs (int HBCdata, NekDouble kinvis, Array< OneD, NekDouble > &Q, Array< OneD, const NekDouble > &Advection)=0
 
virtual std::string v_GetSubStepName (void)
 
virtual void v_AccelerationBDF (Array< OneD, Array< OneD, NekDouble >> &array)
 
void CalcNeumannPressureBCs (const Array< OneD, const Array< OneD, NekDouble >> &fields, const Array< OneD, const Array< OneD, NekDouble >> &N, NekDouble kinvis)
 
virtual void v_CalcNeumannPressureBCs (const Array< OneD, const Array< OneD, NekDouble >> &fields, const Array< OneD, const Array< OneD, NekDouble >> &N, NekDouble kinvis)
 
virtual void v_CorrectPressureBCs (const Array< OneD, NekDouble > &pressure)
 
virtual void v_AddNormVelOnOBC (const int nbcoeffs, const int nreg, Array< OneD, Array< OneD, NekDouble >> &u)
 
void CalcOutflowBCs (const Array< OneD, const Array< OneD, NekDouble >> &fields, NekDouble kinvis)
 
void RollOver (Array< OneD, Array< OneD, NekDouble >> &input)
 

Protected Attributes

LibUtilities::SessionReaderSharedPtr m_session
 
LibUtilities::CommSharedPtr m_comm
 
Array< OneD, HBCTypem_hbcType
 Array of type of high order BCs for splitting shemes. More...
 
Array< OneD, MultiRegions::ExpListSharedPtrm_fields
 Velocity fields. More...
 
MultiRegions::ExpListSharedPtr m_pressure
 Pointer to field holding pressure field. More...
 
Array< OneD, int > m_velocity
 int which identifies which components of m_fields contains the velocity (u,v,w); More...
 
SolverUtils::AdvectionSharedPtr m_advObject
 
std::vector< SolverUtils::ForcingSharedPtrm_forcing
 
Array< OneD, Array< OneD, NekDouble > > m_previousVelFields
 
int m_curl_dim
 Curl-curl dimensionality. More...
 
int m_bnd_dim
 bounday dimensionality More...
 
Array< OneD, const SpatialDomains::BoundaryConditionShPtrm_PBndConds
 pressure boundary conditions container More...
 
Array< OneD, MultiRegions::ExpListSharedPtrm_PBndExp
 pressure boundary conditions expansion container More...
 
int m_pressureCalls
 number of times the high-order pressure BCs have been called More...
 
int m_numHBCDof
 
int m_HBCnumber
 
int m_intSteps
 Maximum points used in pressure BC evaluation. More...
 
NekDouble m_timestep
 
Array< OneD, Array< OneD, NekDouble > > m_pressureHBCs
 Storage for current and previous levels of high order pressure boundary conditions. More...
 
Array< OneD, Array< OneD, NekDouble > > m_iprodnormvel
 Storage for current and previous levels of the inner product of normal velocity. More...
 
Array< OneD, Array< OneD, NekDouble > > m_traceNormals
 
HighOrderOutflowSharedPtr m_houtflow
 

Static Protected Attributes

static NekDouble StifflyStable_Betaq_Coeffs [3][3]
 
static NekDouble StifflyStable_Alpha_Coeffs [3][3]
 
static NekDouble StifflyStable_Gamma0_Coeffs [3] = {1.0, 1.5, 11.0 / 6.0}
 

Static Private Attributes

static std::string def
 

Detailed Description

Definition at line 73 of file Extrapolate.h.

Constructor & Destructor Documentation

◆ Extrapolate()

Nektar::Extrapolate::Extrapolate ( const LibUtilities::SessionReaderSharedPtr  pSession,
Array< OneD, MultiRegions::ExpListSharedPtr pFields,
MultiRegions::ExpListSharedPtr  pPressure,
const Array< OneD, int >  pVel,
const SolverUtils::AdvectionSharedPtr  advObject 
)

Definition at line 54 of file Extrapolate.cpp.

59  : m_session(pSession), m_fields(pFields), m_pressure(pPressure),
60  m_velocity(pVel), m_advObject(advObject)
61 {
62  m_session->LoadParameter("TimeStep", m_timestep, 0.01);
63  m_comm = m_session->GetComm();
64 }
MultiRegions::ExpListSharedPtr m_pressure
Pointer to field holding pressure field.
Definition: Extrapolate.h:201
Array< OneD, MultiRegions::ExpListSharedPtr > m_fields
Velocity fields.
Definition: Extrapolate.h:198
NekDouble m_timestep
Definition: Extrapolate.h:237
SolverUtils::AdvectionSharedPtr m_advObject
Definition: Extrapolate.h:207
Array< OneD, int > m_velocity
int which identifies which components of m_fields contains the velocity (u,v,w);
Definition: Extrapolate.h:205
LibUtilities::SessionReaderSharedPtr m_session
Definition: Extrapolate.h:190
LibUtilities::CommSharedPtr m_comm
Definition: Extrapolate.h:192

References m_comm, m_session, and m_timestep.

◆ ~Extrapolate()

Nektar::Extrapolate::~Extrapolate ( )
virtual

Definition at line 66 of file Extrapolate.cpp.

67 {
68 }

Member Function Documentation

◆ AddDuDt()

void Nektar::Extrapolate::AddDuDt ( void  )

Definition at line 77 of file Extrapolate.cpp.

78 {
79  if (m_numHBCDof)
80  {
81  // Update velocity BF at n+1 (actually only needs doing if
82  // velocity is time dependent on HBCs)
84 
85  // Calculate acceleration term at level n based on previous steps
87 
88  // Subtract acceleration term off m_pressureHBCs[nlevels-1]
90  1, m_pressureHBCs[m_intSteps - 1], 1,
91  m_pressureHBCs[m_intSteps - 1], 1);
92  }
93 }
virtual void v_AccelerationBDF(Array< OneD, Array< OneD, NekDouble >> &array)
Array< OneD, Array< OneD, NekDouble > > m_pressureHBCs
Storage for current and previous levels of high order pressure boundary conditions.
Definition: Extrapolate.h:241
void IProductNormVelocityBCOnHBC(Array< OneD, NekDouble > &IprodVn)
Array< OneD, Array< OneD, NekDouble > > m_iprodnormvel
Storage for current and previous levels of the inner product of normal velocity.
Definition: Extrapolate.h:245
int m_intSteps
Maximum points used in pressure BC evaluation.
Definition: Extrapolate.h:235
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.cpp:622

References IProductNormVelocityBCOnHBC(), m_intSteps, m_iprodnormvel, m_numHBCDof, m_pressureHBCs, m_timestep, Vmath::Svtvp(), and v_AccelerationBDF().

Referenced by Nektar::StandardExtrapolate::v_EvaluatePressureBCs(), and Nektar::SubSteppingExtrapolate::v_SubStepSetPressureBCs().

◆ AddNormVelOnOBC()

void Nektar::Extrapolate::AddNormVelOnOBC ( const int  nbcoeffs,
const int  nreg,
Array< OneD, Array< OneD, NekDouble >> &  u 
)
inline

Definition at line 404 of file Extrapolate.h.

406 {
407  v_AddNormVelOnOBC(nbcoeffs, nreg, u);
408 }
virtual void v_AddNormVelOnOBC(const int nbcoeffs, const int nreg, Array< OneD, Array< OneD, NekDouble >> &u)

References v_AddNormVelOnOBC().

Referenced by CalcOutflowBCs().

◆ AddPressureToOutflowBCs()

void Nektar::Extrapolate::AddPressureToOutflowBCs ( NekDouble  kinvis)

Definition at line 463 of file Extrapolate.cpp.

464 {
465  if (!m_houtflow.get())
466  {
467  return;
468  }
469 
470  for (size_t n = 0; n < m_PBndConds.size(); ++n)
471  {
472  if (m_hbcType[n] == eConvectiveOBC)
473  {
474  int nqb = m_PBndExp[n]->GetTotPoints();
475  int ncb = m_PBndExp[n]->GetNcoeffs();
476 
477  m_pressure->FillBndCondFromField(n, m_pressure->GetCoeffs());
478  Array<OneD, NekDouble> pbc(nqb);
479 
480  m_PBndExp[n]->BwdTrans(m_PBndExp[n]->GetCoeffs(), pbc);
481 
482  if (m_PBndExp[n]->GetWaveSpace())
483  {
484  m_PBndExp[n]->HomogeneousBwdTrans(nqb, pbc, pbc);
485  }
486 
487  Array<OneD, NekDouble> wk(nqb);
488  Array<OneD, NekDouble> wk1(ncb);
489 
490  // Get normal vector
491  Array<OneD, Array<OneD, NekDouble>> normals;
492  m_fields[0]->GetBoundaryNormals(n, normals);
493 
494  // Add 1/kinvis * (pbc n )
495  for (int i = 0; i < m_curl_dim; ++i)
496  {
497  Vmath::Vmul(nqb, normals[i], 1, pbc, 1, wk, 1);
498 
499  Vmath::Smul(nqb, 1.0 / kinvis, wk, 1, wk, 1);
500 
501  if (m_houtflow->m_UBndExp[i][n]->GetWaveSpace())
502  {
503  m_houtflow->m_UBndExp[i][n]->HomogeneousFwdTrans(nqb, wk,
504  wk);
505  }
506  m_houtflow->m_UBndExp[i][n]->IProductWRTBase(wk, wk1);
507 
508  Vmath::Vadd(ncb, wk1, 1,
509  m_houtflow->m_UBndExp[i][n]->GetCoeffs(), 1,
510  m_houtflow->m_UBndExp[i][n]->UpdateCoeffs(), 1);
511  }
512  }
513  }
514 }
int m_curl_dim
Curl-curl dimensionality.
Definition: Extrapolate.h:214
Array< OneD, HBCType > m_hbcType
Array of type of high order BCs for splitting shemes.
Definition: Extrapolate.h:195
HighOrderOutflowSharedPtr m_houtflow
Definition: Extrapolate.h:255
Array< OneD, MultiRegions::ExpListSharedPtr > m_PBndExp
pressure boundary conditions expansion container
Definition: Extrapolate.h:223
Array< OneD, const SpatialDomains::BoundaryConditionShPtr > m_PBndConds
pressure boundary conditions container
Definition: Extrapolate.h:220
@ eConvectiveOBC
Definition: Extrapolate.h:55
void Vmul(int n, const T *x, const int incx, const T *y, const int incy, T *z, const int incz)
Multiply vector z = x*y.
Definition: Vmath.cpp:209
void Vadd(int n, const T *x, const int incx, const T *y, const int incy, T *z, const int incz)
Add vector z = x+y.
Definition: Vmath.cpp:359
void Smul(int n, const T alpha, const T *x, const int incx, T *y, const int incy)
Scalar multiply y = alpha*x.
Definition: Vmath.cpp:248

References Nektar::eConvectiveOBC, m_curl_dim, m_fields, m_hbcType, m_houtflow, m_PBndConds, m_PBndExp, m_pressure, Vmath::Smul(), Vmath::Vadd(), and Vmath::Vmul().

◆ AddVelBC()

void Nektar::Extrapolate::AddVelBC ( void  )

Definition at line 98 of file Extrapolate.cpp.

99 {
100  if (m_numHBCDof)
101  {
102  int order = std::min(m_pressureCalls, m_intSteps);
103 
104  // Update velocity BF at n+1 (actually only needs doing if
105  // velocity is time dependent on HBCs)
107 
108  // Subtract acceleration term off m_pressureHBCs[nlevels-1]
110  -1.0 * StifflyStable_Gamma0_Coeffs[order - 1] / m_timestep,
112  m_pressureHBCs[m_intSteps - 1], 1);
113  }
114 }
int m_pressureCalls
number of times the high-order pressure BCs have been called
Definition: Extrapolate.h:226
static NekDouble StifflyStable_Gamma0_Coeffs[3]
Definition: Extrapolate.h:252

References IProductNormVelocityBCOnHBC(), m_intSteps, m_iprodnormvel, m_numHBCDof, m_pressureCalls, m_pressureHBCs, m_timestep, StifflyStable_Gamma0_Coeffs, and Vmath::Svtvp().

Referenced by Nektar::WeakPressureExtrapolate::v_EvaluatePressureBCs(), and Nektar::SubSteppingExtrapolateWeakPressure::v_SubStepSetPressureBCs().

◆ CalcNeumannPressureBCs()

void Nektar::Extrapolate::CalcNeumannPressureBCs ( const Array< OneD, const Array< OneD, NekDouble >> &  fields,
const Array< OneD, const Array< OneD, NekDouble >> &  N,
NekDouble  kinvis 
)
inlineprotected

Definition at line 170 of file Extrapolate.h.

173  {
174  v_CalcNeumannPressureBCs(fields, N, kinvis);
175  }
virtual void v_CalcNeumannPressureBCs(const Array< OneD, const Array< OneD, NekDouble >> &fields, const Array< OneD, const Array< OneD, NekDouble >> &N, NekDouble kinvis)

References v_CalcNeumannPressureBCs().

Referenced by Nektar::StandardExtrapolate::v_EvaluatePressureBCs(), Nektar::WeakPressureExtrapolate::v_EvaluatePressureBCs(), Nektar::SubSteppingExtrapolate::v_SubStepSetPressureBCs(), and Nektar::SubSteppingExtrapolateWeakPressure::v_SubStepSetPressureBCs().

◆ CalcOutflowBCs()

void Nektar::Extrapolate::CalcOutflowBCs ( const Array< OneD, const Array< OneD, NekDouble >> &  fields,
NekDouble  kinvis 
)
protected

Definition at line 206 of file Extrapolate.cpp.

208 {
209  if (!m_houtflow.get())
210  {
211  return;
212  }
213 
214  Array<OneD, Array<OneD, NekDouble>> Velocity(m_curl_dim);
215 
217  size_t cnt = 0;
218 
219  // Evaluate robin primitive coefficient here so they can be
220  // updated whem m_int > 1 Currently not using this update
221  // since we only using u^n at outflow instead of BDF rule.
223 
224  for (size_t n = 0; n < m_PBndConds.size(); ++n)
225  {
226  if ((m_hbcType[n] == eOBC) || (m_hbcType[n] == eConvectiveOBC))
227  {
228  // Get expansion with element on this boundary
229  m_fields[0]->GetBndElmtExpansion(n, BndElmtExp, false);
230  int nqb = m_PBndExp[n]->GetTotPoints();
231  int nq = BndElmtExp->GetTotPoints();
232 
233  // Get velocity and extrapolate
234  for (int i = 0; i < m_curl_dim; i++)
235  {
236  m_fields[0]->ExtractPhysToBndElmt(
237  n, fields[i],
238  m_houtflow->m_outflowVel[cnt][i][m_intSteps - 1]);
239  ExtrapolateArray(m_houtflow->m_outflowVel[cnt][i]);
240  Velocity[i] = m_houtflow->m_outflowVel[cnt][i][m_intSteps - 1];
241  }
242 
243  // Homogeneous case needs conversion to physical space
244  if (m_fields[0]->GetWaveSpace())
245  {
246  for (int i = 0; i < m_curl_dim; i++)
247  {
248  BndElmtExp->HomogeneousBwdTrans(Velocity[i].size(),
249  Velocity[i], Velocity[i]);
250  }
251  BndElmtExp->SetWaveSpace(false);
252  }
253 
254  // Get normal vector
255  Array<OneD, Array<OneD, NekDouble>> normals;
256  m_fields[0]->GetBoundaryNormals(n, normals);
257 
258  // Calculate n.gradU.n, div(U)
259  Array<OneD, NekDouble> nGradUn(nqb, 0.0);
260  Array<OneD, NekDouble> divU(nqb, 0.0);
261  Array<OneD, Array<OneD, NekDouble>> grad(m_curl_dim);
262  Array<OneD, NekDouble> bndVal(nqb, 0.0);
263  for (int i = 0; i < m_curl_dim; i++)
264  {
265  grad[i] = Array<OneD, NekDouble>(nq, 0.0);
266  }
267  for (int i = 0; i < m_curl_dim; i++)
268  {
269  if (m_curl_dim == 2)
270  {
271  BndElmtExp->PhysDeriv(Velocity[i], grad[0], grad[1]);
272  }
273  else
274  {
275  BndElmtExp->PhysDeriv(Velocity[i], grad[0], grad[1],
276  grad[2]);
277  }
278 
279  for (int j = 0; j < m_curl_dim; j++)
280  {
281  m_fields[0]->ExtractElmtToBndPhys(n, grad[j], bndVal);
282  // div(U) = gradU_ii
283  if (i == j)
284  {
285  Vmath::Vadd(nqb, divU, 1, bndVal, 1, divU, 1);
286  }
287  // n.gradU.n = gradU_ij n_i n_j
288  Vmath::Vmul(nqb, normals[i], 1, bndVal, 1, bndVal, 1);
289  Vmath::Vvtvp(nqb, normals[j], 1, bndVal, 1, nGradUn, 1,
290  nGradUn, 1);
291  }
292  }
293 
294  // Obtain u at the boundary
295  Array<OneD, Array<OneD, NekDouble>> u(m_curl_dim);
296  for (int i = 0; i < m_curl_dim; i++)
297  {
298  u[i] = Array<OneD, NekDouble>(nqb, 0.0);
299  m_fields[0]->ExtractElmtToBndPhys(n, Velocity[i], u[i]);
300  }
301 
302  // Calculate u.n and u^2
303  Array<OneD, NekDouble> un(nqb, 0.0);
304  Array<OneD, NekDouble> u2(nqb, 0.0);
305  for (int i = 0; i < m_curl_dim; i++)
306  {
307  Vmath::Vvtvp(nqb, normals[i], 1, u[i], 1, un, 1, un, 1);
308  Vmath::Vvtvp(nqb, u[i], 1, u[i], 1, u2, 1, u2, 1);
309  }
310 
311  // Calculate S_0(u.n) = 0.5*(1-tanh(u.n/*U0*delta))
312  Array<OneD, NekDouble> S0(nqb, 0.0);
313  for (int i = 0; i < nqb; i++)
314  {
315  S0[i] = 0.5 * (1.0 - tanh(un[i] / (m_houtflow->m_U0 *
316  m_houtflow->m_delta)));
317  }
318 
319  // Calculate E(n,u) = ((theta+alpha2)*0.5*(u^2)n +
320  // (1-theta+alpha1)*0.5*(n.u)u ) * S_0(u.n)
321  NekDouble k1 =
322  0.5 * (m_houtflow->m_obcTheta + m_houtflow->m_obcAlpha2);
323  NekDouble k2 =
324  0.5 * (1 - m_houtflow->m_obcTheta + m_houtflow->m_obcAlpha1);
325 
326  Array<OneD, Array<OneD, NekDouble>> E(m_curl_dim);
327  for (int i = 0; i < m_curl_dim; i++)
328  {
329  E[i] = Array<OneD, NekDouble>(nqb, 0.0);
330 
331  Vmath::Smul(nqb, k1, u2, 1, E[i], 1);
332  Vmath::Vmul(nqb, E[i], 1, normals[i], 1, E[i], 1);
333  // Use bndVal as a temporary storage
334  Vmath::Smul(nqb, k2, un, 1, bndVal, 1);
335  Vmath::Vvtvp(nqb, u[i], 1, bndVal, 1, E[i], 1, E[i], 1);
336  Vmath::Vmul(nqb, E[i], 1, S0, 1, E[i], 1);
337  }
338 
339  // if non-zero forcing is provided we want to subtract
340  // value if we want to interpret values as being the
341  // desired pressure value. This is now precribed from
342  // the velocity forcing to be consistent with the
343  // paper except f_b = -f_b
344 
345  // Calculate (E(n,u) + f_b).n
346  Array<OneD, NekDouble> En(nqb, 0.0);
347  for (int i = 0; i < m_bnd_dim; i++)
348  {
349  // Use bndVal as temporary
350  Vmath::Vsub(nqb, E[i], 1,
351  m_houtflow->m_UBndExp[i][n]->GetPhys(), 1, bndVal,
352  1);
353 
354  Vmath::Vvtvp(nqb, normals[i], 1, bndVal, 1, En, 1, En, 1);
355  }
356 
357  // Calculate pressure bc = kinvis*n.gradU.n - E.n + f_b.n
358  Array<OneD, NekDouble> pbc(nqb, 0.0);
359  Vmath::Svtvm(nqb, kinvis, nGradUn, 1, En, 1, pbc, 1);
360 
361  if (m_hbcType[n] == eOBC)
362  {
363 
364  if (m_PBndExp[n]->GetWaveSpace())
365  {
366  m_PBndExp[n]->HomogeneousFwdTrans(nqb, pbc, bndVal);
367  m_PBndExp[n]->FwdTrans(bndVal,
368  m_PBndExp[n]->UpdateCoeffs());
369  }
370  else
371  {
372  m_PBndExp[n]->FwdTrans(pbc, m_PBndExp[n]->UpdateCoeffs());
373  }
374  }
375  else if (m_hbcType[n] == eConvectiveOBC) // add outflow values to
376  // calculation from HBC
377  {
378  int nbcoeffs = m_PBndExp[n]->GetNcoeffs();
379  Array<OneD, NekDouble> bndCoeffs(nbcoeffs, 0.0);
380  if (m_PBndExp[n]->GetWaveSpace())
381  {
382  m_PBndExp[n]->HomogeneousFwdTrans(nqb, pbc, bndVal);
383  m_PBndExp[n]->IProductWRTBase(bndVal, bndCoeffs);
384  }
385  else
386  {
387  m_PBndExp[n]->IProductWRTBase(pbc, bndCoeffs);
388  }
389  // Note we have the negative of what is in the Dong paper in
390  // bndVal
391  Vmath::Svtvp(nbcoeffs, m_houtflow->m_pressurePrimCoeff[n],
392  bndCoeffs, 1, m_PBndExp[n]->UpdateCoeffs(), 1,
393  m_PBndExp[n]->UpdateCoeffs(), 1);
394 
395  // evaluate u^n at outflow boundary for velocity BC
396  for (int i = 0; i < m_curl_dim; i++)
397  {
398  m_fields[0]->ExtractElmtToBndPhys(
399  n, m_houtflow->m_outflowVel[cnt][i][0],
400  m_houtflow->m_outflowVelBnd[cnt][i][m_intSteps - 1]);
401 
402  EvaluateBDFArray(m_houtflow->m_outflowVelBnd[cnt][i]);
403 
404  // point u[i] to BDF evalauted value \hat{u}
405  u[i] = m_houtflow->m_outflowVelBnd[cnt][i][m_intSteps - 1];
406  }
407 
408  // Add normal velocity if weak pressure
409  // formulation. In this case there is an
410  // additional \int \hat{u}.n ds on the outflow
411  // boundary since we use the inner product wrt
412  // deriv of basis in pressure solve.
413  AddNormVelOnOBC(cnt, n, u);
414  }
415 
416  // Calculate velocity boundary conditions
417  if (m_hbcType[n] == eOBC)
418  {
419  // = (pbc n - kinvis divU n)
420  Vmath::Smul(nqb, kinvis, divU, 1, divU, 1);
421  Vmath::Vsub(nqb, pbc, 1, divU, 1, bndVal, 1);
422  }
423  else if (m_hbcType[n] == eConvectiveOBC)
424  {
425  // = (-kinvis divU n)
426  Vmath::Smul(nqb, -1.0 * kinvis, divU, 1, bndVal, 1);
427 
428  // pbc needs to be added after pressure solve
429  }
430 
431  for (int i = 0; i < m_curl_dim; ++i)
432  {
433  // Reuse divU -> En
434  Vmath::Vvtvp(nqb, normals[i], 1, bndVal, 1, E[i], 1, divU, 1);
435  // - f_b
436  Vmath::Vsub(nqb, divU, 1,
437  m_houtflow->m_UBndExp[i][n]->GetPhys(), 1, divU, 1);
438  // * 1/kinvis
439  Vmath::Smul(nqb, 1.0 / kinvis, divU, 1, divU, 1);
440 
441  if (m_hbcType[n] == eConvectiveOBC)
442  {
443  Vmath::Svtvp(nqb, m_houtflow->m_velocityPrimCoeff[i][n],
444  u[i], 1, divU, 1, divU, 1);
445  }
446 
447  if (m_houtflow->m_UBndExp[i][n]->GetWaveSpace())
448  {
449  m_houtflow->m_UBndExp[i][n]->HomogeneousFwdTrans(nqb, divU,
450  divU);
451  }
452 
453  m_houtflow->m_UBndExp[i][n]->IProductWRTBase(
454  divU, m_houtflow->m_UBndExp[i][n]->UpdateCoeffs());
455  }
456 
457  // Get offset for next terms
458  cnt++;
459  }
460  }
461 }
int m_bnd_dim
bounday dimensionality
Definition: Extrapolate.h:217
void AddNormVelOnOBC(const int nbcoeffs, const int nreg, Array< OneD, Array< OneD, NekDouble >> &u)
Definition: Extrapolate.h:404
void EvaluateBDFArray(Array< OneD, Array< OneD, NekDouble >> &array)
void ExtrapolateArray(Array< OneD, Array< OneD, NekDouble >> &array)
void UpdateRobinPrimCoeff(void)
std::shared_ptr< ExpList > ExpListSharedPtr
Shared pointer to an ExpList object.
double NekDouble
void Vvtvp(int n, const T *w, const int incw, const T *x, const int incx, const T *y, const int incy, T *z, const int incz)
vvtvp (vector times vector plus vector): z = w*x + y
Definition: Vmath.cpp:574
void Svtvm(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 minus vector): z = alpha*x - y
Definition: Vmath.cpp:664
void Vsub(int n, const T *x, const int incx, const T *y, const int incy, T *z, const int incz)
Subtract vector z = x-y.
Definition: Vmath.cpp:419

References AddNormVelOnOBC(), Nektar::eConvectiveOBC, Nektar::eOBC, EvaluateBDFArray(), ExtrapolateArray(), m_bnd_dim, m_curl_dim, m_fields, m_hbcType, m_houtflow, m_intSteps, m_PBndConds, m_PBndExp, Vmath::Smul(), Vmath::Svtvm(), Vmath::Svtvp(), UpdateRobinPrimCoeff(), Vmath::Vadd(), Vmath::Vmul(), Vmath::Vsub(), and Vmath::Vvtvp().

Referenced by Nektar::StandardExtrapolate::v_EvaluatePressureBCs(), Nektar::WeakPressureExtrapolate::v_EvaluatePressureBCs(), Nektar::SubSteppingExtrapolate::v_SubStepSetPressureBCs(), and Nektar::SubSteppingExtrapolateWeakPressure::v_SubStepSetPressureBCs().

◆ CopyPressureHBCsToPbndExp()

void Nektar::Extrapolate::CopyPressureHBCsToPbndExp ( void  )

Definition at line 1037 of file Extrapolate.cpp.

1038 {
1039  size_t n, cnt;
1040  for (cnt = n = 0; n < m_PBndConds.size(); ++n)
1041  {
1042  if ((m_hbcType[n] == eHBCNeumann) || (m_hbcType[n] == eConvectiveOBC))
1043  {
1044  int nq = m_PBndExp[n]->GetNcoeffs();
1045  Vmath::Vcopy(nq, &(m_pressureHBCs[m_intSteps - 1])[cnt], 1,
1046  &(m_PBndExp[n]->UpdateCoeffs()[0]), 1);
1047  cnt += nq;
1048  }
1049  }
1050 }
@ eHBCNeumann
Definition: Extrapolate.h:53
void Vcopy(int n, const T *x, const int incx, T *y, const int incy)
Definition: Vmath.cpp:1255

References Nektar::eConvectiveOBC, Nektar::eHBCNeumann, m_hbcType, m_intSteps, m_PBndConds, m_PBndExp, m_pressureHBCs, and Vmath::Vcopy().

Referenced by Nektar::StandardExtrapolate::v_EvaluatePressureBCs(), Nektar::WeakPressureExtrapolate::v_EvaluatePressureBCs(), Nektar::SubSteppingExtrapolate::v_SubStepSetPressureBCs(), and Nektar::SubSteppingExtrapolateWeakPressure::v_SubStepSetPressureBCs().

◆ CorrectPressureBCs()

void Nektar::Extrapolate::CorrectPressureBCs ( const Array< OneD, NekDouble > &  pressure)
inline

Definition at line 395 of file Extrapolate.h.

397 {
399 }
virtual void v_CorrectPressureBCs(const Array< OneD, NekDouble > &pressure)

References CG_Iterations::pressure, and v_CorrectPressureBCs().

◆ EvaluateBDFArray()

void Nektar::Extrapolate::EvaluateBDFArray ( Array< OneD, Array< OneD, NekDouble >> &  array)

At the start, the newest value is stored in array[nlevels-1] and the previous values in the first positions At the end, the value of the bdf explicit part is stored in array[nlevels-1] and the storage has been updated to included the new value

Definition at line 982 of file Extrapolate.cpp.

983 {
984  int nint = min(m_pressureCalls, m_intSteps);
985  int nlevels = array.size();
986  int nPts = array[0].size();
987 
988  // Update array
989  RollOver(array);
990 
991  // Extrapolate to outarray
992  Vmath::Smul(nPts, StifflyStable_Alpha_Coeffs[nint - 1][nint - 1],
993  array[nint - 1], 1, array[nlevels - 1], 1);
994 
995  for (int n = 0; n < nint - 1; ++n)
996  {
997  Vmath::Svtvp(nPts, StifflyStable_Alpha_Coeffs[nint - 1][n], array[n], 1,
998  array[nlevels - 1], 1, array[nlevels - 1], 1);
999  }
1000 }
void RollOver(Array< OneD, Array< OneD, NekDouble >> &input)
static NekDouble StifflyStable_Alpha_Coeffs[3][3]
Definition: Extrapolate.h:251

References m_intSteps, m_pressureCalls, RollOver(), Vmath::Smul(), StifflyStable_Alpha_Coeffs, and Vmath::Svtvp().

Referenced by CalcOutflowBCs(), Nektar::SubSteppingExtrapolateWeakPressure::v_AddNormVelOnOBC(), and Nektar::WeakPressureExtrapolate::v_AddNormVelOnOBC().

◆ EvaluatePressureBCs()

void Nektar::Extrapolate::EvaluatePressureBCs ( const Array< OneD, const Array< OneD, NekDouble >> &  inarray,
const Array< OneD, const Array< OneD, NekDouble >> &  N,
NekDouble  kinvis 
)
inline

Evaluate Pressure Boundary Conditions for Standard Extrapolation

Definition at line 323 of file Extrapolate.h.

326 {
327  v_EvaluatePressureBCs(inarray, N, kinvis);
328 }
virtual void v_EvaluatePressureBCs(const Array< OneD, const Array< OneD, NekDouble >> &inarray, const Array< OneD, const Array< OneD, NekDouble >> &N, NekDouble kinvis)=0

References v_EvaluatePressureBCs().

◆ ExtrapolateArray() [1/2]

void Nektar::Extrapolate::ExtrapolateArray ( Array< OneD, Array< OneD, NekDouble >> &  array)

At the start, the newest value is stored in array[nlevels-1] and the previous values in the first positions At the end, the extrapolated value is stored in array[nlevels-1] and the storage has been updated to included the new value

Definition at line 956 of file Extrapolate.cpp.

957 {
958  int nint = min(m_pressureCalls, m_intSteps);
959  int nlevels = array.size();
960  int nPts = array[0].size();
961 
962  // Update array
963  RollOver(array);
964 
965  // Extrapolate to outarray
966  Vmath::Smul(nPts, StifflyStable_Betaq_Coeffs[nint - 1][nint - 1],
967  array[nint - 1], 1, array[nlevels - 1], 1);
968 
969  for (int n = 0; n < nint - 1; ++n)
970  {
971  Vmath::Svtvp(nPts, StifflyStable_Betaq_Coeffs[nint - 1][n], array[n], 1,
972  array[nlevels - 1], 1, array[nlevels - 1], 1);
973  }
974 }
static NekDouble StifflyStable_Betaq_Coeffs[3][3]
Definition: Extrapolate.h:250

References m_intSteps, m_pressureCalls, RollOver(), Vmath::Smul(), StifflyStable_Betaq_Coeffs, and Vmath::Svtvp().

Referenced by CalcOutflowBCs(), Nektar::StandardExtrapolate::v_EvaluatePressureBCs(), Nektar::WeakPressureExtrapolate::v_EvaluatePressureBCs(), Nektar::SubSteppingExtrapolate::v_SubStepSetPressureBCs(), and Nektar::SubSteppingExtrapolateWeakPressure::v_SubStepSetPressureBCs().

◆ ExtrapolateArray() [2/2]

void Nektar::Extrapolate::ExtrapolateArray ( Array< OneD, Array< OneD, NekDouble >> &  oldarrays,
Array< OneD, NekDouble > &  newarray,
Array< OneD, NekDouble > &  outarray 
)

◆ ExtrapolatePressureHBCs()

void Nektar::Extrapolate::ExtrapolatePressureHBCs ( void  )

◆ GenerateHOPBCMap()

void Nektar::Extrapolate::GenerateHOPBCMap ( const LibUtilities::SessionReaderSharedPtr pSession)

Initialize HOBCs

Definition at line 614 of file Extrapolate.cpp.

616 {
617  m_PBndConds = m_pressure->GetBndConditions();
618  m_PBndExp = m_pressure->GetBndCondExpansions();
619 
620  size_t cnt, n;
621 
622  // Storage array for high order pressure BCs
623  m_pressureHBCs = Array<OneD, Array<OneD, NekDouble>>(m_intSteps);
624  m_iprodnormvel = Array<OneD, Array<OneD, NekDouble>>(m_intSteps + 1);
625 
626  // Get useful values for HOBCs
627  m_HBCnumber = 0;
628  m_numHBCDof = 0;
629 
630  int outHBCnumber = 0;
631  int numOutHBCPts = 0;
632 
633  m_hbcType = Array<OneD, HBCType>(m_PBndConds.size(), eNOHBC);
634  for (n = 0; n < m_PBndConds.size(); ++n)
635  {
636  // High order boundary Neumann Condiiton
637  if (boost::iequals(m_PBndConds[n]->GetUserDefined(), "H"))
638  {
639  m_hbcType[n] = eHBCNeumann;
640  m_numHBCDof += m_PBndExp[n]->GetNcoeffs();
641  m_HBCnumber += m_PBndExp[n]->GetExpSize();
642  }
643 
644  // High order outflow convective condition
645  if (m_PBndConds[n]->GetBoundaryConditionType() ==
647  boost::iequals(m_PBndConds[n]->GetUserDefined(), "HOutflow"))
648  {
650  m_numHBCDof += m_PBndExp[n]->GetNcoeffs();
651  m_HBCnumber += m_PBndExp[n]->GetExpSize();
652  numOutHBCPts += m_PBndExp[n]->GetTotPoints();
653  outHBCnumber++;
654  }
655  // High order outflow boundary condition;
656  else if (boost::iequals(m_PBndConds[n]->GetUserDefined(), "HOutflow"))
657  {
658  m_hbcType[n] = eOBC;
659  numOutHBCPts += m_PBndExp[n]->GetTotPoints();
660  outHBCnumber++;
661  }
662  }
663 
664  m_iprodnormvel[0] = Array<OneD, NekDouble>(m_numHBCDof, 0.0);
665  for (int n = 0; n < m_intSteps; ++n)
666  {
667  m_pressureHBCs[n] = Array<OneD, NekDouble>(m_numHBCDof, 0.0);
668  m_iprodnormvel[n + 1] = Array<OneD, NekDouble>(m_numHBCDof, 0.0);
669  }
670 
671  m_pressureCalls = 0;
672 
673  switch (m_pressure->GetExpType())
674  {
675  case MultiRegions::e2D:
676  {
677  m_curl_dim = 2;
678  m_bnd_dim = 2;
679  }
680  break;
682  {
683  m_curl_dim = 3;
684  m_bnd_dim = 2;
685  }
686  break;
688  {
689  m_curl_dim = 3;
690  m_bnd_dim = 1;
691  }
692  break;
693  case MultiRegions::e3D:
694  {
695  m_curl_dim = 3;
696  m_bnd_dim = 3;
697  }
698  break;
699  default:
700  ASSERTL0(0, "Dimension not supported");
701  break;
702  }
703 
704  // Initialise storage for outflow HOBCs
705  if (numOutHBCPts > 0)
706  {
708  numOutHBCPts, outHBCnumber, m_curl_dim, pSession);
709 
711 
712  // set up boundary expansions link
713  for (int i = 0; i < m_curl_dim; ++i)
714  {
715  m_houtflow->m_UBndExp[i] =
716  m_fields[m_velocity[i]]->GetBndCondExpansions();
717  }
718 
719  for (n = 0, cnt = 0; n < m_PBndConds.size(); ++n)
720  {
721  if (boost::iequals(m_PBndConds[n]->GetUserDefined(), "HOutflow"))
722  {
723  m_houtflow->m_outflowVel[cnt] =
724  Array<OneD, Array<OneD, Array<OneD, NekDouble>>>(
725  m_curl_dim);
726 
727  m_houtflow->m_outflowVelBnd[cnt] =
728  Array<OneD, Array<OneD, Array<OneD, NekDouble>>>(
729  m_curl_dim);
730 
731  m_fields[0]->GetBndElmtExpansion(n, BndElmtExp, false);
732  int nqb = m_PBndExp[n]->GetTotPoints();
733  int nq = BndElmtExp->GetTotPoints();
734  for (int j = 0; j < m_curl_dim; ++j)
735  {
736  m_houtflow->m_outflowVel[cnt][j] =
737  Array<OneD, Array<OneD, NekDouble>>(m_intSteps);
738 
739  m_houtflow->m_outflowVelBnd[cnt][j] =
740  Array<OneD, Array<OneD, NekDouble>>(m_intSteps);
741 
742  for (int k = 0; k < m_intSteps; ++k)
743  {
744  m_houtflow->m_outflowVel[cnt][j][k] =
745  Array<OneD, NekDouble>(nq, 0.0);
746  m_houtflow->m_outflowVelBnd[cnt][j][k] =
747  Array<OneD, NekDouble>(nqb, 0.0);
748  }
749  }
750  cnt++;
751  }
752 
753  // evaluate convective primitive coefficient if
754  // convective OBCs are used
755  if (m_hbcType[n] == eConvectiveOBC)
756  {
757  // initialise convective members of
758  // HighOrderOutflow struct
759  if (m_houtflow->m_pressurePrimCoeff.size() == 0)
760  {
761  m_houtflow->m_pressurePrimCoeff =
762  Array<OneD, NekDouble>(m_PBndConds.size(), 0.0);
763  m_houtflow->m_velocityPrimCoeff =
764  Array<OneD, Array<OneD, NekDouble>>(m_curl_dim);
765 
766  for (int i = 0; i < m_curl_dim; ++i)
767  {
768  m_houtflow->m_velocityPrimCoeff[i] =
769  Array<OneD, NekDouble>(m_PBndConds.size(), 0.0);
770  }
771  }
772 
773  LibUtilities::Equation coeff =
774  std::static_pointer_cast<
775  SpatialDomains::RobinBoundaryCondition>(m_PBndConds[n])
776  ->m_robinPrimitiveCoeff;
777 
778  // checkout equation evaluation options!!
779  m_houtflow->m_pressurePrimCoeff[n] = coeff.Evaluate();
780 
781  for (int i = 0; i < m_curl_dim; ++i)
782  {
783  Array<OneD, const SpatialDomains::BoundaryConditionShPtr>
784  UBndConds = m_fields[m_velocity[i]]->GetBndConditions();
785 
786  LibUtilities::Equation coeff1 =
787  std::static_pointer_cast<
788  SpatialDomains::RobinBoundaryCondition>(
789  UBndConds[n])
790  ->m_robinPrimitiveCoeff;
791 
792  m_houtflow->m_defVelPrimCoeff[i] = coeff1.GetExpression();
793 
794  ASSERTL1(UBndConds[n]->GetBoundaryConditionType() ==
796  "Require Velocity "
797  "conditions to be of Robin type when pressure"
798  "outflow is specticied as Robin Boundary type");
799 
800  // checkout equation evaluation options!!
801  m_houtflow->m_velocityPrimCoeff[i][n] = coeff1.Evaluate();
802  }
803  }
804  }
805  }
806 }
#define ASSERTL0(condition, msg)
Definition: ErrorUtil.hpp:215
#define ASSERTL1(condition, msg)
Assert Level 1 – Debugging which is used whether in FULLDEBUG or DEBUG compilation mode....
Definition: ErrorUtil.hpp:249
static std::shared_ptr< DataType > AllocateSharedPtr(const Args &...args)
Allocate a shared pointer from the memory pool.
@ eNOHBC
Definition: Extrapolate.h:52

References Nektar::MemoryManager< DataType >::AllocateSharedPtr(), ASSERTL0, ASSERTL1, Nektar::MultiRegions::e2D, Nektar::MultiRegions::e3D, Nektar::MultiRegions::e3DH1D, Nektar::MultiRegions::e3DH2D, Nektar::eConvectiveOBC, Nektar::eHBCNeumann, Nektar::eNOHBC, Nektar::eOBC, Nektar::SpatialDomains::eRobin, Nektar::LibUtilities::Equation::Evaluate(), Nektar::LibUtilities::Equation::GetExpression(), m_bnd_dim, m_curl_dim, m_fields, m_HBCnumber, m_hbcType, m_houtflow, m_intSteps, m_iprodnormvel, m_numHBCDof, m_PBndConds, m_PBndExp, m_pressure, m_pressureCalls, m_pressureHBCs, and m_velocity.

◆ GetMaxStdVelocity()

Array< OneD, NekDouble > Nektar::Extrapolate::GetMaxStdVelocity ( const Array< OneD, Array< OneD, NekDouble >>  inarray)

Definition at line 850 of file Extrapolate.cpp.

852 {
853  // Checking if the problem is 2D
854  ASSERTL0(m_curl_dim >= 2, "Method not implemented for 1D");
855 
856  size_t n_points_0 = m_fields[0]->GetExp(0)->GetTotPoints();
857  size_t n_element = m_fields[0]->GetExpSize();
858  size_t nvel = inarray.size();
859  size_t cnt;
860 
861  NekDouble pntVelocity;
862 
863  // Getting the standard velocity vector
864  Array<OneD, Array<OneD, NekDouble>> stdVelocity(nvel);
865  Array<OneD, NekDouble> tmp;
866  Array<OneD, NekDouble> maxV(n_element, 0.0);
868 
869  for (size_t i = 0; i < nvel; ++i)
870  {
871  stdVelocity[i] = Array<OneD, NekDouble>(n_points_0);
872  }
873 
874  cnt = 0.0;
875  for (size_t el = 0; el < n_element; ++el)
876  {
877  size_t n_points = m_fields[0]->GetExp(el)->GetTotPoints();
878  ptsKeys = m_fields[0]->GetExp(el)->GetPointsKeys();
879 
880  // reset local space
881  if (n_points != n_points_0)
882  {
883  for (size_t j = 0; j < nvel; ++j)
884  {
885  stdVelocity[j] = Array<OneD, NekDouble>(n_points, 0.0);
886  }
887  n_points_0 = n_points;
888  }
889  else
890  {
891  for (size_t j = 0; j < nvel; ++j)
892  {
893  Vmath::Zero(n_points, stdVelocity[j], 1);
894  }
895  }
896 
897  Array<TwoD, const NekDouble> gmat = m_fields[0]
898  ->GetExp(el)
899  ->GetGeom()
900  ->GetMetricInfo()
901  ->GetDerivFactors(ptsKeys);
902 
903  if (m_fields[0]->GetExp(el)->GetGeom()->GetMetricInfo()->GetGtype() ==
905  {
906  for (size_t j = 0; j < nvel; ++j)
907  {
908  for (size_t k = 0; k < nvel; ++k)
909  {
910  Vmath::Vvtvp(n_points, gmat[k * nvel + j], 1,
911  tmp = inarray[k] + cnt, 1, stdVelocity[j], 1,
912  stdVelocity[j], 1);
913  }
914  }
915  }
916  else
917  {
918  for (size_t j = 0; j < nvel; ++j)
919  {
920  for (size_t k = 0; k < nvel; ++k)
921  {
922  Vmath::Svtvp(n_points, gmat[k * nvel + j][0],
923  tmp = inarray[k] + cnt, 1, stdVelocity[j], 1,
924  stdVelocity[j], 1);
925  }
926  }
927  }
928  cnt += n_points;
929 
930  // Calculate total velocity in stdVelocity[0]
931  Vmath::Vmul(n_points, stdVelocity[0], 1, stdVelocity[0], 1,
932  stdVelocity[0], 1);
933  for (size_t k = 1; k < nvel; ++k)
934  {
935  Vmath::Vvtvp(n_points, stdVelocity[k], 1, stdVelocity[k], 1,
936  stdVelocity[0], 1, stdVelocity[0], 1);
937  }
938  pntVelocity = Vmath::Vmax(n_points, stdVelocity[0], 1);
939  maxV[el] = sqrt(pntVelocity);
940  }
941 
942  return maxV;
943 }
std::vector< PointsKey > PointsKeyVector
Definition: Points.h:250
@ eDeformed
Geometry is curved or has non-constant factors.
void Zero(int n, T *x, const int incx)
Zero vector.
Definition: Vmath.cpp:492
T Vmax(int n, const T *x, const int incx)
Return the maximum element in x – called vmax to avoid conflict with max.
Definition: Vmath.cpp:945
scalarT< T > sqrt(scalarT< T > in)
Definition: scalar.hpp:294

References ASSERTL0, Nektar::SpatialDomains::eDeformed, m_curl_dim, m_fields, tinysimd::sqrt(), Vmath::Svtvp(), Vmath::Vmax(), Vmath::Vmul(), Vmath::Vvtvp(), and Vmath::Zero().

Referenced by Nektar::SubSteppingExtrapolate::GetSubstepTimeStep().

◆ GetSubStepName()

std::string Nektar::Extrapolate::GetSubStepName ( void  )
inline

Definition at line 387 of file Extrapolate.h.

388 {
389  return v_GetSubStepName();
390 }
virtual std::string v_GetSubStepName(void)

References v_GetSubStepName().

◆ IProductNormVelocityBCOnHBC()

void Nektar::Extrapolate::IProductNormVelocityBCOnHBC ( Array< OneD, NekDouble > &  IprodVn)

Definition at line 545 of file Extrapolate.cpp.

546 {
547 
548  if (!m_HBCnumber)
549  {
550  return;
551  }
552  int i;
553  size_t n, cnt;
554  Array<OneD, NekDouble> IProdVnTmp;
555  Array<OneD, Array<OneD, NekDouble>> velbc(m_bnd_dim);
556  Array<OneD, Array<OneD, MultiRegions::ExpListSharedPtr>> VelBndExp(
557  m_bnd_dim);
558  for (i = 0; i < m_bnd_dim; ++i)
559  {
560  VelBndExp[i] = m_fields[m_velocity[i]]->GetBndCondExpansions();
561  }
562 
563  for (n = cnt = 0; n < m_PBndConds.size(); ++n)
564  {
565  // High order boundary condition;
566  if (m_hbcType[n] == eHBCNeumann)
567  {
568  for (i = 0; i < m_bnd_dim; ++i)
569  {
570  velbc[i] = Array<OneD, NekDouble>(
571  VelBndExp[i][n]->GetTotPoints(), 0.0);
572  VelBndExp[i][n]->SetWaveSpace(
573  m_fields[m_velocity[i]]->GetWaveSpace());
574  VelBndExp[i][n]->BwdTrans(VelBndExp[i][n]->GetCoeffs(),
575  velbc[i]);
576  }
577  IProdVnTmp = IProdVn + cnt;
578  m_PBndExp[n]->NormVectorIProductWRTBase(velbc, IProdVnTmp);
579  cnt += m_PBndExp[n]->GetNcoeffs();
580  }
581  else if (m_hbcType[n] == eConvectiveOBC)
582  {
583  // skip over convective OBC
584  cnt += m_PBndExp[n]->GetNcoeffs();
585  }
586  }
587 }

References Nektar::eConvectiveOBC, Nektar::eHBCNeumann, m_bnd_dim, m_fields, m_HBCnumber, m_hbcType, m_PBndConds, m_PBndExp, and m_velocity.

Referenced by AddDuDt(), and AddVelBC().

◆ IProductNormVelocityOnHBC()

void Nektar::Extrapolate::IProductNormVelocityOnHBC ( const Array< OneD, const Array< OneD, NekDouble >> &  Vel,
Array< OneD, NekDouble > &  IprodVn 
)

Definition at line 516 of file Extrapolate.cpp.

519 {
520  int i;
521  size_t n, cnt;
522  Array<OneD, NekDouble> IProdVnTmp;
523  Array<OneD, Array<OneD, NekDouble>> velbc(m_bnd_dim);
524 
525  for (n = cnt = 0; n < m_PBndConds.size(); ++n)
526  {
527  // High order boundary condition;
528  if (m_hbcType[n] == eHBCNeumann)
529  {
530  for (i = 0; i < m_bnd_dim; ++i)
531  {
532  m_fields[0]->ExtractPhysToBnd(n, Vel[i], velbc[i]);
533  }
534  IProdVnTmp = IProdVn + cnt;
535  m_PBndExp[n]->NormVectorIProductWRTBase(velbc, IProdVnTmp);
536  cnt += m_PBndExp[n]->GetNcoeffs();
537  }
538  else if (m_hbcType[n] == eConvectiveOBC) // skip over conective OBC
539  {
540  cnt += m_PBndExp[n]->GetNcoeffs();
541  }
542  }
543 }

References Nektar::eConvectiveOBC, Nektar::eHBCNeumann, m_bnd_dim, m_fields, m_hbcType, m_PBndConds, and m_PBndExp.

Referenced by Nektar::SubSteppingExtrapolate::v_SubStepAdvance().

◆ MountHOPBCs()

void Nektar::Extrapolate::MountHOPBCs ( int  HBCdata,
NekDouble  kinvis,
Array< OneD, NekDouble > &  Q,
Array< OneD, const NekDouble > &  Advection 
)
inline

Definition at line 377 of file Extrapolate.h.

380 {
381  v_MountHOPBCs(HBCdata, kinvis, Q, Advection);
382 }
virtual void v_MountHOPBCs(int HBCdata, NekDouble kinvis, Array< OneD, NekDouble > &Q, Array< OneD, const NekDouble > &Advection)=0

References v_MountHOPBCs().

Referenced by v_CalcNeumannPressureBCs(), and Nektar::MappingExtrapolate::v_CalcNeumannPressureBCs().

◆ RollOver()

void Nektar::Extrapolate::RollOver ( Array< OneD, Array< OneD, NekDouble >> &  input)
protected

Function to roll time-level storages to the next step layout. The stored data associated with the oldest time-level (not required anymore) are moved to the top, where they will be overwritten as the solution process progresses.

Definition at line 595 of file Extrapolate.cpp.

596 {
597  int nlevels = input.size();
598 
599  Array<OneD, NekDouble> tmp;
600 
601  tmp = input[nlevels - 1];
602 
603  for (int n = nlevels - 1; n > 0; --n)
604  {
605  input[n] = input[n - 1];
606  }
607 
608  input[0] = tmp;
609 }

Referenced by EvaluateBDFArray(), ExtrapolateArray(), v_AccelerationBDF(), and Nektar::StandardExtrapolate::v_AccelerationBDF().

◆ SetForcing()

void Nektar::Extrapolate::SetForcing ( const std::vector< SolverUtils::ForcingSharedPtr > &  forcing)
inline

Definition at line 350 of file Extrapolate.h.

352 {
353  m_forcing = forcing;
354 }
std::vector< SolverUtils::ForcingSharedPtr > m_forcing
Definition: Extrapolate.h:209

References m_forcing.

◆ SubStepAdvance()

void Nektar::Extrapolate::SubStepAdvance ( const int  nstep,
NekDouble  time 
)
inline

Definition at line 369 of file Extrapolate.h.

370 {
371  v_SubStepAdvance(nstep, time);
372 }
virtual void v_SubStepAdvance(int nstep, NekDouble time)=0

References v_SubStepAdvance().

◆ SubSteppingTimeIntegration()

void Nektar::Extrapolate::SubSteppingTimeIntegration ( const LibUtilities::TimeIntegrationSchemeSharedPtr IntegrationScheme)
inline

Definition at line 333 of file Extrapolate.h.

335 {
336  v_SubSteppingTimeIntegration(IntegrationScheme);
337 }
virtual void v_SubSteppingTimeIntegration(const LibUtilities::TimeIntegrationSchemeSharedPtr &IntegrationScheme)=0

References v_SubSteppingTimeIntegration().

◆ SubStepSaveFields()

void Nektar::Extrapolate::SubStepSaveFields ( const int  nstep)
inline

Definition at line 342 of file Extrapolate.h.

343 {
344  v_SubStepSaveFields(nstep);
345 }
virtual void v_SubStepSaveFields(int nstep)=0

References v_SubStepSaveFields().

◆ SubStepSetPressureBCs()

void Nektar::Extrapolate::SubStepSetPressureBCs ( const Array< OneD, const Array< OneD, NekDouble >> &  inarray,
const NekDouble  Aii_DT,
NekDouble  kinvis 
)
inline

Definition at line 359 of file Extrapolate.h.

362 {
363  v_SubStepSetPressureBCs(inarray, Aii_DT, kinvis);
364 }
virtual void v_SubStepSetPressureBCs(const Array< OneD, const Array< OneD, NekDouble >> &inarray, NekDouble Aii_DT, NekDouble kinvis)=0

References v_SubStepSetPressureBCs().

◆ UpdateRobinPrimCoeff()

void Nektar::Extrapolate::UpdateRobinPrimCoeff ( void  )

Definition at line 808 of file Extrapolate.cpp.

809 {
810 
811  if ((m_pressureCalls == 1) || (m_pressureCalls > m_intSteps))
812  {
813  return;
814  }
815 
816  for (size_t n = 0; n < m_PBndConds.size(); ++n)
817  {
818  // Get expansion with element on this boundary
819  if (m_hbcType[n] == eConvectiveOBC)
820  {
821  for (int i = 0; i < m_curl_dim; ++i)
822  {
823  Array<OneD, SpatialDomains::BoundaryConditionShPtr> UBndConds =
824  m_fields[m_velocity[i]]->UpdateBndConditions();
825 
826  std::string primcoeff =
827  m_houtflow->m_defVelPrimCoeff[i] + "*" +
828  boost::lexical_cast<std::string>(
830 
831  SpatialDomains::RobinBCShPtr rcond = std::dynamic_pointer_cast<
832  SpatialDomains::RobinBoundaryCondition>(UBndConds[n]);
833 
837  m_session, rcond->m_robinFunction.GetExpression(),
838  primcoeff, rcond->GetUserDefined(),
839  rcond->m_filename);
840 
841  UBndConds[n] = bcond;
842  }
843  }
844  }
845 }
std::shared_ptr< BoundaryConditionBase > BoundaryConditionShPtr
Definition: Conditions.h:212
std::shared_ptr< RobinBoundaryCondition > RobinBCShPtr
Definition: Conditions.h:215

References Nektar::MemoryManager< DataType >::AllocateSharedPtr(), Nektar::eConvectiveOBC, m_curl_dim, m_fields, m_hbcType, m_houtflow, m_intSteps, m_PBndConds, m_pressureCalls, m_session, m_velocity, and StifflyStable_Gamma0_Coeffs.

Referenced by CalcOutflowBCs().

◆ v_AccelerationBDF()

void Nektar::Extrapolate::v_AccelerationBDF ( Array< OneD, Array< OneD, NekDouble >> &  array)
protectedvirtual

At the start, the newest value is stored in array[nlevels-1] and the previous values in the first positions At the end, the acceleration from BDF is stored in array[nlevels-1] and the storage has been updated to included the new value

Reimplemented in Nektar::StandardExtrapolate.

Definition at line 1008 of file Extrapolate.cpp.

1009 {
1010  int nlevels = array.size();
1011  int nPts = array[0].size();
1012 
1013  if (nPts)
1014  {
1015  // Update array
1016  RollOver(array);
1017 
1018  // Calculate acceleration using Backward Differentiation Formula
1019  Array<OneD, NekDouble> accelerationTerm(nPts, 0.0);
1020  if (m_pressureCalls > 2)
1021  {
1022  int acc_order = min(m_pressureCalls - 2, m_intSteps);
1023  Vmath::Smul(nPts, StifflyStable_Gamma0_Coeffs[acc_order - 1],
1024  array[0], 1, accelerationTerm, 1);
1025 
1026  for (int i = 0; i < acc_order; i++)
1027  {
1028  Vmath::Svtvp(
1029  nPts, -1 * StifflyStable_Alpha_Coeffs[acc_order - 1][i],
1030  array[i + 1], 1, accelerationTerm, 1, accelerationTerm, 1);
1031  }
1032  }
1033  array[nlevels - 1] = accelerationTerm;
1034  }
1035 }

References m_intSteps, m_pressureCalls, RollOver(), Vmath::Smul(), StifflyStable_Alpha_Coeffs, StifflyStable_Gamma0_Coeffs, and Vmath::Svtvp().

Referenced by AddDuDt().

◆ v_AddNormVelOnOBC()

void Nektar::Extrapolate::v_AddNormVelOnOBC ( const int  nbcoeffs,
const int  nreg,
Array< OneD, Array< OneD, NekDouble >> &  u 
)
protectedvirtual

Reimplemented in Nektar::WeakPressureExtrapolate, and Nektar::SubSteppingExtrapolateWeakPressure.

Definition at line 200 of file Extrapolate.cpp.

202 {
203  boost::ignore_unused(nbcoeffs, nreg, u);
204 }

Referenced by AddNormVelOnOBC().

◆ v_CalcNeumannPressureBCs()

void Nektar::Extrapolate::v_CalcNeumannPressureBCs ( const Array< OneD, const Array< OneD, NekDouble >> &  fields,
const Array< OneD, const Array< OneD, NekDouble >> &  N,
NekDouble  kinvis 
)
protectedvirtual

Unified routine for calculation high-oder terms

Reimplemented in Nektar::MappingExtrapolate.

Definition at line 119 of file Extrapolate.cpp.

122 {
123  size_t n, cnt;
124 
125  Array<OneD, NekDouble> Pvals;
126 
127  Array<OneD, Array<OneD, NekDouble>> Velocity(m_curl_dim);
128  Array<OneD, Array<OneD, NekDouble>> Advection(m_bnd_dim);
129 
130  Array<OneD, Array<OneD, NekDouble>> BndValues(m_bnd_dim);
131  Array<OneD, Array<OneD, NekDouble>> Q(m_curl_dim);
132 
134  for (n = cnt = 0; n < m_PBndConds.size(); ++n)
135  {
136  // High order boundary condition;
137  if ((m_hbcType[n] == eHBCNeumann) || (m_hbcType[n] == eConvectiveOBC))
138  {
139  m_fields[0]->GetBndElmtExpansion(n, BndElmtExp, false);
140  int nqb = m_PBndExp[n]->GetTotPoints();
141  int nq = BndElmtExp->GetTotPoints();
142 
143  for (int i = 0; i < m_bnd_dim; i++)
144  {
145  BndValues[i] = Array<OneD, NekDouble>(nqb, 0.0);
146  }
147 
148  for (int i = 0; i < m_curl_dim; i++)
149  {
150  Q[i] = Array<OneD, NekDouble>(nq, 0.0);
151  }
152 
153  // Obtaining fields on BndElmtExp
154  for (int i = 0; i < m_curl_dim; i++)
155  {
156  m_fields[0]->ExtractPhysToBndElmt(n, fields[i], Velocity[i]);
157  }
158 
159  if (N.size()) // not required for some extrapolation
160  {
161  for (int i = 0; i < m_bnd_dim; i++)
162  {
163  m_fields[0]->ExtractPhysToBndElmt(n, N[i], Advection[i]);
164  }
165  }
166 
167  // CurlCurl
168  BndElmtExp->CurlCurl(Velocity, Q);
169 
170  // Mounting advection component into the high-order condition
171  for (int i = 0; i < m_bnd_dim; i++)
172  {
173  MountHOPBCs(nq, kinvis, Q[i], Advection[i]);
174  }
175 
176  Pvals = (m_pressureHBCs[m_intSteps - 1]) + cnt;
177 
178  // Getting values on the boundary and filling the pressure bnd
179  // expansion. Multiplication by the normal is required
180  for (int i = 0; i < m_bnd_dim; i++)
181  {
182  m_fields[0]->ExtractElmtToBndPhys(n, Q[i], BndValues[i]);
183  }
184 
185  m_PBndExp[n]->NormVectorIProductWRTBase(BndValues, Pvals);
186 
187  // Get offset for next terms
188  cnt += m_PBndExp[n]->GetNcoeffs();
189  }
190  }
191 }
void MountHOPBCs(int HBCdata, NekDouble kinvis, Array< OneD, NekDouble > &Q, Array< OneD, const NekDouble > &Advection)
Definition: Extrapolate.h:377

References Nektar::eConvectiveOBC, Nektar::eHBCNeumann, m_bnd_dim, m_curl_dim, m_fields, m_hbcType, m_intSteps, m_PBndConds, m_PBndExp, m_pressureHBCs, and MountHOPBCs().

Referenced by CalcNeumannPressureBCs(), and Nektar::MappingExtrapolate::v_CalcNeumannPressureBCs().

◆ v_CorrectPressureBCs()

void Nektar::Extrapolate::v_CorrectPressureBCs ( const Array< OneD, NekDouble > &  pressure)
protectedvirtual

Reimplemented in Nektar::MappingExtrapolate.

Definition at line 194 of file Extrapolate.cpp.

195 {
196  boost::ignore_unused(pressure);
197 }

References CG_Iterations::pressure.

Referenced by CorrectPressureBCs().

◆ v_EvaluatePressureBCs()

virtual void Nektar::Extrapolate::v_EvaluatePressureBCs ( const Array< OneD, const Array< OneD, NekDouble >> &  inarray,
const Array< OneD, const Array< OneD, NekDouble >> &  N,
NekDouble  kinvis 
)
protectedpure virtual

◆ v_GetSubStepName()

std::string Nektar::Extrapolate::v_GetSubStepName ( void  )
protectedvirtual

Reimplemented in Nektar::SubSteppingExtrapolate.

Definition at line 945 of file Extrapolate.cpp.

946 {
947  return "";
948 }

Referenced by GetSubStepName().

◆ v_MountHOPBCs()

virtual void Nektar::Extrapolate::v_MountHOPBCs ( int  HBCdata,
NekDouble  kinvis,
Array< OneD, NekDouble > &  Q,
Array< OneD, const NekDouble > &  Advection 
)
protectedpure virtual

◆ v_SubStepAdvance()

virtual void Nektar::Extrapolate::v_SubStepAdvance ( int  nstep,
NekDouble  time 
)
protectedpure virtual

◆ v_SubSteppingTimeIntegration()

virtual void Nektar::Extrapolate::v_SubSteppingTimeIntegration ( const LibUtilities::TimeIntegrationSchemeSharedPtr IntegrationScheme)
protectedpure virtual

◆ v_SubStepSaveFields()

virtual void Nektar::Extrapolate::v_SubStepSaveFields ( int  nstep)
protectedpure virtual

◆ v_SubStepSetPressureBCs()

virtual void Nektar::Extrapolate::v_SubStepSetPressureBCs ( const Array< OneD, const Array< OneD, NekDouble >> &  inarray,
NekDouble  Aii_DT,
NekDouble  kinvis 
)
protectedpure virtual

Member Data Documentation

◆ def

std::string Nektar::Extrapolate::def
staticprivate
Initial value:
=
"StandardExtrapolate", "StandardExtrapolate")
static std::string RegisterDefaultSolverInfo(const std::string &pName, const std::string &pValue)
Registers the default string value of a solver info property.

Definition at line 258 of file Extrapolate.h.

◆ m_advObject

SolverUtils::AdvectionSharedPtr Nektar::Extrapolate::m_advObject
protected

Definition at line 207 of file Extrapolate.h.

Referenced by Nektar::SubSteppingExtrapolate::SubStepAdvection().

◆ m_bnd_dim

int Nektar::Extrapolate::m_bnd_dim
protected

◆ m_comm

LibUtilities::CommSharedPtr Nektar::Extrapolate::m_comm
protected

◆ m_curl_dim

int Nektar::Extrapolate::m_curl_dim
protected

◆ m_fields

Array<OneD, MultiRegions::ExpListSharedPtr> Nektar::Extrapolate::m_fields
protected

◆ m_forcing

std::vector<SolverUtils::ForcingSharedPtr> Nektar::Extrapolate::m_forcing
protected

Definition at line 209 of file Extrapolate.h.

Referenced by SetForcing(), and Nektar::SubSteppingExtrapolate::SubStepAdvection().

◆ m_HBCnumber

int Nektar::Extrapolate::m_HBCnumber
protected

◆ m_hbcType

Array<OneD, HBCType> Nektar::Extrapolate::m_hbcType
protected

◆ m_houtflow

HighOrderOutflowSharedPtr Nektar::Extrapolate::m_houtflow
protected

◆ m_intSteps

int Nektar::Extrapolate::m_intSteps
protected

◆ m_iprodnormvel

Array<OneD, Array<OneD, NekDouble> > Nektar::Extrapolate::m_iprodnormvel
protected

Storage for current and previous levels of the inner product of normal velocity.

Definition at line 245 of file Extrapolate.h.

Referenced by AddDuDt(), AddVelBC(), GenerateHOPBCMap(), Nektar::MappingExtrapolate::v_CalcNeumannPressureBCs(), and Nektar::SubSteppingExtrapolate::v_SubStepAdvance().

◆ m_numHBCDof

int Nektar::Extrapolate::m_numHBCDof
protected

◆ m_PBndConds

Array<OneD, const SpatialDomains::BoundaryConditionShPtr> Nektar::Extrapolate::m_PBndConds
protected

◆ m_PBndExp

Array<OneD, MultiRegions::ExpListSharedPtr> Nektar::Extrapolate::m_PBndExp
protected

◆ m_pressure

MultiRegions::ExpListSharedPtr Nektar::Extrapolate::m_pressure
protected

Pointer to field holding pressure field.

Definition at line 201 of file Extrapolate.h.

Referenced by AddPressureToOutflowBCs(), GenerateHOPBCMap(), and Nektar::MappingExtrapolate::v_CorrectPressureBCs().

◆ m_pressureCalls

int Nektar::Extrapolate::m_pressureCalls
protected

◆ m_pressureHBCs

Array<OneD, Array<OneD, NekDouble> > Nektar::Extrapolate::m_pressureHBCs
protected

◆ m_previousVelFields

Array<OneD, Array<OneD, NekDouble> > Nektar::Extrapolate::m_previousVelFields
protected

Definition at line 211 of file Extrapolate.h.

◆ m_session

LibUtilities::SessionReaderSharedPtr Nektar::Extrapolate::m_session
protected

◆ m_timestep

NekDouble Nektar::Extrapolate::m_timestep
protected

◆ m_traceNormals

Array<OneD, Array<OneD, NekDouble> > Nektar::Extrapolate::m_traceNormals
protected

◆ m_velocity

Array<OneD, int> Nektar::Extrapolate::m_velocity
protected

◆ StifflyStable_Alpha_Coeffs

NekDouble Nektar::Extrapolate::StifflyStable_Alpha_Coeffs
staticprotected
Initial value:
= {
{1.0, 0.0, 0.0}, {2.0, -0.5, 0.0}, {3.0, -1.5, 1.0 / 3.0}}

Definition at line 251 of file Extrapolate.h.

Referenced by EvaluateBDFArray(), and v_AccelerationBDF().

◆ StifflyStable_Betaq_Coeffs

NekDouble Nektar::Extrapolate::StifflyStable_Betaq_Coeffs
staticprotected
Initial value:
= {
{1.0, 0.0, 0.0}, {2.0, -1.0, 0.0}, {3.0, -3.0, 1.0}}

Definition at line 250 of file Extrapolate.h.

Referenced by ExtrapolateArray().

◆ StifflyStable_Gamma0_Coeffs

NekDouble Nektar::Extrapolate::StifflyStable_Gamma0_Coeffs = {1.0, 1.5, 11.0 / 6.0}
staticprotected

Definition at line 252 of file Extrapolate.h.

Referenced by AddVelBC(), UpdateRobinPrimCoeff(), and v_AccelerationBDF().