123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181 |
- #ifndef BOOST_NUMERIC_ODEINT_STEPPER_RUNGE_KUTTA4_HPP_INCLUDED
- #define BOOST_NUMERIC_ODEINT_STEPPER_RUNGE_KUTTA4_HPP_INCLUDED
- #include <boost/fusion/container/vector.hpp>
- #include <boost/fusion/container/generation/make_vector.hpp>
- #include <boost/numeric/odeint/stepper/explicit_generic_rk.hpp>
- #include <boost/numeric/odeint/algebra/range_algebra.hpp>
- #include <boost/numeric/odeint/algebra/default_operations.hpp>
- #include <boost/numeric/odeint/algebra/algebra_dispatcher.hpp>
- #include <boost/numeric/odeint/algebra/operations_dispatcher.hpp>
- #include <array>
- #include <boost/numeric/odeint/util/resizer.hpp>
- namespace boost {
- namespace numeric {
- namespace odeint {
- #ifndef DOXYGEN_SKIP
- template< class Value = double >
- struct rk4_coefficients_a1 : std::array< Value , 1 >
- {
- rk4_coefficients_a1( void )
- {
- (*this)[0] = static_cast< Value >( 1 ) / static_cast< Value >( 2 );
- }
- };
- template< class Value = double >
- struct rk4_coefficients_a2 : std::array< Value , 2 >
- {
- rk4_coefficients_a2( void )
- {
- (*this)[0] = static_cast<Value>(0);
- (*this)[1] = static_cast< Value >( 1 ) / static_cast< Value >( 2 );
- }
- };
- template< class Value = double >
- struct rk4_coefficients_a3 : std::array< Value , 3 >
- {
- rk4_coefficients_a3( void )
- {
- (*this)[0] = static_cast<Value>(0);
- (*this)[1] = static_cast<Value>(0);
- (*this)[2] = static_cast<Value>(1);
- }
- };
- template< class Value = double >
- struct rk4_coefficients_b : std::array< Value , 4 >
- {
- rk4_coefficients_b( void )
- {
- (*this)[0] = static_cast<Value>(1)/static_cast<Value>(6);
- (*this)[1] = static_cast<Value>(1)/static_cast<Value>(3);
- (*this)[2] = static_cast<Value>(1)/static_cast<Value>(3);
- (*this)[3] = static_cast<Value>(1)/static_cast<Value>(6);
- }
- };
- template< class Value = double >
- struct rk4_coefficients_c : std::array< Value , 4 >
- {
- rk4_coefficients_c( void )
- {
- (*this)[0] = static_cast<Value>(0);
- (*this)[1] = static_cast< Value >( 1 ) / static_cast< Value >( 2 );
- (*this)[2] = static_cast< Value >( 1 ) / static_cast< Value >( 2 );
- (*this)[3] = static_cast<Value>(1);
- }
- };
- #endif
- template<
- class State ,
- class Value = double ,
- class Deriv = State ,
- class Time = Value ,
- class Algebra = typename algebra_dispatcher< State >::algebra_type ,
- class Operations = typename operations_dispatcher< State >::operations_type ,
- class Resizer = initially_resizer
- >
- #ifndef DOXYGEN_SKIP
- class runge_kutta4 : public explicit_generic_rk< 4 , 4 , State , Value , Deriv , Time ,
- Algebra , Operations , Resizer >
- #else
- class runge_kutta4 : public explicit_generic_rk
- #endif
- {
- public:
- #ifndef DOXYGEN_SKIP
- typedef explicit_generic_rk< 4 , 4 , State , Value , Deriv , Time ,
- Algebra , Operations , Resizer > stepper_base_type;
- #endif
- typedef typename stepper_base_type::state_type state_type;
- typedef typename stepper_base_type::value_type value_type;
- typedef typename stepper_base_type::deriv_type deriv_type;
- typedef typename stepper_base_type::time_type time_type;
- typedef typename stepper_base_type::algebra_type algebra_type;
- typedef typename stepper_base_type::operations_type operations_type;
- typedef typename stepper_base_type::resizer_type resizer_type;
- #ifndef DOXYGEN_SKIP
- typedef typename stepper_base_type::wrapped_state_type wrapped_state_type;
- typedef typename stepper_base_type::wrapped_deriv_type wrapped_deriv_type;
- typedef typename stepper_base_type::stepper_type stepper_type;
- #endif
- runge_kutta4( const algebra_type &algebra = algebra_type() ) : stepper_base_type(
- boost::fusion::make_vector( rk4_coefficients_a1<Value>() , rk4_coefficients_a2<Value>() , rk4_coefficients_a3<Value>() ) ,
- rk4_coefficients_b<Value>() , rk4_coefficients_c<Value>() , algebra )
- { }
- };
- }
- }
- }
- #endif
|