Sets the time information held by the ice sheet object. This is the time at which the ice sheet is in its current state.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ice_sheet), | intent(inout) | :: | this | |||
| real(kind=r8), | intent(in) | :: | time | The time at which the glacier is in the present state. |
subroutine sheet_set_time(this, time)
!* Author: Christopher MacMackin
! Date: November 2016
!
! Sets the time information held by the ice sheet object. This is
! the time at which the ice sheet is in its current state.
!
class(ice_sheet), intent(inout) :: this
real(r8), intent(in) :: time
!! The time at which the glacier is in the present state.
this%time = time
end subroutine sheet_set_time