Changeset 61 for trunk/mars/libf


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/mars/libf/phymars/meso_physiq.F

    r55 r61  
    428428      PRINT*,'Write LMD physics each:',ecritphy,' seconds'
    429429c
    430       DO iq=1, nq
    431         PRINT*, tnom(iq), pq(:,:,iq)
    432       ENDDO
     430      !DO iq=1, nq
     431      !  PRINT*, tnom(iq), pq(:,:,iq)
     432      !ENDDO
    433433c
    434434c ****WRF
Note: See TracChangeset for help on using the changeset viewer.