Changeset 6186

Timestamp:

Apr 23, 2026, 5:19:26 PM (11 days ago)

Author:

lguez

Message:

Initialize read_climoz in its declaration

So that it has its default value even if conf_phys has not been
called. This will happen in program scm when we remove argument
read_climoz of phys_state_var_init.

File:

• LMDZ6/trunk/libf/phylmd/conf_phys_m.f90 (modified) (2 diffs)

LMDZ6/trunk/libf/phylmd/conf_phys_m.f90

@@ -54 +54 @@
     !$OMP THREADPRIVATE(alp_offset)
 
-    INTEGER, SAVE, protected:: read_climoz ! read ozone climatology
+    INTEGER, SAVE, protected:: read_climoz = 0 ! read ozone climatology
     !     Allowed values are 0, 1 and 2
     !     0: do not read an ozone climatology
@@ -1138 +1138 @@
     CALL getin_p('ecrit_LES', ecrit_LES)
     !
-    read_climoz = 0 ! default value
     CALL getin_p('read_climoz', read_climoz)