LMDZ
readaerosol_optic_rrtm.F90 File Reference

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)
 

Function/Subroutine Documentation

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.

Here is the call graph for this function:

Here is the caller graph for this function: