Sets the equation parser for the idir direction and ivar-th variable
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(Vector3D_t), | intent(inout) | :: | this | |||
| integer, | intent(in) | :: | idir | |||
| integer, | intent(in) | :: | ivar | |||
| character, | intent(in) | :: | eqnChar |
subroutine SetEquation_Vector3D_t(this,idir,ivar,eqnChar)
!! Sets the equation parser for the `idir` direction and `ivar-th` variable
implicit none
class(Vector3D_t),intent(inout) :: this
integer,intent(in) :: idir,ivar
character(*),intent(in) :: eqnChar
this%eqn(idir+3*(ivar-1)) = EquationParser(trim(eqnChar), &
(/'x','y','z','t'/))
endsubroutine SetEquation_Vector3D_t