tem_varSys_setParams_dummy Subroutine

public subroutine tem_varSys_setParams_dummy(fun, varSys, instring)

Arguments

Type IntentOptional Attributes Name
class(tem_varSys_op_type), intent(in) :: fun

Description of the method to obtain the variables, here some preset values might be stored, like the space time function to use or the required variables.
type(tem_varSys_type), intent(in) :: varSys

The variable system to obtain the variable from.
character(len=*), intent(in) :: instring

Input string with parameter to set in method_data

Calls

proc~~tem_varsys_setparams_dummy~~CallsGraph proc~tem_varsys_setparams_dummy tem_varSys_setParams_dummy proc~tem_abort tem_abort proc~tem_varsys_setparams_dummy->proc~tem_abort mpi_abort mpi_abort proc~tem_abort->mpi_abort

Contents

Source Code

tem_varSys_setParams_dummy

Source Code

  subroutine tem_varSys_setParams_dummy(fun, varSys, instring)
    !> Description of the method to obtain the variables, here some preset
    !! values might be stored, like the space time function to use or the
    !! required variables.
    class(tem_varSys_op_type), intent(in) :: fun

    !> The variable system to obtain the variable from.
    type(tem_varSys_type), intent(in) :: varSys

    !> Input string with parameter to set in method_data
    character(len=*), intent(in) :: instring

    ! Nothing to do here ...
    write(*,*) trim(instring)
    call tem_abort('Not implemented for '//trim(varSys%varName%val(fun%myPos)) &
      &         // ':is dummy setParams')
  end subroutine tem_varSys_setParams_dummy