/[lmdze]/trunk/Sources/phylmd/dimphy.f
ViewVC logotype

Diff of /trunk/Sources/phylmd/dimphy.f

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

revision 3 by guez, Wed Feb 27 13:16:39 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)    REAL,save:: zmasq(KLON) ! fraction of land
23    
24  end module dimphy  end module dimphy
Legend:
Removed from v.3  
changed lines
  Added in v.34
  ViewVC Help
Powered by ViewVC 1.1.21