get_surface_fluxes Subroutine

public subroutine get_surface_fluxes(psa, ua, va, ta, qa, rh, phi, phi0, fmask, tsea, ssrd, slrd, ustr, vstr, shf, evap, slru, hfluxn, tsfc, tskin, u0, v0, t0, lfluxland)

Uses

  • proc~~get_surface_fluxes~~UsesGraph proc~get_surface_fluxes get_surface_fluxes module~physical_constants physical_constants proc~get_surface_fluxes->module~physical_constants module~land_model land_model proc~get_surface_fluxes->module~land_model module~geometry geometry proc~get_surface_fluxes->module~geometry module~humidity humidity proc~get_surface_fluxes->module~humidity module~mod_radcon mod_radcon proc~get_surface_fluxes->module~mod_radcon module~params params module~physical_constants->module~params module~land_model->module~params module~geometry->module~params module~humidity->module~params module~mod_radcon->module~params

Compute surface fluxes of momentum, energy and moisture, and define surface skin temperature from energy balance

Arguments

Type IntentOptional AttributesName
real, intent(in) :: psa(ix,il)

Normalised surface pressure

real, intent(in) :: ua(ix,il,kx)

u-wind

real, intent(in) :: va(ix,il,kx)

v-wind

real, intent(in) :: ta(ix,il,kx)

Temperature

real, intent(in) :: qa(ix,il,kx)

Specific humidity [g/kg]

real, intent(in) :: rh(ix,il,kx)

Relative humidity

real, intent(in) :: phi(ix,il,kx)

Geopotential

real, intent(in) :: phi0(ix,il)

Surface geopotential

real, intent(in) :: fmask(ix,il)

Fractional land-sea mask

real, intent(in) :: tsea(ix,il)

Sea-surface temperature

real, intent(in) :: ssrd(ix,il)

Downward flux of short-wave radiation at the surface

real, intent(in) :: slrd(ix,il)

Downward flux of long-wave radiation at the surface

real, intent(out) :: ustr(ix,il,3)

u-stress

real, intent(out) :: vstr(ix,il,3)

v-stress

real, intent(out) :: shf(ix,il,3)

Sensible heat flux

real, intent(out) :: evap(ix,il,3)

Evaporation

real, intent(out) :: slru(ix,il,3)

Upward flux of long-wave radiation at the surface

real, intent(out) :: hfluxn(ix,il,2)

Net downward heat flux

real, intent(out) :: tsfc(ix,il)

Surface temperature

real, intent(out) :: tskin(ix,il)

Skin surface temperature

real, intent(out) :: u0(ix,il)

Near-surface u-wind

real, intent(out) :: v0(ix,il)

Near-surface v-wind

real, intent(out) :: t0(ix,il)

Near-surface temperature

logical, intent(in) :: lfluxland

Calls

proc~~get_surface_fluxes~~CallsGraph proc~get_surface_fluxes get_surface_fluxes proc~get_qsat get_qsat proc~get_surface_fluxes->proc~get_qsat

Called by

proc~~get_surface_fluxes~~CalledByGraph proc~get_surface_fluxes get_surface_fluxes proc~get_physical_tendencies get_physical_tendencies proc~get_physical_tendencies->proc~get_surface_fluxes

Contents

None