subroutine, public gfdl_cloud_microphys::gfdl_cloud_microphys_run |
( |
integer, intent(in) |
levs, |
|
|
integer, intent(in) |
im, |
|
|
real(kind=kind_phys), intent(in) |
con_g, |
|
|
real(kind=kind_phys), intent(in) |
con_fvirt, |
|
|
real(kind=kind_phys), intent(in) |
con_rd, |
|
|
real(kind=kind_phys), dimension(1:im), intent(in) |
frland, |
|
|
real(kind=kind_phys), dimension(1:im), intent(in) |
garea, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(inout) |
gq0, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(inout) |
gq0_ntcw, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(inout) |
gq0_ntrw, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(inout) |
gq0_ntiw, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(inout) |
gq0_ntsw, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(inout) |
gq0_ntgl, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(inout) |
gq0_ntclamt, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(inout) |
gt0, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(inout) |
gu0, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(inout) |
gv0, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(in) |
vvl, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(in) |
prsl, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs+1), intent(in) |
phii, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(in) |
del, |
|
|
real(kind_phys), dimension(1:im), intent(out) |
rain0, |
|
|
real(kind_phys), dimension(1:im), intent(out) |
ice0, |
|
|
real(kind_phys), dimension(1:im), intent(out) |
snow0, |
|
|
real(kind_phys), dimension(1:im), intent(out) |
graupel0, |
|
|
real(kind_phys), dimension(1:im), intent(out) |
prcp0, |
|
|
real(kind_phys), dimension(1:im), intent(out) |
sr, |
|
|
real(kind_phys), intent(in) |
dtp, |
|
|
logical, intent(in) |
hydrostatic, |
|
|
logical, intent(in) |
phys_hydrostatic, |
|
|
character(len=*), intent(out) |
errmsg, |
|
|
integer, intent(out) |
errflg |
|
) |
| |