SetEquation_Vector2D_t Subroutine

public subroutine SetEquation_Vector2D_t(this, idir, ivar, eqnChar)

Sets the equation parser for the idir direction and ivar-th variable

Arguments

TypeIntentOptionalAttributesName
class(Vector2D_t), intent(inout) :: this
integer, intent(in) :: idir
integer, intent(in) :: ivar
character, intent(in) :: eqnChar

Calls

proc~~setequation_vector2d_t~~CallsGraph proc~setequation_vector2d_t SetEquation_Vector2D_t equationparser equationparser proc~setequation_vector2d_t->equationparser

Contents


Source Code

  subroutine SetEquation_Vector2D_t(this,idir,ivar,eqnChar)
    !! Sets the equation parser for the `idir` direction and `ivar-th` variable
    implicit none
    class(Vector2D_t),intent(inout) :: this
    integer,intent(in) :: idir,ivar
    character(*),intent(in) :: eqnChar

    this%eqn(idir+2*(ivar-1)) = EquationParser(trim(eqnChar), &
                                               (/'x','y','z','t'/))

  endsubroutine SetEquation_Vector2D_t