My Project
|
Public Member Functions | |
subroutine | radlwsw (dist, rmu0, fract, paprs, pplay, tsol, alb1, alb2, t, q, wo, cldfra, cldemi, cldtaupd, ok_ade, ok_aie, flag_aerosol, flag_aerosol_strat, tau_aero, piz_aero, cg_aero, cldtaupi, new_aod, qsat, flwc, fiwc, heat, heat0, cool, cool0, radsol, albpla, topsw, toplw, solsw, sollw, sollwdown, topsw0, toplw0, solsw0, sollw0, lwdn0, lwdn, lwup0, lwup, swdn0, swdn, swup0, swup, topswad_aero, solswad_aero, topswai_aero, solswai_aero, topswad0_aero, solswad0_aero, topsw_aero, topsw0_aero, solsw_aero, solsw0_aero, topswcf_aero, solswcf_aero) |
Definition at line 1 of file radlwsw_m.F90.
subroutine radlwsw_m::radlwsw | ( | real, intent(in) | dist, |
real, dimension(klon), intent(in) | rmu0, | ||
real, dimension(klon), intent(in) | fract, | ||
real, dimension(klon,klev+1), intent(in) | paprs, | ||
real, dimension(klon,klev), intent(in) | pplay, | ||
real, dimension(klon), intent(in) | tsol, | ||
real, dimension(klon), intent(in) | alb1, | ||
real, dimension(klon), intent(in) | alb2, | ||
real, dimension(klon,klev), intent(in) | t, | ||
real, dimension(klon,klev), intent(in) | q, | ||
real, dimension(:, :, :), intent(in) | wo, | ||
real, dimension(klon,klev), intent(in) | cldfra, | ||
real, dimension(klon,klev), intent(in) | cldemi, | ||
real, dimension(klon,klev), intent(in) | cldtaupd, | ||
logical, intent(in) | ok_ade, | ||
logical, intent(in) | ok_aie, | ||
integer, intent(in) | flag_aerosol, | ||
logical, intent(in) | flag_aerosol_strat, | ||
real, dimension(klon,klev,9,2), intent(in) | tau_aero, | ||
real, dimension(klon,klev,9,2), intent(in) | piz_aero, | ||
real, dimension(klon,klev,9,2), intent(in) | cg_aero, | ||
real, dimension(klon,klev), intent(in) | cldtaupi, | ||
logical, intent(in) | new_aod, | ||
real, dimension(klon,klev), intent(in) | qsat, | ||
real, dimension(klon,klev), intent(in) | flwc, | ||
real, dimension(klon,klev), intent(in) | fiwc, | ||
real, dimension(klon,klev), intent(out) | heat, | ||
real, dimension(klon,klev), intent(out) | heat0, | ||
real, dimension(klon,klev), intent(out) | cool, | ||
real, dimension(klon,klev), intent(out) | cool0, | ||
real, dimension(klon), intent(out) | radsol, | ||
real, dimension(klon), intent(out) | albpla, | ||
real, dimension(klon), intent(out) | topsw, | ||
real, dimension(klon), intent(out) | toplw, | ||
real, dimension(klon), intent(out) | solsw, | ||
real, dimension(klon), intent(out) | sollw, | ||
real, dimension(klon), intent(out) | sollwdown, | ||
real, dimension(klon), intent(out) | topsw0, | ||
real, dimension(klon), intent(out) | toplw0, | ||
real, dimension(klon), intent(out) | solsw0, | ||
real, dimension(klon), intent(out) | sollw0, | ||
real, dimension(klon,kflev+1), intent(out) | lwdn0, | ||
real, dimension(klon,kflev+1), intent(out) | lwdn, | ||
real, dimension(klon,kflev+1), intent(out) | lwup0, | ||
real, dimension(klon,kflev+1), intent(out) | lwup, | ||
real, dimension(klon,kflev+1), intent(out) | swdn0, | ||
real, dimension(klon,kflev+1), intent(out) | swdn, | ||
real, dimension(klon,kflev+1), intent(out) | swup0, | ||
real, dimension(klon,kflev+1), intent(out) | swup, | ||
real, dimension(klon), intent(out) | topswad_aero, | ||
real, dimension(klon), intent(out) | solswad_aero, | ||
real, dimension(klon), intent(out) | topswai_aero, | ||
real, dimension(klon), intent(out) | solswai_aero, | ||
real, dimension(klon), intent(out) | topswad0_aero, | ||
real, dimension(klon), intent(out) | solswad0_aero, | ||
real, dimension(kdlon,9), intent(out) | topsw_aero, | ||
real, dimension(kdlon,9), intent(out) | topsw0_aero, | ||
real, dimension(kdlon,9), intent(out) | solsw_aero, | ||
real, dimension(kdlon,9), intent(out) | solsw0_aero, | ||
real, dimension(kdlon,3), intent(out) | topswcf_aero, | ||
real, dimension(kdlon,3), intent(out) | solswcf_aero | ||
) |
Definition at line 7 of file radlwsw_m.F90.