--- trunk/Sources/dyn3d/flumass.f	2015/07/24 18:14:04	163
+++ trunk/Sources/dyn3d/flumass.f	2015/07/28 14:53:31	164
@@ -11,9 +11,9 @@
     ! Auteurs : P. Le Van, F. Hourdin
     ! Objet: calcul du flux de masse aux niveaux s 
 
+    USE comgeom, ONLY: aire, aireu
     USE dimens_m, ONLY: iim, llm
     USE paramet_m, ONLY: iip1, iip2, ip1jm, ip1jmi1, ip1jmp1
-    USE comgeom, ONLY: aire, aireu
 
     REAL, intent(in):: massebx(ip1jmp1, llm), masseby(ip1jm, llm)
     real, intent(in):: vcont(ip1jm, llm), ucont(ip1jmp1, llm)