- Timestamp:
- Jan 11, 2021, 11:24:08 PM (3 years ago)
- Location:
- LMDZ6/branches/Ocean_skin
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/Ocean_skin
-
LMDZ6/branches/Ocean_skin/libf/phylmd/rrtm/readaerosol_optic_rrtm.F90
r3605 r3798 2 2 ! 3 3 SUBROUTINE readaerosol_optic_rrtm(debut, aerosol_couple, ok_alw, ok_volcan, & 4 new_aod,flag_aerosol, flag_bc_internal_mixture, itap, rjourvrai, &4 flag_aerosol, flag_bc_internal_mixture, itap, rjourvrai, & 5 5 pdtphys, pplay, paprs, t_seri, rhcl, presnivs, & 6 6 tr_seri, mass_solu_aero, mass_solu_aero_pi, & … … 33 33 LOGICAL, INTENT(IN) :: ok_alw 34 34 LOGICAL, INTENT(IN) :: ok_volcan 35 LOGICAL, INTENT(IN) :: new_aod36 35 INTEGER, INTENT(IN) :: flag_aerosol 37 36 LOGICAL, INTENT(IN) :: flag_bc_internal_mixture
Note: See TracChangeset
for help on using the changeset viewer.