phytrac_mod Module


Contents

Variables

Subroutines


Variables

Type Visibility Attributes Name Initial
real, public, DIMENSION(:,:,:), ALLOCATABLE, SAVE :: d_tr_cl
real, public, DIMENSION(:,:,:), ALLOCATABLE, SAVE :: d_tr_dec
real, public, DIMENSION(:,:,:), ALLOCATABLE, SAVE :: d_tr_cv
real, public, DIMENSION(:,:,:), ALLOCATABLE, SAVE :: d_tr_insc
real, public, DIMENSION(:,:,:), ALLOCATABLE, SAVE :: d_tr_bcscav
real, public, DIMENSION(:,:,:), ALLOCATABLE, SAVE :: d_tr_evapls
real, public, DIMENSION(:,:,:), ALLOCATABLE, SAVE :: d_tr_ls
real, public, DIMENSION(:,:,:), ALLOCATABLE, SAVE :: d_tr_trsp
real, public, DIMENSION(:,:,:), ALLOCATABLE, SAVE :: d_tr_sscav
real, public, DIMENSION(:,:,:), ALLOCATABLE, SAVE :: d_tr_sat
real, public, DIMENSION(:,:,:), ALLOCATABLE, SAVE :: d_tr_uscav
real, public, DIMENSION(:,:), ALLOCATABLE, SAVE :: flux_tr_wet
real, public, DIMENSION(:,:), ALLOCATABLE, SAVE :: flux_tr_wet_cv
real, public, DIMENSION(:,:,:), ALLOCATABLE, SAVE :: qPr
real, public, DIMENSION(:,:,:), ALLOCATABLE, SAVE :: qDi
real, public, DIMENSION(:,:,:), ALLOCATABLE, SAVE :: qPa
real, public, DIMENSION(:,:,:), ALLOCATABLE, SAVE :: qMel
real, public, DIMENSION(:,:,:), ALLOCATABLE, SAVE :: qTrdi
real, public, DIMENSION(:,:,:), ALLOCATABLE, SAVE :: dtrcvMA
real, public, DIMENSION(:,:,:), ALLOCATABLE, SAVE :: d_tr_th
real, public, DIMENSION(:,:,:), ALLOCATABLE, SAVE :: d_tr_lessi_impa
real, public, DIMENSION(:,:,:), ALLOCATABLE, SAVE :: d_tr_lessi_nucl
real, public, DIMENSION(:,:), ALLOCATABLE, SAVE :: qPrls
real, public, DIMENSION(:,:), ALLOCATABLE, SAVE :: d_tr_dry
real, public, DIMENSION(:,:), ALLOCATABLE, SAVE :: flux_tr_dry

Subroutines

public subroutine phytrac_init()

Arguments

None

public subroutine phytrac(nstep, julien, gmtime, debutphy, lafin, pdtphys, u, v, t_seri, paprs, pplay, pmfu, pmfd, pen_u, pde_u, pen_d, pde_d, cdragh, coefh, fm_therm, entr_therm, yu1, yv1, ftsol, pctsrf, ustar, u10m, v10m, wstar, ale_bl, ale_wake, xlat, xlon, frac_impa, frac_nucl, beta_fisrt, beta_v1, presnivs, pphis, pphi, albsol, sh, ch, rh, cldfra, rneb, diafra, cldliq, itop_con, ibas_con, pmflxr, pmflxs, prfl, psfl, da, phi, mp, upwd, phi2, d1a, dam, sij, wght_cvfd, wdtrainA, wdtrainM, sigd, clw, elij, evap, ep, epmlmMm, eplaMm, dnwd, aerosol_couple, flxmass_w, tau_aero, piz_aero, cg_aero, ccm, rfname, d_tr_dyn, tr_seri, init_source)

jyg

