Returns the density of the ice in the sheet, which is assumed to be uniform across its domain.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ice_sheet), | intent(in) | :: | this |
The ice density.
pure function sheet_density(this) result(density)
!* Author: Christopher MacMackin
! Date: April 2016
!
! Returns the density of the ice in the sheet, which is assumed to be
! uniform across its domain.
!
class(ice_sheet), intent(in) :: this
real(r8) :: density !! The ice density.
end function sheet_density