/[lmdze]/trunk/dyn3d/Vlsplt/vlx.f
ViewVC logotype

Diff of /trunk/dyn3d/Vlsplt/vlx.f

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

revision 31 by guez, Thu Apr 1 14:59:19 2010 UTC revision 32 by guez, Tue Apr 6 17:52:58 2010 UTC
# Line 112  Line 112 
112    
113                 ! l=1,llm                 ! l=1,llm
114           ENDDO           ENDDO
 !print*,'Ok calcul des pentes'  
   
115             ! (pente_max.lt.-1.e-5)             ! (pente_max.lt.-1.e-5)
116        ELSE        ELSE
117    
# Line 157  Line 155 
155    
156        ENDDO        ENDDO
157    
 ! print*,'Bouclage en iip1'  
   
158  !   calcul des flux a gauche et a droite  !   calcul des flux a gauche et a droite
159    
160  !   on cumule le flux correspondant a toutes les mailles dont la masse  !   on cumule le flux correspondant a toutes les mailles dont la masse
Legend:
Removed from v.31  
changed lines
  Added in v.32
  ViewVC Help
Powered by ViewVC 1.1.21