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(im,levs), intent(inout) | qc, | ||
real(kind=kind_phys), dimension(im,levs), intent(inout) | qi, | ||
real(kind=kind_phys), dimension(im,levs), intent(in) | qc_save, | ||
real(kind=kind_phys), dimension(im,levs), intent(in) | qi_save, | ||
character(len=*), intent(out) | errmsg, | ||
integer, intent(out) | errflg | ||
) |