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 : }
|