LMDZ
|
Go to the source code of this file.
Functions/Subroutines | |
subroutine | readaerosol_optic_rrtm (debut, aerosol_couple, new_aod, flag_aerosol, itap, rjourvrai, pdtphys, pplay, paprs, t_seri, rhcl, presnivs, tr_seri, mass_solu_aero, mass_solu_aero_pi, tau_aero, piz_aero, cg_aero, tausum_aero, tau3d_aero) |
subroutine readaerosol_optic_rrtm | ( | logical, intent(in) | debut, |
logical, intent(in) | aerosol_couple, | ||
logical, intent(in) | new_aod, | ||
integer, intent(in) | flag_aerosol, | ||
integer, intent(in) | itap, | ||
real, intent(in) | rjourvrai, | ||
real, intent(in) | pdtphys, | ||
real, dimension(klon,klev), intent(in) | pplay, | ||
real, dimension(klon,klev+1), intent(in) | paprs, | ||
real, dimension(klon,klev), intent(in) | t_seri, | ||
real, dimension(klon,klev), intent(in) | rhcl, | ||
real, dimension(klev), intent(in) | presnivs, | ||
real, dimension(klon,klev,nbtr), intent(in) | tr_seri, | ||
real, dimension(klon,klev), intent(out) | mass_solu_aero, | ||
real, dimension(klon,klev), intent(out) | mass_solu_aero_pi, | ||
real, dimension(klon,klev,2,nsw), intent(out) | tau_aero, | ||
real, dimension(klon,klev,2,nsw), intent(out) | piz_aero, | ||
real, dimension(klon,klev,2,nsw), intent(out) | cg_aero, | ||
real, dimension(klon,nwave,naero_tot), intent(out) | tausum_aero, | ||
real, dimension(klon,klev,nwave,naero_tot), intent(out) | tau3d_aero | ||
) |
Definition at line 9 of file readaerosol_optic_rrtm.F90.