The Intermediate Complexity Atmospheric Research model (ICAR)
A computationally efficient atmospheric model for downscaling.
|
Simple open water flux calculations More...
Public Member Functions | |
real function | sat_mr (t, p) |
subroutine | calc_exchange_coefficient (wind, tskin, airt, z_atm, lnz_atm, base_exchange, exchange_C) |
real function | ocean_roughness (ustar) |
subroutine | water_simple (sst, psfc, wind, ustar, qv, temperature, sensible_heat, latent_heat, z_atm, Z0, landmask, qv_surf, evap_flux, tskin) |
Public Attributes | |
real, parameter | freezing_threshold =273.15 |
Simple open water flux calculations
subroutine module_water_simple::calc_exchange_coefficient | ( | real, intent(in) | wind, |
real, intent(in) | tskin, | ||
real, intent(in) | airt, | ||
real, intent(in) | z_atm, | ||
real, intent(in) | lnz_atm, | ||
real, intent(in) | base_exchange, | ||
real, intent(out) | exchange_C | ||
) |
real function module_water_simple::ocean_roughness | ( | real, intent(in) | ustar | ) |
real function module_water_simple::sat_mr | ( | real, intent(in) | t, |
real, intent(in) | p | ||
) |
subroutine module_water_simple::water_simple | ( | real, dimension(:,:), intent(in) | sst, |
real, dimension(:,:), intent(in) | psfc, | ||
real, dimension(:,:), intent(in) | wind, | ||
real, dimension(:,:), intent(in) | ustar, | ||
real, dimension(:,:,:), intent(in) | qv, | ||
real, dimension(:,:,:), intent(in) | temperature, | ||
real, dimension(:,:), intent(inout) | sensible_heat, | ||
real, dimension(:,:), intent(inout) | latent_heat, | ||
real, dimension(:,:,:), intent(in) | z_atm, | ||
real, dimension(:,:), intent(inout) | Z0, | ||
real, dimension(:,:), intent(in) | landmask, | ||
real, dimension(:,:), intent(inout) | qv_surf, | ||
real, dimension(:,:), intent(inout) | evap_flux, | ||
real, dimension(:,:), intent(inout) | tskin | ||
) |
real, parameter module_water_simple::freezing_threshold =273.15 |