- Timestamp:
- Jan 20, 2010, 3:27:21 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/branches/LMDZ4V5.0-dev/libf/phylmd/tracinca_mod.F90
r1279 r1299 45 45 USE vampir 46 46 USE comgeomphy 47 USE control_mod 48 47 49 48 50 IMPLICIT NONE 49 51 50 52 INCLUDE "indicesol.h" 51 INCLUDE "control.h"52 53 INCLUDE "dimensions.h" 53 54 INCLUDE "paramet.h" … … 125 126 CALL VTb(VTinca) 126 127 127 calday = FLOAT(julien) + gmtime128 calday = REAL(julien) + gmtime 128 129 ncsec = NINT (86400.*gmtime) 129 130
Note: See TracChangeset
for help on using the changeset viewer.