/[lmdze]/trunk/libf/phylmd/dimphy.f90
ViewVC logotype

Diff of /trunk/libf/phylmd/dimphy.f90

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 15 by guez, Fri Aug 1 15:24:12 2008 UTC revision 34 by guez, Wed Jun 2 11:01:12 2010 UTC
# Line 16  module dimphy Line 16  module dimphy
16    
17    INTEGER, PARAMETER:: KLEV = llm    INTEGER, PARAMETER:: KLEV = llm
18    
19    INTEGER, PARAMETER:: nbtr = nqmx - 2 + 1 / (nqmx-1)    INTEGER, PARAMETER:: nbtr = max(1, nqmx - 2)
20    ! (nombre de vrais traceurs)    ! (nombre de vrais traceurs)
21    
22    REAL,save:: zmasq(KLON) ! fraction of land    REAL,save:: zmasq(KLON) ! fraction of land
Legend:
Removed from v.15  
changed lines
  Added in v.34
  ViewVC Help
Powered by ViewVC 1.1.21