source: trunk/WRF.COMMON/WRFV2/share/diff_mediation_integrate @ 3547

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 
11955c1955
2<          tupdate = mod( time, (12. * 3600.) )
3---
4>          tupdate = mod( time, (12. * 3700.) )
51997c1997
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.)
92001c2001
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.