Changeset 766 for LMDZ4/trunk/libf/phylmd/diagphy.F

Timestamp:

Jun 4, 2007, 4:34:47 PM (17 years ago)

Author:

Laurent Fairhead

Message:

Merge entre la version V3_conv et le HEAD
YM, JG, LF

File:

• LMDZ4/trunk/libf/phylmd/diagphy.F (modified) (3 diffs)

LMDZ4/trunk/libf/phylmd/diagphy.F

@@ -74 +74 @@
       save pas
       data pas/0/
+c$OMP THREADPRIVATE(pas)
 C
       pas=pas+1
@@ -258 +259 @@
       save pas
       data pas/ndiag*0/
+c$OMP THREADPRIVATE(pas)
 C     
       REAL      h_vcol_pre(ndiag), h_dair_pre(ndiag), h_qw_pre(ndiag)
@@ -264 +266 @@
       SAVE      h_vcol_pre, h_dair_pre, h_qw_pre, h_ql_pre
      $        , h_qs_pre, qw_pre, ql_pre, qs_pre , ec_pre
-
+c$OMP THREADPRIVATE(h_vcol_pre, h_dair_pre, h_qw_pre, h_ql_pre)
+c$OMP THREADPRIVATE(h_qs_pre, qw_pre, ql_pre, qs_pre , ec_pre)
 c======================================================================
 C