LMDZ
readaerosol_optic.F90 File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine readaerosol_optic (debut, new_aod, flag_aerosol, itap, rjourvrai, pdtphys, pplay, paprs, t_seri, rhcl, presnivs, mass_solu_aero, mass_solu_aero_pi, tau_aero, piz_aero, cg_aero, tausum_aero, tau3d_aero)
 

Function/Subroutine Documentation

subroutine readaerosol_optic ( logical, intent(in)  debut,
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), intent(out)  mass_solu_aero,
real, dimension(klon,klev), intent(out)  mass_solu_aero_pi,
real, dimension(klon,klev,naero_grp,nbands), intent(out)  tau_aero,
real, dimension(klon,klev,naero_grp,nbands), intent(out)  piz_aero,
real, dimension(klon,klev,naero_grp,nbands), 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 8 of file readaerosol_optic.F90.

Here is the call graph for this function:

Here is the caller graph for this function: