Changeset 1727


Ignore:
Timestamp:
Feb 27, 2013, 5:01:14 PM (11 years ago)
Author:
lguez
Message:

Bug fix. Bug from revision 1697.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ5/trunk/libf/phylmd/etat0_netcdf.F90

    r1712 r1727  
    437437! Writing
    438438!*******************************************************************************
    439   CALL inidissip(lstardis,nitergdiv,nitergrot,niterh,tetagdiv,tetagrot,tetatemp)
     439  CALL inidissip(lstardis, nitergdiv, nitergrot, niterh, tetagdiv, tetagrot, &
     440       tetatemp, vert_prof_dissip)
    440441  WRITE(lunout,*)'sortie inidissip'
    441442  itau=0
Note: See TracChangeset for help on using the changeset viewer.