Changeset 6124 for LMDZ6/trunk/libf/phylmd/conf_phys_m.f90

Timestamp:

Mar 23, 2026, 11:31:30 PM (3 weeks ago)

Author:

lguez

Message:

Upgrade read_climoz

To variable of module conf_phys_m.

File:

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

LMDZ6/trunk/libf/phylmd/conf_phys_m.f90

@@ -56 +56 @@
     !$OMP THREADPRIVATE(alp_offset)
 
-
+    INTEGER, SAVE, protected:: read_climoz ! read ozone climatology
+    !     Allowed values are 0, 1 and 2
+    !     0: do not read an ozone climatology
+    !     1: read a single ozone climatology that will be used day and night
+    !     2: read two ozone climatologies, the average day and night
+    !     climatology and the daylight climatology
+    !$OMP THREADPRIVATE(read_climoz)
 
 CONTAINS
 
-  SUBROUTINE conf_phys( read_climoz )
+  SUBROUTINE conf_phys
 
         USE compbl_mod_h
@@ -121 +127 @@
     ! PC
     ! Per-gas routing switches (Concentration "effective")
-
-    INTEGER, INTENT(OUT):: read_climoz ! read ozone climatology, OpenMP shared
-    ! Allowed values are 0, 1 and 2
-    ! 0: do not read an ozone climatology
-    ! 1: read a single ozone climatology that will be used day and night
-    ! 2: read two ozone climatologies, the average day and night
-    ! climatology and the daylight climatology
 
     !-----------------------------------------------------------------