/[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

trunk/libf/phylmd/dimphy.f90 revision 3 by guez, Wed Feb 27 13:16:39 2008 UTC trunk/phylmd/dimphy.f revision 82 by guez, Wed Mar 5 14:57:53 2014 UTC
# Line 11  module dimphy Line 11  module dimphy
11    ! (Les points de la physique sont les points scalaires de la dynamique.    ! (Les points de la physique sont les points scalaires de la dynamique.
12    ! Numerotation :    ! Numerotation :
13    ! 1 pour le pole nord    ! 1 pour le pole nord
14    ! (jjm-1)*iim pour l'interieur du domaine    ! (jjm - 1) * iim pour l'interieur du domaine
15    ! klon pour le pole sud)    ! klon pour le pole sud)
16    
17    INTEGER, PARAMETER:: KLEV = llm    INTEGER, PARAMETER:: KLEV = llm
18      INTEGER, PARAMETER:: nbtr = max(1, nqmx - 2) ! nombre de vrais traceurs
19    INTEGER, PARAMETER:: nbtr = nqmx - 2 + 1 / (nqmx-1)    REAL,save:: zmasq(KLON) ! fraction of land
   ! (nombre de vrais traceurs)  
   
   REAL,save:: zmasq(KLON)  
20    
21  end module dimphy  end module dimphy

Legend:
Removed from v.3  
changed lines
  Added in v.82

  ViewVC Help
Powered by ViewVC 1.1.21