Changeset 1845 for LMDZ5/trunk
- Timestamp:
- Aug 22, 2013, 12:00:37 PM (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/dyn3dpar/leapfrog_p.F
r1825 r1845 998 998 ! Academic case : Simple friction and Newtonan relaxation 999 999 ! ------------------------------------------------------- 1000 c$OMP MASTER 1001 if (FirstPhysic) then 1002 ok_start_timer=.TRUE. 1003 FirstPhysic=.false. 1004 endif 1005 c$OMP END MASTER 1006 1000 1007 ijb=ij_begin 1001 1008 ije=ij_end
Note: See TracChangeset
for help on using the changeset viewer.