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 ) |