Ignore:
Timestamp:
Feb 14, 2011, 7:11:03 PM (14 years ago)
Author:
aslmd
Message:

LMD_LES_MARS avec NOUVELLE PHYSIQUE. creation d'options pour le script makeles. correction d'un bug sur module_lmd_driver.F qui provoquait l'arret du programme car wecritphys ne peut valoir 0. test concluant sur une simulation type.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/mesoscale/LMD_MM_MARS/SRC/WRFV2/phys/module_lmd_driver.F

    r55 r61  
    940940        !print *, '** Mars ** Diagnostic files each ',wecri_phys,' phys. steps'
    941941        wecri_phys_sec=dt*float(wecri_phys)*float(wappel_phys)
     942        IF (JULYR .eq. 9999) wecri_phys_sec = 100000000.  !! sinon bug (ne peut valoir 0)
    942943
    943944!!********!!
Note: See TracChangeset for help on using the changeset viewer.