Changeset 5569 for LMDZ6/trunk/libf/phylmd/phys_state_var_mod.F90

Timestamp:

Mar 7, 2025, 1:00:54 PM (4 months ago)

Author:

Laurent Fairhead

Message:

The THREADPRIVATE statements that were added in r5483 are erroneous as all variables concerned are
initialized under a OMP MASTER flag and thus not initialised for non master threads

File:

• LMDZ6/trunk/libf/phylmd/phys_state_var_mod.F90 (modified) (1 diff)

LMDZ6/trunk/libf/phylmd/phys_state_var_mod.F90

@@ -657 +657 @@
 !
       ALLOCATE(Mipsh(klon,klev))
+      Mipsh(:,:)=0.0
       ALLOCATE(Ma(klon,klev))
       ALLOCATE(qcondc(klon,klev))