| subroutine, public gfs_rad_time_vary::gfs_rad_time_vary_timestep_init | ( | logical, intent(in) | lrseeds, |
| integer, dimension(:,:), intent(in) | rseeds, | ||
| logical, intent(in) | lslwr, | ||
| logical, intent(in) | lsswr, | ||
| integer, intent(in) | isubc_lw, | ||
| integer, intent(in) | isubc_sw, | ||
| integer, dimension(:), intent(inout) | icsdsw, | ||
| integer, dimension(:), intent(inout) | icsdlw, | ||
| integer, intent(in) | cnx, | ||
| integer, intent(in) | cny, | ||
| integer, intent(in) | isc, | ||
| integer, intent(in) | jsc, | ||
| integer, dimension(:), intent(in) | imap, | ||
| integer, dimension(:), intent(in) | jmap, | ||
| real(kind_phys), intent(in) | sec, | ||
| integer, intent(in) | kdt, | ||
| integer, intent(in) | imp_physics, | ||
| integer, intent(in) | imp_physics_zhao_carr, | ||
| integer, intent(in) | ipsd0, | ||
| integer, intent(in) | ipsdlim, | ||
| real(kind_phys), dimension(:), intent(inout) | ps_2delt, | ||
| real(kind_phys), dimension(:), intent(inout) | ps_1delt, | ||
| real(kind_phys), dimension(:,:), intent(inout) | t_2delt, | ||
| real(kind_phys), dimension(:,:), intent(inout) | t_1delt, | ||
| real(kind_phys), dimension(:,:), intent(inout) | qv_2delt, | ||
| real(kind_phys), dimension(:,:), intent(inout) | qv_1delt, | ||
| real(kind_phys), dimension(:,:), intent(in) | t, | ||
| real(kind_phys), dimension(:,:), intent(in) | qv, | ||
| real(kind_phys), dimension(:), intent(in) | ps, | ||
| character(len=*), intent(out) | errmsg, | ||
| integer, intent(out) | errflg ) |