Changeset 1279 for LMDZ4/trunk/libf/phylmd/radepsi.h
- 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/phylmd/radepsi.h
r524 r1279 2 2 ! $Header$ 3 3 ! 4 REAL *8ZEELOG, ZEPSC, ZEPSCO, ZEPSCQ, ZEPSCT, ZEPSCW5 REAL *8ZEPSEC, ZEPSCR4 REAL(KIND=8) ZEELOG, ZEPSC, ZEPSCO, ZEPSCQ, ZEPSCT, ZEPSCW 5 REAL(KIND=8) ZEPSEC, ZEPSCR 6 6 PARAMETER (ZEELOG = 1.E-07) !1.e-10 (not good for 32-bit machines) 7 7 PARAMETER (ZEPSC = 1.E-20) … … 13 13 PARAMETER (ZEPSCR = 1.0E-10) 14 14 c 15 REAL *8REPSCT15 REAL(KIND=8) REPSCT 16 16 PARAMETER (REPSCT=1.0E-10)
Note: See TracChangeset
for help on using the changeset viewer.