Read more…

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: nstep
integer, intent(in) :: julien
real, intent(in) :: gmtime
logical, intent(in) :: debutphy
logical, intent(in) :: lafin
real, intent(in) :: pdtphys
real, intent(in), DIMENSION(klon,klev) :: u
real, intent(in), DIMENSION(klon,klev) :: v
real, intent(in), DIMENSION(klon,klev) :: t_seri
real, intent(in), DIMENSION(klon,klev+1) :: paprs
real, intent(in), DIMENSION(klon,klev) :: pplay
real, intent(in), DIMENSION(klon,klev) :: pmfu
real, intent(in), DIMENSION(klon,klev) :: pmfd
real, intent(in), DIMENSION(klon,klev) :: pen_u
real, intent(in), DIMENSION(klon,klev) :: pde_u
real, intent(in), DIMENSION(klon,klev) :: pen_d
real, intent(in), DIMENSION(klon,klev) :: pde_d
real, intent(in), DIMENSION(:) :: cdragh
real, intent(in), DIMENSION(:,:) :: coefh
real, intent(in), DIMENSION(klon,klev+1) :: fm_therm
real, intent(inout), DIMENSION(klon,klev) :: entr_therm
real, intent(in), DIMENSION(:) :: yu1
real, intent(in), DIMENSION(:) :: yv1
real, intent(in), DIMENSION(klon,nbsrf) :: ftsol
real, intent(in), DIMENSION(klon,nbsrf) :: pctsrf
real, intent(in), DIMENSION(:) :: ustar
real, intent(in), DIMENSION(:) :: u10m
real, intent(in), DIMENSION(:) :: v10m
real, intent(in), DIMENSION(:) :: wstar
real, intent(in), DIMENSION(:) :: ale_bl
real, intent(in), DIMENSION(:) :: ale_wake
real, intent(in), DIMENSION(klon) :: xlat
real, intent(in), DIMENSION(klon) :: xlon
real, intent(in), DIMENSION(klon,klev) :: frac_impa
real, intent(in), DIMENSION(klon,klev) :: frac_nucl
real, intent(in), DIMENSION(klon,klev) :: beta_fisrt
real, intent(out), DIMENSION(klon,klev) :: beta_v1
real, intent(in), DIMENSION(klev) :: presnivs
real, intent(in), DIMENSION(klon) :: pphis
real, intent(in), DIMENSION(klon,klev) :: pphi
real, intent(in), DIMENSION(klon) :: albsol
real, intent(in), DIMENSION(klon,klev) :: sh
real, intent(in), DIMENSION(klon,klev) :: ch
real, intent(in), DIMENSION(klon,klev) :: rh
real, intent(in), DIMENSION(klon,klev) :: cldfra
real, intent(in), DIMENSION(klon,klev) :: rneb
real, intent(in), DIMENSION(klon,klev) :: diafra
real, intent(in), DIMENSION(klon,klev) :: cldliq
integer, intent(in), DIMENSION(klon) :: itop_con
integer, intent(in), DIMENSION(klon) :: ibas_con
real, intent(in), DIMENSION(klon,klev+1) :: pmflxr
real, intent(in), DIMENSION(klon,klev+1) :: pmflxs
real, intent(in), DIMENSION(klon,klev+1) :: prfl
real, intent(in), DIMENSION(klon,klev+1) :: psfl
real, intent(in), DIMENSION(klon,klev) :: da
real, intent(in), DIMENSION(klon,klev,klev) :: phi
real, intent(in), DIMENSION(klon,klev) :: mp
real, intent(in), DIMENSION(klon,klev) :: upwd
real, intent(in), DIMENSION(klon,klev,klev) :: phi2
real, intent(in), DIMENSION(klon,klev) :: d1a
real, intent(in), DIMENSION(klon,klev) :: dam
real, intent(in), DIMENSION(klon,klev,klev) :: sij
real, intent(in), DIMENSION(klon,klev) :: wght_cvfd
real, intent(in), DIMENSION(klon,klev) :: wdtrainA
real, intent(in), DIMENSION(klon,klev) :: wdtrainM
real, intent(in), DIMENSION(klon) :: sigd
real, intent(in), DIMENSION(klon,klev) :: clw
real, intent(in), DIMENSION(klon,klev,klev) :: elij
real, intent(in), DIMENSION(klon,klev) :: evap
real, intent(in), DIMENSION(klon,klev) :: ep
real, intent(in), DIMENSION(klon,klev,klev) :: epmlmMm
real, intent(in), DIMENSION(klon,klev) :: eplaMm
real, intent(in), DIMENSION(klon,klev) :: dnwd
logical, intent(in) :: aerosol_couple
real, intent(in), DIMENSION(klon,klev) :: flxmass_w
real, intent(in), DIMENSION(klon,klev,naero_grp,2) :: tau_aero
real, intent(in), DIMENSION(klon,klev,naero_grp,2) :: piz_aero
real, intent(in), DIMENSION(klon,klev,naero_grp,2) :: cg_aero
real, intent(in), DIMENSION(klon,klev,2) :: ccm
character(len=4), intent(in), DIMENSION(naero_grp) :: rfname
real, intent(in), DIMENSION(klon,klev,nbtr) :: d_tr_dyn
real, intent(inout), DIMENSION(klon,klev,nbtr) :: tr_seri
real, intent(in), DIMENSION(klon,nbtr) :: init_source