My Project
 All Classes Files Functions Variables Macros
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_spc), intent(out tausum_aero,
real, dimension(klon,klev,nwave,naero_spc), intent(out tau3d_aero 
)

Definition at line 3 of file readaerosol_optic.F90.

Here is the call graph for this function:

Here is the caller graph for this function: