Ignore:
Timestamp:
Jan 27, 2006, 4:14:22 PM (19 years ago)
Author:
Laurent Fairhead
Message:

Differentes corrections pour g95
LF

Location:
LMDZ4/trunk/libf/phylmd
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • LMDZ4/trunk/libf/phylmd/physiq.F

    r674 r677  
    12361236         SAVE rain_con
    12371237         SAVE snow_con
    1238          SAVE bl95_b0
    1239          SAVE bl95_b1
    12401238         SAVE topswai
    12411239         SAVE topswad
    … …  
    12461244         SAVE rnebcon0
    12471245         SAVE clwcon0
    1248          SAVE rnebcon
    1249          SAVE clwcon
    12501246         SAVE paire_ter
    12511247         SAVE nhistoW

  • LMDZ4/trunk/libf/phylmd/phytrac.F

    r673 r677  
    156156      logical lafin          ! le flag de la fin de la physique
    157157c Olivia     
    158       integer isplit,nsplit
     158      integer nsplit
    159159      REAL pmflxr(klon,klev+1), pmflxs(klon,klev+1)   !--lessivage convection
    160160      REAL prfl(klon,klev+1),   psfl(klon,klev+1)     !--lessivage large-scale
    … …  
    163163      REAL flxmass_w(klon,klev)
    164164#endif
    165       integer iflag_con
     165c      integer iflag_con
    166166
    167167cAA Rem : nbtr : nombre de vrais traceurs est defini dans dimphy.h
Note: See TracChangeset for help on using the changeset viewer.