Branch data     Line data    Source code

       1                 :            : // *****************************************************************************
       2                 :            : /*!
       3                 :            :   \file      src/PDE/MultiSpecies/Problem/BoxInitialization.hpp
       4                 :            :   \copyright 2012-2015 J. Bakosi,
       5                 :            :              2016-2018 Los Alamos National Security, LLC.,
       6                 :            :              2019-2021 Triad National Security, LLC.
       7                 :            :              All rights reserved. See the LICENSE file for details.
       8                 :            :   \brief     User-defined box initialization
       9                 :            :   \details   This file defines functions for initializing solutions for
      10                 :            :     compressible multi-species equations inside the user-defined box.
      11                 :            : */
      12                 :            : // *****************************************************************************
      13                 :            : #ifndef MultiSpeciesBoxInitialization_h
      14                 :            : #define MultiSpeciesBoxInitialization_h
      15                 :            : 
      16                 :            : #include "Fields.hpp"
      17                 :            : #include "EoS/EOS.hpp"
      18                 :            : #include "ContainerUtil.hpp"
      19                 :            : #include "MultiSpecies/MultiSpeciesIndexing.hpp"
      20                 :            : 
      21                 :            : namespace inciter {
      22                 :            : 
      23                 :            : using ncomp_t = tk::ncomp_t;
      24                 :            : 
      25                 :            : template< class B >
      26                 :          0 : void initializeBox( const std::vector< EOS >& mat_blk,
      27                 :            :                     tk::real /*V_ex*/,
      28                 :            :                     tk::real /*t*/,
      29                 :            :                     const B& b,
      30                 :            :                     std::vector< tk::real >& s )
      31                 :            : // *****************************************************************************
      32                 :            : // Set the solution in the user-defined IC box/mesh block
      33                 :            : //! \tparam B IC-block type to operate, ctr::box, or ctr::meshblock
      34                 :            : // //! \param[in] V_ex Exact box volume
      35                 :            : // //! \param[in] t Physical time
      36                 :            : //! \param[in] b IC box configuration to use
      37                 :            : //! \param[in,out] s Solution vector that is set to box ICs
      38                 :            : //! \details This function sets the fluid density and total specific energy
      39                 :            : //!   within a box initial condition, configured by the user. If the user
      40                 :            : //!   is specified a box where mass is specified, we also assume here that
      41                 :            : //!   internal energy content (energy per unit volume) is also
      42                 :            : //!   specified. Specific internal energy (energy per unit mass) is then
      43                 :            : //!   computed here (and added to the kinetic energy) from the internal
      44                 :            : //!   energy per unit volume by multiplying it with the total box volume
      45                 :            : //!   and dividing it by the total mass of the material in the box.
      46                 :            : //!   Example (SI) units of the quantities involved:
      47                 :            : //!    * internal energy content (energy per unit volume): J/m^3
      48                 :            : //!    * specific energy (internal energy per unit mass): J/kg
      49                 :            : // *****************************************************************************
      50                 :            : {
      51                 :            : 
      52                 :          0 :   auto nspec = g_inputdeck.get< tag::multispecies, tag::nspec >();
      53                 :            : 
      54                 :          0 :   const auto& initiate = b.template get< tag::initiate >();
      55                 :            : 
      56                 :            :   // get species id in box (offset by 1, since input deck uses 1-based ids)
      57                 :          0 :   const auto& boxmassfrac = b.template get< tag::mass_fractions >();
      58                 :          0 :   const auto& boxvel = b.template get< tag::velocity >();
      59                 :          0 :   auto boxpre = b.template get< tag::pressure >();
      60                 :          0 :   auto boxene = b.template get< tag::energy >();
      61                 :          0 :   auto boxtemp = b.template get< tag::temperature >();
      62                 :          0 :   auto boxmas = b.template get< tag::mass >();
      63                 :            : 
      64                 :          0 :   auto alphamin = 1.0e-12;
      65                 :            : 
      66                 :            :   // [I] Compute the states inside the IC box/block based on the type of user
      67                 :            :   // input.
      68                 :            : 
      69                 :            :   // species volume fractions
      70         [ -  - ]:          0 :   auto alphas = boxmassfrac;
      71                 :          0 :   tk::real total_al(0.0);
      72         [ -  - ]:          0 :   for (std::size_t k=0; k<nspec; ++k) {
      73                 :          0 :     alphas[k] = std::max(alphas[k], alphamin);
      74                 :          0 :     total_al += alphas[k];
      75                 :            :   }
      76         [ -  - ]:          0 :   for (std::size_t k=0; k<nspec; ++k) alphas[k] /= total_al;
      77                 :            : 
      78                 :            :   // material states (density, pressure, velocity)
      79                 :          0 :   tk::real u = 0.0, v = 0.0, w = 0.0, spi(0.0), pr(0.0), rbulk(0.0);
      80         [ -  - ]:          0 :   std::vector< tk::real > rhok(nspec, 0.0);
      81                 :            : 
      82                 :            :   // 1. User-specified mass, specific energy (J/m^3) and volume of box
      83 [ -  - ][ -  - ]:          0 :   if (boxmas > 0.0 || initiate != ctr::InitiateType::IMPULSE) {
      84 [ -  - ][ -  - ]:          0 :     Throw( "IC-box initialization type not supported in multispecies" );
                 [ -  - ]
      85                 :            :   }
      86                 :            :   // 2. User-specified temperature, pressure and velocity in box
      87                 :            :   else {
      88         [ -  - ]:          0 :     for (std::size_t k=0; k<nspec; ++k) {
      89         [ -  - ]:          0 :       rhok[k] = mat_blk[0].compute< EOS::density >(boxpre, boxtemp);
      90                 :          0 :       rbulk += alphas[k]*rhok[k];
      91                 :            :     }
      92         [ -  - ]:          0 :     if (boxvel.size() == 3) {
      93                 :          0 :       u = boxvel[0];
      94                 :          0 :       v = boxvel[1];
      95                 :          0 :       w = boxvel[2];
      96                 :            :     }
      97         [ -  - ]:          0 :     if (boxpre > 0.0) {
      98                 :          0 :       pr = boxpre;
      99                 :            :     }
     100         [ -  - ]:          0 :     if (boxene > 0.0) {
     101 [ -  - ][ -  - ]:          0 :       Throw("IC-box with specified energy not set up for multispecies");
                 [ -  - ]
     102                 :            :     }
     103                 :            : 
     104         [ -  - ]:          0 :     spi = mat_blk[0].compute< EOS::totalenergy >(rbulk, u, v, w, pr) / rbulk;
     105                 :            :   }
     106                 :            : 
     107                 :            :   // [II] Finally initialize the solution vector
     108                 :            :   // partial density
     109         [ -  - ]:          0 :   for (std::size_t k=0; k<nspec; ++k) {
     110                 :          0 :     s[multispecies::densityIdx(nspec,k)] = alphas[k] * rhok[k];
     111                 :            :   }
     112                 :            :   // total specific energy
     113                 :          0 :   s[multispecies::energyIdx(nspec,0)] = rbulk * spi;
     114                 :            :   // bulk momentum
     115                 :          0 :   s[multispecies::momentumIdx(nspec,0)] = rbulk * u;
     116                 :          0 :   s[multispecies::momentumIdx(nspec,1)] = rbulk * v;
     117                 :          0 :   s[multispecies::momentumIdx(nspec,2)] = rbulk * w;
     118                 :          0 : }
     119                 :            : 
     120                 :            : } //inciter::
     121                 :            : 
     122                 :            : #endif // MultiSpeciesBoxInitialization_h