- Timestamp:
- Feb 22, 2021, 12:44:07 PM (4 years ago)
- Location:
- LMDZ6/branches/LMDZ-tracers
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/LMDZ-tracers
- Property svn:mergeinfo changed
-
LMDZ6/branches/LMDZ-tracers/libf/phylmd/Dust/splaeropt_6bands_rrtm.F90
r2753 r3851 9 9 USE aero_mod 10 10 USE infotrac_phy 11 USE phys_local_var_mod, ONLY: abs visaer11 USE phys_local_var_mod, ONLY: abs550aer 12 12 13 13 ! Olivier Boucher Jan 2017 … … 260 260 !--waveband 2 and all aerosol (third index = 2) 261 261 inu=2 262 abs visaer(:)=SUM((1-piz_allaer(:,:,2,inu))*tau_allaer(:,:,2,inu),dim=2)262 abs550aer(:)=SUM((1-piz_allaer(:,:,2,inu))*tau_allaer(:,:,2,inu),dim=2) 263 263 264 264 END SUBROUTINE SPLAEROPT_6BANDS_RRTM
Note: See TracChangeset
for help on using the changeset viewer.