67 const TiXmlElement *pMapping)
74 "Mapping X = X(x,z) needs 3 velocity components.");
81 int physTot =
m_fields[0]->GetTotPoints();
99 int physTot =
m_fields[0]->GetTotPoints();
111 Vmath::Vsub(physTot, inarray[2], 1, wk, 1, outarray[2], 1);
118 int physTot =
m_fields[0]->GetTotPoints();
125 Vmath::Vsub(physTot, outarray[0], 1, wk, 1, outarray[0], 1);
138 int physTot =
m_fields[0]->GetTotPoints();
148 Vmath::Vadd(physTot, inarray[2], 1, outarray[2], 1, outarray[2], 1);
153 int physTot =
m_fields[0]->GetTotPoints();
161 int physTot =
m_fields[0]->GetTotPoints();
171 int physTot =
m_fields[0]->GetTotPoints();
175 for (
int i = 0; i < nvel * nvel; i++)
180 for (
int i = 1; i < nvel; i++)
182 Vmath::Sadd(physTot, 1.0, outarray[i + nvel * i], 1,
183 outarray[i + nvel * i], 1);
189 Vmath::Vcopy(physTot, wk, 1, outarray[0 * nvel + 2], 1);
190 Vmath::Vcopy(physTot, wk, 1, outarray[2 * nvel + 0], 1);
194 outarray[0 * nvel + 0], 1);
199 Vmath::Vadd(physTot, wk, 1, outarray[2 * nvel + 2], 1,
200 outarray[2 * nvel + 2], 1);
206 int physTot =
m_fields[0]->GetTotPoints();
210 for (
int i = 0; i < nvel * nvel; i++)
215 for (
int i = 0; i < nvel; i++)
217 Vmath::Sadd(physTot, 1.0, outarray[i + nvel * i], 1,
218 outarray[i + nvel * i], 1);
225 Vmath::Vcopy(physTot, wk, 1, outarray[0 * nvel + 2], 1);
226 Vmath::Vcopy(physTot, wk, 1, outarray[2 * nvel + 0], 1);
231 Vmath::Vadd(physTot, wk, 1, outarray[0 * nvel + 0], 1,
232 outarray[0 * nvel + 0], 1);
236 Vmath::Vdiv(physTot, outarray[0 * nvel + 0], 1, wk, 1,
237 outarray[0 * nvel + 0], 1);
244 int physTot =
m_fields[0]->GetTotPoints();
250 Vmath::Vmul(physTot, wk, 1, inarray[2], 1, outarray[0], 1);
251 Vmath::Vmul(physTot, wk, 1, inarray[0], 1, outarray[2], 1);
257 Vmath::Vadd(physTot, outarray[0], 1, wk, 1, outarray[0], 1);
268 Vmath::Vadd(physTot, wk, 1, outarray[2], 1, outarray[2], 1);
275 int physTot =
m_fields[0]->GetTotPoints();
281 Vmath::Vmul(physTot, wk, 1, inarray[0], 1, outarray[2], 1);
282 Vmath::Vsub(physTot, inarray[2], 1, outarray[2], 1, outarray[2], 1);
285 Vmath::Vmul(physTot, wk, 1, inarray[2], 1, outarray[0], 1);
291 Vmath::Vsub(physTot, wk, 1, outarray[0], 1, outarray[0], 1);
301 int physTot =
m_fields[0]->GetTotPoints();
305 for (
int i = 0; i < nvel; i++)
307 for (
int j = 0; j < nvel; j++)
317 Vmath::Vmul(physTot, wk, 1, inarray[0], 1, outarray[0 * nvel + 0], 1);
319 Vmath::Vvtvp(physTot, wk, 1, inarray[2], 1, outarray[0 * nvel + 0], 1,
320 outarray[0 * nvel + 0], 1);
323 Vmath::Vmul(physTot, wk, 1, inarray[0], 1, outarray[0 * nvel + 2], 1);
325 Vmath::Vvtvp(physTot, wk, 1, inarray[2], 1, outarray[0 * nvel + 2], 1,
326 outarray[0 * nvel + 2], 1);
333 int physTot =
m_fields[0]->GetTotPoints();
337 for (
int i = 0; i < nvel; i++)
339 for (
int j = 0; j < nvel; j++)
349 Vmath::Vmul(physTot, wk, 1, inarray[0], 1, outarray[0 * nvel + 0], 1);
353 Vmath::Vmul(physTot, wk, 1, inarray[0], 1, outarray[0 * nvel + 2], 1);
354 Vmath::Vcopy(physTot, outarray[0 * nvel + 2], 1, outarray[2 * nvel + 0], 1);
358 Vmath::Vmul(physTot, wk, 1, inarray[0], 1, outarray[2 * nvel + 2], 1);
363 int phystot =
m_fields[0]->GetTotPoints();
371 bool waveSpace =
m_fields[0]->GetWaveSpace();
387 m_fields[0]->SetWaveSpace(waveSpace);
#define ASSERTL0(condition, msg)
Base class for mapping to be applied to the coordinate system.
int m_nConvectiveFields
Number of velocity components.
Array< OneD, Array< OneD, NekDouble > > m_GeometricInfo
Array with metric terms of the mapping.
Array< OneD, Array< OneD, NekDouble > > m_coords
Array with the Cartesian coordinates.
Array< OneD, MultiRegions::ExpListSharedPtr > m_fields
virtual GLOBAL_MAPPING_EXPORT void v_InitObject(const Array< OneD, MultiRegions::ExpListSharedPtr > &pFields, const TiXmlElement *pMapping)
bool m_constantJacobian
Flag defining if the Jacobian is constant.
GLOBAL_MAPPING_EXPORT void v_ApplyChristoffelCovar(const Array< OneD, Array< OneD, NekDouble > > &inarray, Array< OneD, Array< OneD, NekDouble > > &outarray) override
GLOBAL_MAPPING_EXPORT void v_UpdateGeomInfo() override
GLOBAL_MAPPING_EXPORT void v_RaiseIndex(const Array< OneD, Array< OneD, NekDouble > > &inarray, Array< OneD, Array< OneD, NekDouble > > &outarray) override
GLOBAL_MAPPING_EXPORT void v_GetJacobian(Array< OneD, NekDouble > &outarray) override
GLOBAL_MAPPING_EXPORT void v_ContravarToCartesian(const Array< OneD, Array< OneD, NekDouble > > &inarray, Array< OneD, Array< OneD, NekDouble > > &outarray) override
GLOBAL_MAPPING_EXPORT void v_ContravarFromCartesian(const Array< OneD, Array< OneD, NekDouble > > &inarray, Array< OneD, Array< OneD, NekDouble > > &outarray) override
static std::string className
Name of the class.
GLOBAL_MAPPING_EXPORT void v_DotGradJacobian(const Array< OneD, Array< OneD, NekDouble > > &inarray, Array< OneD, NekDouble > &outarray) override
GLOBAL_MAPPING_EXPORT void v_LowerIndex(const Array< OneD, Array< OneD, NekDouble > > &inarray, Array< OneD, Array< OneD, NekDouble > > &outarray) override
GLOBAL_MAPPING_EXPORT void v_ApplyChristoffelContravar(const Array< OneD, Array< OneD, NekDouble > > &inarray, Array< OneD, Array< OneD, NekDouble > > &outarray) override
GLOBAL_MAPPING_EXPORT void v_CovarToCartesian(const Array< OneD, Array< OneD, NekDouble > > &inarray, Array< OneD, Array< OneD, NekDouble > > &outarray) override
GLOBAL_MAPPING_EXPORT void v_CovarFromCartesian(const Array< OneD, Array< OneD, NekDouble > > &inarray, Array< OneD, Array< OneD, NekDouble > > &outarray) override
MappingXofXZ(const LibUtilities::SessionReaderSharedPtr &pSession, const Array< OneD, MultiRegions::ExpListSharedPtr > &pFields)
static GLOBAL_MAPPING_EXPORT MappingSharedPtr create(const LibUtilities::SessionReaderSharedPtr &pSession, const Array< OneD, MultiRegions::ExpListSharedPtr > &pFields, const TiXmlElement *pMapping)
Creates an instance of this class.
GLOBAL_MAPPING_EXPORT void v_GetInvMetricTensor(Array< OneD, Array< OneD, NekDouble > > &outarray) override
GLOBAL_MAPPING_EXPORT void v_InitObject(const Array< OneD, MultiRegions::ExpListSharedPtr > &pFields, const TiXmlElement *pMapping) override
GLOBAL_MAPPING_EXPORT void v_GetMetricTensor(Array< OneD, Array< OneD, NekDouble > > &outarray) override
tKey RegisterCreatorFunction(tKey idKey, CreatorFunction classCreator, std::string pDesc="")
Register a class with the factory.
MappingFactory & GetMappingFactory()
Declaration of the mapping factory singleton.
std::shared_ptr< SessionReader > SessionReaderSharedPtr
MultiRegions::Direction const DirCartesianMap[]
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.
void Neg(int n, T *x, const int incx)
Negate x = -x.
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
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.
void Vdiv(int n, const T *x, const int incx, const T *y, const int incy, T *z, const int incz)
Multiply vector z = x/y.
void Sadd(int n, const T alpha, const T *x, const int incx, T *y, const int incy)
Add vector y = alpha + x.
void Vcopy(int n, const T *x, const int incx, T *y, const int incy)
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.