sheet_velocity Function

private function sheet_velocity(this) result(velocity)

Returns the velocity of the ice sheet across its domain.

Arguments

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

Return Value class(vector_field), allocatable

The ice velocity.


Contents

Source Code


Source Code

  function sheet_velocity(this) result(velocity)
    !* Author: Christopher MacMackin
    !  Date: July 2016
    !
    ! Returns the velocity of the ice sheet across its domain.
    !
    class(ice_sheet), intent(in)     :: this
    class(vector_field), allocatable :: velocity !! The ice velocity.
    allocate(velocity, source=this%velocity)
  end function sheet_velocity