Last change
on this file since 3547 was
11,
checked in by aslmd, 14 years ago
|
spiga@svn-planeto:ajoute le modele meso-echelle martien
|
File size:
450 bytes
|
Line | |
---|
1 | 1955c1955 |
---|
2 | < tupdate = mod( time, (12. * 3600.) ) |
---|
3 | --- |
---|
4 | > tupdate = mod( time, (12. * 3700.) ) |
---|
5 | 1997c1997 |
---|
6 | < WRITE( message, '(A,2F10.1)' ) ' HOURLY EMISSIONS UPDATE TIME ',time,mod(time,3600.) |
---|
7 | --- |
---|
8 | > WRITE( message, '(A,2F10.1)' ) ' HOURLY EMISSIONS UPDATE TIME ',time,mod(time,3700.) |
---|
9 | 2001c2001 |
---|
10 | < IF ( ( mod( time, 3600. ) .LT. 0.001 ) .AND. & |
---|
11 | --- |
---|
12 | > IF ( ( mod( time, 3700. ) .LT. 0.001 ) .AND. & |
---|
Note: See
TracBrowser
for help on using the repository browser.