Branch data     Line data    Source code

       1                 :            : // *****************************************************************************
       2                 :            : /*!
       3                 :            :   \file      src/DiffEq/Beta/NumberFractionBetaCoeffPolicy.cpp
       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     Mass-fraction beta SDE coefficients policies
       9                 :            :   \details   This file defines coefficients policy classes for the mass-fraction
      10                 :            :              beta SDE, defined in DiffEq/Beta/NumberFractionBeta.h. For
      11                 :            :              general requirements on number-fraction beta SDE coefficients
      12                 :            :              policy classes see the header file.
      13                 :            : */
      14                 :            : // *****************************************************************************
      15                 :            : 
      16                 :            : #include "NumberFractionBetaCoeffPolicy.hpp"
      17                 :            : 
      18                 :         11 : walker::NumFracBetaCoeffConst::NumFracBetaCoeffConst(
      19                 :            :   tk::ctr::ncomp_t ncomp,
      20                 :            :   const std::vector< kw::sde_b::info::expect::type >& b_,
      21                 :            :   const std::vector< kw::sde_S::info::expect::type >& S_,
      22                 :            :   const std::vector< kw::sde_kappa::info::expect::type >& k_,
      23                 :            :   const std::vector< kw::sde_rho2::info::expect::type >& rho2_,
      24                 :            :   const std::vector< kw::sde_rcomma::info::expect::type >& rcomma_,
      25                 :            :   std::vector< kw::sde_b::info::expect::type >& b,
      26                 :            :   std::vector< kw::sde_S::info::expect::type >& S,
      27                 :            :   std::vector< kw::sde_kappa::info::expect::type >& k,
      28                 :            :   std::vector< kw::sde_rho2::info::expect::type >& rho2,
      29                 :            :   std::vector< kw::sde_rcomma::info::expect::type >& rcomma )
      30                 :            : // *****************************************************************************
      31                 :            : // Constructor: initialize coefficients
      32                 :            : //! \param[in] ncomp Number of scalar components in this SDE system
      33                 :            : //! \param[in] b_ Vector used to initialize coefficient vector b
      34                 :            : //! \param[in] S_ Vector used to initialize coefficient vector S
      35                 :            : //! \param[in] k_ Vector used to initialize coefficient vector k
      36                 :            : //! \param[in] rho2_ Vector used to initialize coefficient vector rho2
      37                 :            : //! \param[in] rcomma_ Vector used to initialize coefficient vector rcomma
      38                 :            : //! \param[in,out] b Coefficient vector to be initialized
      39                 :            : //! \param[in,out] S Coefficient vector to be initialized
      40                 :            : //! \param[in,out] k Coefficient vector to be initialized
      41                 :            : //! \param[in,out] rho2 Coefficient vector to be initialized
      42                 :            : //! \param[in,out] rcomma Coefficient vector to be initialized
      43                 :            : // *****************************************************************************
      44                 :            : {
      45 [ -  + ][ -  - ]:         11 :   ErrChk( b_.size() == ncomp,
         [ -  - ][ -  - ]
      46                 :            :           "Wrong number of number-fraction beta SDE parameters 'b'");
      47 [ -  + ][ -  - ]:         11 :   ErrChk( S_.size() == ncomp,
         [ -  - ][ -  - ]
      48                 :            :           "Wrong number of number-fraction beta SDE parameters 'S'");
      49 [ -  + ][ -  - ]:         11 :   ErrChk( k_.size() == ncomp,
         [ -  - ][ -  - ]
      50                 :            :           "Wrong number of number-fraction beta SDE parameters 'kappa'");
      51 [ -  + ][ -  - ]:         11 :   ErrChk( rho2_.size() == ncomp,
         [ -  - ][ -  - ]
      52                 :            :           "Wrong number of number-fraction beta SDE parameters 'rho2'");
      53 [ -  + ][ -  - ]:         11 :   ErrChk( rcomma_.size() == ncomp,
         [ -  - ][ -  - ]
      54                 :            :           "Wrong number of number-fraction beta SDE parameters 'rcomma'");
      55                 :            : 
      56                 :         11 :   b = b_;
      57                 :         11 :   S = S_;
      58                 :         11 :   k = k_;
      59                 :         11 :   rho2 = rho2_;
      60                 :         11 :   rcomma = rcomma_;
      61                 :         11 : }