Ignore:
Timestamp:
Jun 4, 2007, 4:13:10 PM (18 years ago)
Author:
Laurent Fairhead
Message:

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

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ4/trunk/libf/dyn3dpar/enercin_p.F

    r630 r764  
    5858c              0.5 * V(i,  j)**2 *( alpha2 + alpha3 )
    5959
    60 
     60c$OMP DO SCHEDULE(STATIC,OMP_CHUNK)
    6161      DO 5 l = 1,llm
    6262     
    … …  
    117117     
    118118   5  CONTINUE
     119c$OMP END DO NOWAIT
    119120      RETURN
    120121      END
Note: See TracChangeset for help on using the changeset viewer.