Changeset 1677 for trunk/LMDZ.GENERIC/libf/phystd/aerosol_mod.F90

Timestamp:

Mar 22, 2017, 4:18:23 PM (8 years ago)

Author:

sglmd

Message:

Two aerosol kinds added for giant planets: one is a compact (NH3) cloud where the opacity, particle size and bottom pressure level are taken as inputs (a scale height of 0.2 is hard-coded to simulate a compact cloud). Corresponds to option aeronh3. The other one is not generic at all and corresponds to the auroral, stratospheric aerosols observed on Jupiter...(option aeroaurora=.false. by default)

File:

• trunk/LMDZ.GENERIC/libf/phystd/aerosol_mod.F90 (modified) (1 diff)

trunk/LMDZ.GENERIC/libf/phystd/aerosol_mod.F90

@@ -16 +16 @@
 ! two-layer simple aerosol model
       integer :: iaero_back2lay = 0
-!$OMP THREADPRIVATE(iaero_co2,iaero_h2o,iaero_dust,iaero_h2so4,noaero,iaero_back2lay)
+ ! NH3 cloud
+      integer :: iaero_nh3 = 0
+ ! Auroral aerosols
+      integer :: iaero_aurora = 0
+!$OMP THREADPRIVATE(iaero_co2,iaero_h2o,iaero_dust,iaero_h2so4,noaero,iaero_back2lay,iaero_nh3,iaero_aurora)
       
 !==================================================================