subroutine cu_gf_deep::cup_forcing_ens_3d |
( |
real(kind=kind_phys), dimension (its:ite), intent(inout) |
closure_n, |
|
|
integer, dimension (its:ite), intent(in) |
xland, |
|
|
real(kind=kind_phys), dimension (its:ite), intent(inout) |
aa0, |
|
|
real(kind=kind_phys), dimension (its:ite), intent(in) |
aa1, |
|
|
real(kind=kind_phys), dimension (its:ite,1), intent(in) |
xaa0, |
|
|
real(kind=kind_phys), intent(in) |
mbdt, |
|
|
real(kind=kind_phys), intent(in) |
dtime, |
|
|
integer, dimension (its:ite), intent(inout) |
ierr, |
|
|
integer, dimension (its:ite), intent(inout) |
ierr2, |
|
|
integer, dimension (its:ite), intent(inout) |
ierr3, |
|
|
real(kind=kind_phys), dimension (its:ite,1:maxens3), intent(inout) |
xf_ens, |
|
|
real(kind=kind_phys), dimension (its:ite), intent(in) |
axx, |
|
|
real(kind=kind_phys), dimension (its:ite,10), intent(inout) |
forcing, |
|
|
integer, intent(in) |
maxens3, |
|
|
real(kind=kind_phys), dimension (its:ite), intent(in) |
mconv, |
|
|
real(kind=kind_phys), dimension (its:ite,4), intent(in) |
rand_clos, |
|
|
real(kind=kind_phys), dimension (its:ite,kts:kte), intent(in) |
p_cup, |
|
|
integer, dimension (its:ite), intent(inout) |
ktop, |
|
|
real(kind=kind_phys), dimension (its:ite,kts:kte), intent(in) |
omeg, |
|
|
real(kind=kind_phys), dimension (its:ite,kts:kte), intent(in) |
zd, |
|
|
real(kind=kind_phys), dimension (its:ite,kts:kte), intent(in) |
zdm, |
|
|
integer, dimension (its:ite), intent(inout) |
k22, |
|
|
real(kind=kind_phys), dimension (its:ite,kts:kte), intent(in) |
zu, |
|
|
real(kind=kind_phys), dimension (its:ite,1:maxens3), intent(inout) |
pr_ens, |
|
|
real(kind=kind_phys), dimension (its:ite), intent(in) |
edt, |
|
|
real(kind=kind_phys), dimension (its:ite), intent(in) |
edtm, |
|
|
integer, dimension (its:ite), intent(inout) |
kbcon, |
|
|
integer, intent(in) |
ichoice, |
|
|
integer, intent(in) |
imid, |
|
|
integer, intent(in) |
ipr, |
|
|
integer, intent(in) |
itf, |
|
|
integer, intent(in) |
ktf, |
|
|
integer, intent(in) |
its, |
|
|
integer, intent(in) |
ite, |
|
|
integer, intent(in) |
kts, |
|
|
integer, intent(in) |
kte, |
|
|
integer, intent(in) |
dicycle, |
|
|
real(kind=kind_phys), dimension (its:ite), intent(in) |
tau_ecmwf, |
|
|
real(kind=kind_phys), dimension (its:ite), intent(in) |
aa1_bl, |
|
|
real(kind=kind_phys), dimension (its:ite), intent(inout) |
xf_dicycle |
|
) |
| |