Line data    Source code

       1              : #ifndef INTEGRATOR_FLAME_H
       2              : #define INTEGRATOR_FLAME_H
       3              : 
       4              : #include <limits>
       5              : 
       6              : #include "Integrator/Integrator.H"
       7              : #include "BC/BC.H"
       8              : #include "IC/IC.H"
       9              : #include "Set/Set.H"
      10              : #include "Model/Solid/Finite/NeoHookeanPredeformed.H"
      11              : #include "IO/ParmParse.H"
      12              : 
      13              : #include "Base/Mechanics.H"
      14              : 
      15              : #include "Model/Propellant/PowerLaw.H"
      16              : #include "Model/Propellant/FullFeedback.H"
      17              : #include "Model/Propellant/Homogenize.H"
      18              : 
      19              : namespace Integrator
      20              : {
      21              : 
      22              : class Flame : virtual public Integrator::Integrator,
      23              :     virtual public Base::Mechanics<Model::Solid::Finite::NeoHookeanPredeformed>
      24              : {
      25              : 
      26              :     using model_type = Model::Solid::Finite::NeoHookeanPredeformed;
      27              : 
      28              : public:
      29              :     static constexpr const char* name = "flame";
      30              : 
      31              :     Flame();
      32              :     Flame(IO::ParmParse& pp);
      33              : 
      34              :     static void Forbids(IO::ParmParse& pp);
      35              : 
      36              :     static void Parse(Flame& value, IO::ParmParse& pp);
      37              : 
      38            6 :     virtual ~Flame()
      39            3 :     {
      40            3 :         delete ic_eta;
      41            3 :         delete ic_phi;
      42            3 :         delete thermal.ic_temp;
      43            3 :         delete ic_laser;
      44            3 :         delete bc_eta;
      45            3 :         delete bc_temp;
      46            6 :     }
      47              : 
      48              : protected:
      49              :     void Initialize(int lev) override;
      50              :     void TimeStepBegin(Set::Scalar a_time, int a_iter) override;
      51              :     void TimeStepComplete(Set::Scalar a_time, int a_iter) override;
      52              :     void Advance(int lev, Set::Scalar time, Set::Scalar dt) override;
      53              :     void TagCellsForRefinement(int lev, amrex::TagBoxArray& tags, amrex::Real /*time*/, int /*ngrow*/) override;
      54              :     void Regrid(int lev, Set::Scalar time) override;
      55              :     void Integrate(int amrlev, Set::Scalar time, int step,
      56              :         const amrex::MFIter& mfi, const amrex::Box& box) override;
      57              :     void UpdateModel(int a_step, Set::Scalar a_time) override;
      58              : 
      59              :     Set::Field<Set::Scalar> temp_mf;
      60              :     Set::Field<Set::Scalar> temp_old_mf;
      61              :     Set::Field<Set::Scalar> temps_mf;
      62              : 
      63              :     Set::Field<Set::Scalar> eta_mf;
      64              :     Set::Field<Set::Scalar> eta_old_mf;
      65              :     Set::Field<Set::Scalar> mdot_mf;
      66              : 
      67              :     Set::Field<Set::Scalar> phi_mf;
      68              :     Set::Field<Set::Scalar> field;
      69              :     Set::Field<Set::Scalar> alpha_mf;
      70              :     Set::Field<Set::Scalar> heatflux_mf;
      71              : 
      72              :     Set::Field<Set::Scalar> laser_mf;
      73              : 
      74              :     BC::BC<Set::Scalar>* bc_temp = nullptr;
      75              :     BC::BC<Set::Scalar>* bc_eta = nullptr;
      76              :     IC::IC<Set::Scalar>* ic_phi = nullptr;
      77              :     IC::IC<Set::Scalar>* ic_laser = nullptr;
      78              : 
      79              :     Set::Scalar phi_refinement_criterion = std::numeric_limits<Set::Scalar>::infinity();
      80              :     Set::Scalar m_refinement_criterion = NAN;
      81              :     Set::Scalar t_refinement_criterion = NAN;
      82              :     Set::Scalar t_refinement_restriction = NAN;
      83              :     Set::Scalar small = NAN;
      84              :     IC::IC<Set::Scalar>* ic_eta = nullptr;
      85              :     bool plot_field = true;
      86              :     int variable_pressure = -1;
      87              : 
      88              :     // Phase field model variables
      89              :     struct {
      90              :         Set::Scalar eps = NAN;
      91              :         Set::Scalar lambda = NAN;
      92              :         Set::Scalar kappa = NAN;
      93              :         Set::Scalar w1 = NAN, w12 = NAN, w0 = NAN;
      94              :         Set::Scalar min_eta = 0.001;
      95              :     } pf;
      96              : 
      97              :     // Thermal transport variables
      98              :     struct {
      99              :         bool on = 0;
     100              :         Set::Scalar hc = NAN;
     101              :         Set::Scalar Tref = NAN;
     102              :         Set::Scalar Tfluid = NAN;
     103              :         IC::IC<Set::Scalar>* ic_temp = nullptr;
     104              :     } thermal;
     105              : 
     106              :     // Thermoelastic variables
     107              :     struct {
     108              :         int on = 0;
     109              :         Set::Scalar Telastic = NAN;
     110              :         model_type model_ap, model_htpb;
     111              :         Set::Scalar traction = NAN;
     112              :         int phirefinement = -1;
     113              :     } elastic;
     114              : 
     115              :     // Chamber state variables (not inputs)
     116              :     struct {
     117              :         // Integrated variables
     118              :         Set::Scalar volume = 0.0;
     119              :         Set::Scalar area = 0.0;
     120              :         Set::Scalar massflux = 0.0;
     121              :         // Intensive variables
     122              :         Set::Scalar pressure = NAN;
     123              :     } chamber;
     124              : 
     125              : 
     126              :     // Propellant model
     127              :     Model::Propellant::Propellant<
     128              :         Model::Propellant::PowerLaw,
     129              :         Model::Propellant::FullFeedback,
     130              :         Model::Propellant::Homogenize> propellant;
     131              : };
     132              : }
     133              : 
     134              : #endif