--- trunk/libf/dyn3d/Vlsplt/vlx.f90 2010/04/01 14:59:19 31 +++ trunk/libf/dyn3d/Vlsplt/vlx.f90 2010/04/06 17:52:58 32 @@ -112,8 +112,6 @@ ! l=1,llm ENDDO -!print*,'Ok calcul des pentes' - ! (pente_max.lt.-1.e-5) ELSE @@ -157,8 +155,6 @@ ENDDO -! print*,'Bouclage en iip1' - ! calcul des flux a gauche et a droite ! on cumule le flux correspondant a toutes les mailles dont la masse