| subroutine, public rrtmgp_lw_main::rrtmgp_lw_main_run | ( | logical, intent(in) | dolwrad, |
| logical, intent(in) | dolwclrsky, | ||
| logical, intent(in) | top_at_1, | ||
| logical, intent(in) | dogp_lwscat, | ||
| integer, intent(in) | ncol, | ||
| integer, intent(in) | nlay, | ||
| integer, intent(in) | ngases, | ||
| integer, intent(in) | rrtmgp_phys_blksz, | ||
| integer, intent(in) | ngauss_angles, | ||
| integer, dimension(:), intent(in) | icseed_lw, | ||
| integer, intent(in) | iovr, | ||
| integer, intent(in) | iovr_convcld, | ||
| integer, intent(in) | iovr_max, | ||
| integer, intent(in) | iovr_maxrand, | ||
| integer, intent(in) | iovr_rand, | ||
| integer, intent(in) | iovr_dcorr, | ||
| integer, intent(in) | iovr_exp, | ||
| integer, intent(in) | iovr_exprand, | ||
| integer, intent(in) | isubc_lw, | ||
| real(kind_phys), dimension(:), intent(in) | semis, | ||
| real(kind_phys), dimension(:), intent(in) | tsfg, | ||
| real(kind_phys), dimension(:,:), intent(in) | p_lay, | ||
| real(kind_phys), dimension(:,:), intent(in) | p_lev, | ||
| real(kind_phys), dimension(:,:), intent(in) | t_lay, | ||
| real(kind_phys), dimension(:,:), intent(in) | t_lev, | ||
| real(kind_phys), dimension(:,:), intent(in) | vmr_o2, | ||
| real(kind_phys), dimension(:,:), intent(in) | vmr_h2o, | ||
| real(kind_phys), dimension(:,:), intent(in) | vmr_o3, | ||
| real(kind_phys), dimension(:,:), intent(in) | vmr_ch4, | ||
| real(kind_phys), dimension(:,:), intent(in) | vmr_n2o, | ||
| real(kind_phys), dimension(:,:), intent(in) | vmr_co2, | ||
| real(kind_phys), dimension(:,:), intent(in) | cld_frac, | ||
| real(kind_phys), dimension(:,:), intent(in) | cld_lwp, | ||
| real(kind_phys), dimension(:,:), intent(in) | cld_reliq, | ||
| real(kind_phys), dimension(:,:), intent(in) | cld_iwp, | ||
| real(kind_phys), dimension(:,:), intent(in) | cld_reice, | ||
| real(kind_phys), dimension(:,:), intent(in) | cld_swp, | ||
| real(kind_phys), dimension(:,:), intent(in) | cld_resnow, | ||
| real(kind_phys), dimension(:,:), intent(in) | cld_rwp, | ||
| real(kind_phys), dimension(:,:), intent(in) | cld_rerain, | ||
| real(kind_phys), dimension(:,:), intent(in) | precip_frac, | ||
| real(kind_phys), dimension(:,:), intent(in), optional | cld_cnv_lwp, | ||
| real(kind_phys), dimension(:,:), intent(in), optional | cld_cnv_reliq, | ||
| real(kind_phys), dimension(:,:), intent(in), optional | cld_cnv_iwp, | ||
| real(kind_phys), dimension(:,:), intent(in), optional | cld_cnv_reice, | ||
| real(kind_phys), dimension(:,:), intent(in), optional | cld_pbl_lwp, | ||
| real(kind_phys), dimension(:,:), intent(in), optional | cld_pbl_reliq, | ||
| real(kind_phys), dimension(:,:), intent(in), optional | cld_pbl_iwp, | ||
| real(kind_phys), dimension(:,:), intent(in), optional | cld_pbl_reice, | ||
| real(kind_phys), dimension(:,:), intent(in) | cloud_overlap_param, | ||
| character(len=*), dimension(:), intent(in) | active_gases_array, | ||
| real(kind_phys), dimension(:,:,:), intent(in) | aerlw_tau, | ||
| real(kind_phys), dimension(:,:,:), intent(in) | aerlw_ssa, | ||
| real(kind_phys), dimension(:,:,:), intent(in) | aerlw_g, | ||
| real(kind_phys), dimension(:,:), intent(inout) | fluxlwup_allsky, | ||
| real(kind_phys), dimension(:,:), intent(inout) | fluxlwdown_allsky, | ||
| real(kind_phys), dimension(:,:), intent(inout) | fluxlwup_clrsky, | ||
| real(kind_phys), dimension(:,:), intent(inout) | fluxlwdown_clrsky, | ||
| real(kind_phys), dimension(:,:), intent(inout) | fluxlwup_radtime, | ||
| real(kind_phys), dimension(:,:), intent(inout) | fluxlwdown_radtime, | ||
| real(kind_phys), dimension(:,:), intent(inout), optional | fluxlwup_jac, | ||
| character(len=*), intent(out) | errmsg, | ||
| integer, intent(out) | errflg ) |