GetSimulationTime Subroutine

public subroutine GetSimulationTime(this, t)

Returns the current simulation time stored in the model % t attribute

Arguments

TypeIntentOptionalAttributesName
class(Model), intent(in) :: this
real(kind=prec), intent(out) :: t

Contents

Source Code


Source Code

  subroutine GetSimulationTime(this,t)
    !! Returns the current simulation time stored in the model % t attribute
    implicit none
    class(Model),intent(in) :: this
    real(prec),intent(out) :: t

    t = this%t

  endsubroutine GetSimulationTime