Changeset 1692 for trunk/LMDZ.VENUS/libf


Ignore:
Timestamp:
Apr 10, 2017, 12:18:51 PM (8 years ago)
Author:
slebonnois
Message:

SL: bug correction for 1D with microphysics

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.VENUS/libf/phyvenus/dyn1d/rcm1d.F

    r1691 r1692  
    1515      USE mod_const_mpi, ONLY: comm_lmdz
    1616      USE physiq_mod, ONLY: physiq
     17      USE logic_mod, ONLY: iflag_trac
    1718      IMPLICIT NONE
    1819
    … …  
    119120c  dans fichier traceur.def
    120121      call infotrac_init
     122      if (nqtot.gt.1) iflag_trac=1
    121123
    122124c Allocation de la tableau q : champs advectes   
Note: See TracChangeset for help on using the changeset viewer.