RadauIIA3.hxx

Go to the documentation of this file.

/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *\
 * Copyright (c) 2025, Davide Stocco and Enrico Bertolazzi.                                      *
 *                                                                                               *
 * The Sandals project is distributed under the BSD 2-Clause License.                            *
 *                                                                                               *
 * Davide Stocco                                                               Enrico Bertolazzi *
 * University of Trento                                                     University of Trento *
 * e-mail: davide.stocco@unitn.it                             e-mail: enrico.bertolazzi@unitn.it *
\* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
 
#pragma once
 
#ifndef SANDALS_RADAUIIA3_HXX
#define SANDALS_RADAUIIA3_HXX
 
namespace Sandals
{
  class RadauIIA3Tableau : public Tableau<2>
  {
  public:
    using Tableau<2>::Type;
    using Tableau<2>::Vector;
    using Tableau<2>::Matrix;

    RadauIIA3Tableau() {
      this->name  = "RadauIIA3";
      this->type  = Type::IRK;
      this->order = 3;
      this->A << 5.0/12.0, -1.0/12.0,
                 3.0/4.0,  1.0/4.0;
      this->b << 3.0/4.0, 1.0/4.0;
      this->c << 1.0/3.0, 1.0;
    }
  }; // class RadauIIA3Tableau

  template <Integer N, Integer M = 0>
  class RadauIIA3 : public RungeKutta<2, N, M>
  {
  public:
    using System = typename Implicit<N, M>::Pointer; 

    RadauIIA3() : RungeKutta<2, N, M>(RadauIIA3Tableau()) {}

    RadauIIA3(System t_system) : RungeKutta<2, N, M>(RadauIIA3Tableau(), t_system) {}
 
  }; // class RadauIIA3
 
} // namespace Sandals
 
#endif // SANDALS_RADAUIIA3_HXX