--- trunk/libf/phylmd/dimphy.f90 2010/06/02 11:01:12 34 +++ trunk/libf/phylmd/dimphy.f90 2013/07/08 18:12:18 71 @@ -11,14 +11,11 @@ ! (Les points de la physique sont les points scalaires de la dynamique. ! Numerotation : ! 1 pour le pole nord - ! (jjm-1)*iim pour l'interieur du domaine + ! (jjm - 1) * iim pour l'interieur du domaine ! klon pour le pole sud) INTEGER, PARAMETER:: KLEV = llm - - INTEGER, PARAMETER:: nbtr = max(1, nqmx - 2) - ! (nombre de vrais traceurs) - + INTEGER, PARAMETER:: nbtr = max(1, nqmx - 2) ! nombre de vrais traceurs REAL,save:: zmasq(KLON) ! fraction of land end module dimphy