ocean_slab_mod.F90 File Reference

Go to the source code of this file.

Modules
module	ocean_slab_mod

Functions/Subroutines
subroutine, public	ocean_slab_mod::ocean_slab_init (dtime, pctsrf_rst)
subroutine, public	ocean_slab_mod::ocean_slab_frac (itime, dtime, jour, pctsrf_chg, is_modified)
subroutine, public	ocean_slab_mod::ocean_slab_noice (itime, dtime, jour, knon, knindex, p1lay, cdragh, cdragq, cdragm, precip_rain, precip_snow, temp_air, spechum, AcoefH, AcoefQ, BcoefH, BcoefQ, AcoefU, AcoefV, BcoefU, BcoefV, ps, u1, v1, gustiness, tsurf_in, radsol, snow, qsurf, evap, fluxsens, fluxlat, flux_u1, flux_v1, tsurf_new, dflux_s, dflux_l, qflux)
subroutine, public	ocean_slab_mod::ocean_slab_ice (itime, dtime, jour, knon, knindex, tsurf_in, p1lay, cdragh, cdragm, precip_rain, precip_snow, temp_air, spechum, AcoefH, AcoefQ, BcoefH, BcoefQ, AcoefU, AcoefV, BcoefU, BcoefV, ps, u1, v1, gustiness, radsol, snow, qsurf, qsol, agesno, alb1_new, alb2_new, evap, fluxsens, fluxlat, flux_u1, flux_v1, tsurf_new, dflux_s, dflux_l, swnet)
subroutine	ocean_slab_mod::ocean_slab_final

Variables
integer, save, private	ocean_slab_mod::cpl_pas
real, save, private	ocean_slab_mod::cyang
real, dimension(:), allocatable, save, private	ocean_slab_mod::slabh
real, dimension(:,:), allocatable, save, public	ocean_slab_mod::tslab
real, dimension(:), allocatable, save, public	ocean_slab_mod::fsic
real, dimension(:), allocatable, save, public	ocean_slab_mod::tice
real, dimension(:), allocatable, save, public	ocean_slab_mod::seaice
real, dimension(:), allocatable, save, public	ocean_slab_mod::slab_bils
real, dimension(:), allocatable, save, private	ocean_slab_mod::bils_cum
real, dimension(:), allocatable, save, public	ocean_slab_mod::slab_bilg
real, dimension(:), allocatable, save, private	ocean_slab_mod::bilg_cum
real, parameter	ocean_slab_mod::t_freeze =271.35
real, parameter	ocean_slab_mod::t_melt =273.15
real, parameter	ocean_slab_mod::sno_den =300.
real, parameter	ocean_slab_mod::ice_den =917.
real, parameter	ocean_slab_mod::sea_den =1025.
real, parameter	ocean_slab_mod::ice_cond =2.17*ice_den
real, parameter	ocean_slab_mod::sno_cond =0.31*sno_den
real, parameter	ocean_slab_mod::ice_cap =2067.
real, parameter	ocean_slab_mod::ice_lat =334000.
real, parameter	ocean_slab_mod::snow_min =0.05*sno_den
real, parameter	ocean_slab_mod::snow_wfact =0.4
real, parameter	ocean_slab_mod::ice_frac_min =0.001
real, parameter	ocean_slab_mod::ice_frac_max =1.
real, parameter	ocean_slab_mod::h_ice_min =0.01*ice_den
real, parameter	ocean_slab_mod::h_ice_thin =0.15*ice_den
real, parameter	ocean_slab_mod::h_ice_thick =2.5*ice_den
real, parameter	ocean_slab_mod::h_ice_new =1.*ice_den
real, parameter	ocean_slab_mod::h_ice_max =10.*ice_den
real, parameter	ocean_slab_mod::alb_sno_min =0.55
real, parameter	ocean_slab_mod::alb_sno_del =0.3
real, parameter	ocean_slab_mod::alb_ice_dry =0.75
real, parameter	ocean_slab_mod::alb_ice_wet =0.66
real, parameter	ocean_slab_mod::pen_frac =0.3
real, parameter	ocean_slab_mod::pen_ext =1.5