subroutine sgscloud_radpost::sgscloud_radpost_run |
( |
integer, intent(in) |
im, |
|
|
integer, intent(in) |
levs, |
|
|
logical, intent(in) |
flag_init, |
|
|
logical, intent(in) |
flag_restart, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout) |
qc, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout) |
qi, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout) |
qs, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in) |
qc_save, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in) |
qi_save, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in) |
qs_save, |
|
|
character(len=*), intent(out) |
errmsg, |
|
|
integer, intent(out) |
errflg |
|
) |
| |