Changeset 764 for LMDZ4/trunk/libf/dyn3dpar/groupeun_p.F
- Timestamp:
- Jun 4, 2007, 4:13:10 PM (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/trunk/libf/dyn3dpar/groupeun_p.F
r630 r764 21 21 Champs 3D 22 22 jd=jjp1-jjmax 23 c$OMP DO SCHEDULE(STATIC,OMP_CHUNK) 23 24 do l=1,llm 24 25 j1=1+jd … … 72 73 enddo 73 74 enddo 74 75 c$OMP END DO NOWAIT 75 76 return 76 77 end
Note: See TracChangeset
for help on using the changeset viewer.