|
Last change
on this file since 3709 was
11,
checked in by aslmd, 15 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.
