Changeset 6119 for LMDZ6/trunk/libf

Timestamp:

Mar 23, 2026, 11:28:51 PM (9 days ago)

Author:

lguez

Message:

Set read_climoz to OpenMP threadprivate

In the process of rewriting module physiq_mod, we need
uniformization of coding. So make read_climoz threadprivate as other
saved variables in the physics part of LMDZ.

File:

• LMDZ6/trunk/libf/phylmd/physiq_mod.F90 (modified) (2 diffs)

LMDZ6/trunk/libf/phylmd/physiq_mod.F90

@@ -1061 +1061 @@
     ! Declaration des constantes et des fonctions thermodynamiques
     !
-    ! VARIABLES RELATED TO OZONE CLIMATOLOGIES ; all are OpenMP shared
+    ! VARIABLES RELATED TO OZONE CLIMATOLOGIES
     ! Note that pressure vectors are in Pa and in stricly ascending order
     INTEGER,SAVE :: read_climoz                ! Read ozone climatology
-    !     (let it keep the default OpenMP shared attribute)
     !     Allowed values are 0, 1 and 2
     !     0: do not read an ozone climatology
@@ -1070 +1069 @@
     !     2: read two ozone climatologies, the average day and night
     !     climatology and the daylight climatology
-
+    !$OMP THREADPRIVATE(read_climoz)
+
+    !  Following variables are OpenMP shared
     INTEGER,SAVE :: ncid_climoz                ! NetCDF file identifier
     REAL, ALLOCATABLE, SAVE :: press_cen_climoz(:) ! Pressure levels