Sets the model % t attribute with the provided simulation time
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(Model), | intent(inout) | :: | this | |||
| real(kind=prec), | intent(in) | :: | t |
subroutine SetSimulationTime(this,t)
!! Sets the model % t attribute with the provided simulation time
implicit none
class(Model),intent(inout) :: this
real(prec),intent(in) :: t
this%t = t
endsubroutine SetSimulationTime