Changeset 1797

Timestamp:

Oct 19, 2017, 11:22:26 PM (7 years ago)

Author:

bclmd

Message:

Adding photochemistry to LMDZ Generic

File:

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

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

@@ -57 +57 @@
       logical,save :: albedo_spectral_mode
 !$OMP THREADPRIVATE(ok_slab_ocean,ok_slab_sic,ok_slab_heat_transp,albedo_spectral_mode)
+      logical,save :: photochem
+      logical,save :: haze
+!$OMP THREADPRIVATE(photochem)
 
       integer,save :: iddist