Branch data Line data Source code
1 : : // *****************************************************************************
2 : : /*!
3 : : \file src/DiffEq/Gamma/ConfigureGamma.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 Register and compile configuration on the gamma SDE
9 : : \details Register and compile configuration on the gamma SDE.
10 : : */
11 : : // *****************************************************************************
12 : :
13 : : #include <set>
14 : : #include <map>
15 : : #include <vector>
16 : : #include <string>
17 : : #include <utility>
18 : :
19 : : #include <brigand/algorithms/for_each.hpp>
20 : :
21 : : #include "Tags.hpp"
22 : : #include "CartesianProduct.hpp"
23 : : #include "DiffEqFactory.hpp"
24 : : #include "Walker/Options/DiffEq.hpp"
25 : : #include "Walker/Options/InitPolicy.hpp"
26 : :
27 : : #include "ConfigureGamma.hpp"
28 : : #include "Gamma.hpp"
29 : : #include "GammaCoeffPolicy.hpp"
30 : :
31 : : namespace walker {
32 : :
33 : : void
34 : 374 : registerGamma( DiffEqFactory& f, std::set< ctr::DiffEqType >& t )
35 : : // *****************************************************************************
36 : : // Register gamma SDE into DiffEq factory
37 : : //! \param[in,out] f Differential equation factory to register to
38 : : //! \param[in,out] t Counters for equation types registered
39 : : // *****************************************************************************
40 : : {
41 : : // Construct vector of vectors for all possible policies for SDE
42 : : using GammaPolicies =
43 : : tk::cartesian_product< InitPolicies, GammaCoeffPolicies >;
44 : : // Register SDE for all combinations of policies
45 : : brigand::for_each< GammaPolicies >(
46 : 374 : registerDiffEq< Gamma >( f, ctr::DiffEqType::GAMMA, t ) );
47 : 374 : }
48 : :
49 : : std::vector< std::pair< std::string, std::string > >
50 : 4 : infoGamma( std::map< ctr::DiffEqType, tk::ctr::ncomp_t >& cnt )
51 : : // *****************************************************************************
52 : : // Return information on the gamma SDE
53 : : //! \param[inout] cnt std::map of counters for all differential equation types
54 : : //! \return vector of string pairs describing the SDE configuration
55 : : // *****************************************************************************
56 : : {
57 [ + - ]: 4 : auto c = ++cnt[ ctr::DiffEqType::GAMMA ]; // count eqs
58 : : --c; // used to index vectors starting with 0
59 : :
60 : : std::vector< std::pair< std::string, std::string > > nfo;
61 : :
62 [ + - ][ + - ]: 8 : nfo.emplace_back( ctr::DiffEq().name( ctr::DiffEqType::GAMMA ), "" );
63 : :
64 [ + - ]: 4 : nfo.emplace_back( "start offset in particle array", std::to_string(
65 [ + - ][ + - ]: 4 : g_inputdeck.get< tag::component >().offset< tag::gamma >(c) ) );
66 : 4 : auto ncomp = g_inputdeck.get< tag::component >().get< tag::gamma >()[c];
67 [ + - ][ + - ]: 4 : nfo.emplace_back( "number of components", std::to_string( ncomp ) );
68 : :
69 [ + - ]: 4 : nfo.emplace_back( "kind", "stochastic" );
70 : 4 : nfo.emplace_back( "dependent variable", std::string( 1,
71 [ + - ][ + - ]: 4 : g_inputdeck.get< tag::param, tag::gamma, tag::depvar >()[c] ) );
72 [ + - ]: 4 : nfo.emplace_back( "initialization policy", ctr::InitPolicy().name(
73 [ + - ]: 8 : g_inputdeck.get< tag::param, tag::gamma, tag::initpolicy >()[c] ) );
74 [ + - ]: 4 : nfo.emplace_back( "coefficients policy", ctr::CoeffPolicy().name(
75 [ + - ]: 8 : g_inputdeck.get< tag::param, tag::gamma, tag::coeffpolicy >()[c] ) );
76 [ + - ][ - + ]: 8 : nfo.emplace_back( "random number generator", tk::ctr::RNG().name(
77 [ + - ]: 8 : g_inputdeck.get< tag::param, tag::gamma, tag::rng >()[c] ) );
78 : : nfo.emplace_back(
79 [ + - ][ + - ]: 8 : "coeff b [" + std::to_string( ncomp ) + "]",
[ + - ][ - + ]
[ - + ][ - + ]
[ - - ][ - - ]
[ - - ]
80 [ + - ][ + - ]: 12 : parameters( g_inputdeck.get< tag::param, tag::gamma, tag::b >().at(c) ) );
[ - + ]
81 : : nfo.emplace_back(
82 [ + - ][ + - ]: 8 : "coeff S [" + std::to_string( ncomp ) + "]",
[ + - ][ - + ]
[ - + ][ - + ]
[ - - ][ - - ]
[ - - ]
83 [ + - ][ + - ]: 12 : parameters( g_inputdeck.get< tag::param, tag::gamma, tag::S >().at(c) ) );
[ - + ]
84 : : nfo.emplace_back(
85 [ + - ][ + - ]: 8 : "coeff kappa [" + std::to_string( ncomp ) + "]",
[ + - ][ - + ]
[ - + ][ - + ]
[ - - ][ - - ]
[ - - ]
86 [ + - ][ - + ]: 8 : parameters( g_inputdeck.get< tag::param, tag::gamma, tag::kappa >().at(c) )
87 [ + - ]: 4 : );
88 [ + - ]: 4 : spikes( nfo, g_inputdeck.get< tag::param, tag::gamma, tag::init,
89 : : tag::spike >().at(c) );
90 [ + - ]: 4 : betapdfs( nfo, g_inputdeck.get< tag::param, tag::gamma, tag::init,
91 : : tag::betapdf >().at(c) );
92 : :
93 : 4 : return nfo;
94 : : }
95 : :
96 : : } // walker::
|