Changeset 764 for LMDZ4/trunk/libf/dyn3dpar/rotat_nfil_p.F
- Timestamp:
- Jun 4, 2007, 4:13:10 PM (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/trunk/libf/dyn3dpar/rotat_nfil_p.F
r630 r764 32 32 ije=ij_end 33 33 if(pole_sud) ije=ij_end-iip1 34 34 c$OMP DO SCHEDULE(STATIC,OMP_CHUNK) 35 35 DO 10 l = 1,klevel 36 36 c … … 48 48 c 49 49 10 CONTINUE 50 50 c$OMP END DO NOWAIT 51 51 RETURN 52 52 END
Note: See TracChangeset
for help on using the changeset viewer.