Changeset 2910 for LMDZ5/trunk

Timestamp:

Jun 13, 2017, 6:08:30 PM (7 years ago)

Author:

jbmadeleine

Message:

Added THREADPRIVATE for firstcall and alpha_vert in cloudth_vert_v3 as well.

File:

• LMDZ5/trunk/libf/phylmd/cloudth_mod.F90 (modified) (1 diff)

LMDZ5/trunk/libf/phylmd/cloudth_mod.F90

@@ -861 +861 @@
       ! (J Jouhaud, JL Dufresne, JB Madeleine)
       REAL,SAVE :: vert_alpha
+      !$OMP THREADPRIVATE(vert_alpha)
       LOGICAL, SAVE :: firstcall = .TRUE.
+      !$OMP THREADPRIVATE(firstcall)
 
       REAL zpdf_sig(ngrid),zpdf_k(ngrid),zpdf_delta(ngrid)