fill_melt_m_per_yr Subroutine

public subroutine fill_melt_m_per_yr(state_handle, buf)

Basal melt rate in the ISOMIP+ reporting unit (m yr-1 of ice-equivalent freshwater) — see melt_m_per_yr_factor.

Arguments

Type IntentOptional Attributes Name
class(*), intent(in) :: state_handle
real(kind=wp), intent(inout) :: buf(:,:,:)

Calls

proc~~fill_melt_m_per_yr~~CallsGraph proc~fill_melt_m_per_yr fill_melt_m_per_yr proc~cavity_scale_impl cavity_scale_impl proc~fill_melt_m_per_yr->proc~cavity_scale_impl proc~melt_m_per_yr_factor melt_m_per_yr_factor proc~fill_melt_m_per_yr->proc~melt_m_per_yr_factor

Source Code

   subroutine fill_melt_m_per_yr(state_handle, buf)
      !! Basal melt rate in the ISOMIP+ reporting unit (m yr-1 of
      !! ice-equivalent freshwater) — see `melt_m_per_yr_factor`.
      class(*), intent(in) :: state_handle
      real(wp), intent(inout) :: buf(:, :, :)
      select type (state => state_handle)
      class is (ocean_state_t)
         call cavity_scale_impl(state%cavity_flux%melt, state%cavity_flux%active, &
                                melt_m_per_yr_factor(), buf)
      end select
   end subroutine fill_melt_m_per_yr