source: trunk/LMDZ.GENERIC/libf/phystd/aerosol_mod.F90 @ 1153

Last change on this file since 1153 was 1151, checked in by milmd, 11 years ago

LMDZ.GENERIC. two-layer aerosol model parameters are now set in callphys.def ; default settings are for Saturn case.

File size: 766 bytes
RevLine 
[726]1!==================================================================
2module aerosol_mod
[747]3implicit none
4save
[726]5!==================================================================
6
[747]7!  aerosol indexes: these are initialized to be 0 if the
[726]8!                 corresponding aerosol was not activated in callphys.def
[747]9!                 -- otherwise a value is given in iniaerosol
10      integer :: iaero_co2 = 0
11      integer :: iaero_h2o = 0
12      integer :: iaero_dust = 0
13      integer :: iaero_h2so4 = 0
14      logical :: noaero = .false.
[1026]15
16! two-layer simple aerosol model
17      integer :: iaero_back2lay = 0
[741]18     
[726]19!==================================================================
20end module aerosol_mod
21!==================================================================
Note: See TracBrowser for help on using the repository browser.