Peano
Loading...
Searching...
No Matches
Iceland.h
Go to the documentation of this file.
1#ifndef EXASEIS_SCENARIOTPVFIVE_HEADER
2#define EXASEIS_SCENARIOTPVFIVE_HEADER
3#include "Scenario.h"
4
5template <class Shortcuts, int basisSize>
6class TPV5: public Scenario<Shortcuts, basisSize> {
7
8public:
10 Scenario<Shortcuts, basisSize>(info){};
11
13 const double* const x,
15 const double t,
16 const double dt,
17 double* Q
18 ) {
19 Shortcuts s;
20
21#ifdef ISOTROPIC
22 Q[s.rho] = 2.67;
23 Q[s.cp] = 6.0;
24 Q[s.cs] = 3.464;
25#elif defined ANISOTROPIC
26 assertion1(false, "TPV5 Not implemented in the Anisotropic case");
27#else
28#error Whole space problem only defined for Isotropic and Anisotropic Scenario
29#endif
30 }
31
32 void refinementCriteria(std::vector<Refinement::RefinementCriterion<Shortcuts>*>& criteria) override {
33 // criteria.push_back(new Refinement::StaticAMR<Shortcuts>);
34 double left_edge[3];
35 left_edge[0] = 19.9;
36 left_edge[1] = 7.4;
37 left_edge[2] = 19.9;
38 double right_edge[3];
39 right_edge[0] = 20.1;
40 right_edge[1] = 7.6;
41 right_edge[2] = 20.1;
42
43 criteria.push_back(new Refinement::RefineBetweenPositions<Shortcuts>(left_edge, right_edge));
44 criteria.push_back(new Refinement::trackVelocity<Shortcuts>(basisSize, -0.00001, 0.25));
45 }
46};
47#endif
#define assertion1(expr, param)
DomainInformation * info
Definition Scenario.h:35
Definition Iceland.h:6
TPV5(DomainInformation *info)
Definition Iceland.h:9
void refinementCriteria(std::vector< Refinement::RefinementCriterion< Shortcuts > * > &criteria) override
Definition Iceland.h:32
void initUnknownsPointwise(const double *const x, const tarch::la::Vector< Dimensions, double > &center, const double t, const double dt, double *Q)
Definition Iceland.h:12
Simple vector class.
Definition Vector.h:159