do_ice Interface

public interface do_ice

Calls

interface~~do_ice~~CallsGraph interface~do_ice do_ice proc~do_stim do_stim interface~do_ice->proc~do_stim

Contents


Module Procedures

private subroutine do_stim(dz, dt, ustar, Tw, S, Ta, precip, Qsw, Qfluxes)

Arguments

Arguments

Type IntentOptional AttributesName
real(kind=selected_real_kind), intent(inout) :: dz

layer thickness [m]

real(kind=selected_real_kind), intent(inout) :: dt

time step [s]

real(kind=selected_real_kind), intent(inout) :: ustar

surface friction velocity [m/s]

real(kind=selected_real_kind), intent(inout) :: Tw

water temperature [C]

real(kind=selected_real_kind), intent(inout) :: S

salinity [g/kg]

real(kind=selected_real_kind), intent(inout) :: Ta

air temperature [C]

real(kind=selected_real_kind), intent(inout) :: precip

precipitation [mm?]

real(kind=selected_real_kind), intent(inout) :: Qsw

short wave radiation [W/m^2]

private subroutine Qfluxes(T, qh, qe, qb)
Arguments
Type IntentOptional AttributesName
real(kind=selected_real_kind), intent(in) :: T

temperature [C]

real(kind=selected_real_kind), intent(out) :: qh

latent heat [W/m^2]

real(kind=selected_real_kind), intent(out) :: qe

sensible heat [W/m^2]

real(kind=selected_real_kind), intent(out) :: qb

net longwave radiation [W/m^2]