Changeset 1041 for trunk/LMDZ.MARS/libf


Ignore:
Timestamp:
Sep 19, 2013, 1:16:54 AM (12 years ago)
Author:
aslmd
Message:

MESOSCALE LMDZ.MARS. added outliers in old physics. get rid of negative qsurf in MESOINI mode.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.MARS/libf/phymars/surfini.F

    r1036 r1041  
    493493              print*, '2) Use ini_h2osurf option in newstart'
    494494              print*, ''
     495#ifndef MESOINI
    495496              CALL ABORT
     497#else
     498              qsurf(ig,iq) = 0.
     499#endif
    496500            endif
    497501             
Note: See TracChangeset for help on using the changeset viewer.