Sets the equation parser for the idir
direction and ivar-th
variable
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(Vector2D_t), | intent(inout) | :: | this | |||
integer, | intent(in) | :: | idir | |||
integer, | intent(in) | :: | ivar | |||
character, | intent(in) | :: | eqnChar |
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