Changeset 1279 for LMDZ4/trunk/libf/dyn3dpar/inter_barx.F
- Timestamp:
- Dec 10, 2009, 10:02:56 AM (15 years ago)
- Location:
- LMDZ4/trunk
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/trunk
- Property svn:mergeinfo changed
/LMDZ4/branches/LMDZ4-dev merged: 1150-1162,1164-1193,1195-1231,1234-1235,1237-1240,1242-1274,1276
- Property svn:mergeinfo changed
-
LMDZ4/trunk/libf/dyn3dpar/inter_barx.F
r774 r1279 81 81 82 82 DO idat = 1, idatmax 83 xxd(idat) = AMOD( xxd(idat) - xim0, 360. )83 xxd(idat) = MOD( xxd(idat) - xim0, 360. ) 84 84 fdd(idat) = fdat (idat) 85 85 ENDDO … … 212 212 213 213 214 3 FORMAT(1x,70( 1h-))214 3 FORMAT(1x,70("-")) 215 215 2 FORMAT(1x,8f8.2) 216 216
Note: See TracChangeset
for help on using the changeset viewer.