Changeset 709 for LMDZ4/branches/V3_test/libf/dyn3dpar/massbarxy_p.F

Timestamp:

Sep 20, 2006, 12:12:39 PM (18 years ago)

Author:

Laurent Fairhead

Message:

Nouvelles versions de la dynamique YM
LF

File:

• LMDZ4/branches/V3_test/libf/dyn3dpar/massbarxy_p.F (modified) (2 diffs)

LMDZ4/branches/V3_test/libf/dyn3dpar/massbarxy_p.F

@@ -31 +31 @@
       if (pole_sud)  ije=ije-iip1
 
+c$OMP DO SCHEDULE(STATIC,OMP_CHUNK)    
       DO   100    l = 1 , llm
 c
@@ -49 +50 @@
 
 100   CONTINUE
+c$OMP END DO NOWAIT
 c
       RETURN