get_time Function

  1. cryosphere.F90
  2. cryosphere_mod
  3. get_time

private pure function get_time(this)

Returns the current time of the cryosphere system.

Arguments

Type IntentOptional AttributesName
class(cryosphere), intent(in) :: this

Return Value real(kind=r8)


Contents

Source Code

get_time

Source Code

  pure function get_time(this)
    !* Author: Chris MacMackin
    !  Date: April 2017
    !
    ! Returns the current time of the cryosphere system.
    !
    class(cryosphere), intent(in) :: this
    real(r8)                      :: get_time
    get_time = this%time
  end function get_time