SetNumberOfVariables_Model Subroutine

  1. SELF_Model.f90
  2. SELF_Model
  3. SetNumberOfVariables_Model

public subroutine SetNumberOfVariables_Model(this)

Arguments

TypeIntentOptionalAttributesName
class(Model), intent(inout) :: this

Contents

Source Code

SetNumberOfVariables_Model

Source Code

  subroutine SetNumberOfVariables_Model(this)
    implicit none
    class(Model),intent(inout) :: this

    this%nvar = 1

  endsubroutine SetNumberOfVariables_Model