Changeset 3894 for trunk/LMDZ.PLUTO/libf/phypluto/callkeys_mod.F90

Timestamp:

Aug 14, 2025, 9:40:34 AM (45 hours ago)

Author:

debatzbr

Message:

Pluto PCM: Allows for haze production with vmr CH4 fix profile.
BBT

File:

• trunk/LMDZ.PLUTO/libf/phypluto/callkeys_mod.F90 (modified) (1 diff)

trunk/LMDZ.PLUTO/libf/phypluto/callkeys_mod.F90

@@ -62 +62 @@
       logical,save :: cooling
 !$OMP THREADPRIVATE(cooling)
-      logical,save :: source_haze,hazeconservch4
-!$OMP THREADPRIVATE(source_haze,hazeconservch4)
+      logical,save :: source_haze,hazeconservch4,haze_ch4proffix
+!$OMP THREADPRIVATE(source_haze,hazeconservch4,haze_ch4proffix)
       logical,save :: ch4lag,tsurfmax
 !$OMP THREADPRIVATE(ch4lag,tsurfmax)