--- trunk/Sources/dyn3d/massbarxy.f	2015/04/29 15:47:56	134
+++ trunk/Sources/dyn3d/massbarxy.f	2015/07/28 14:53:31	164
@@ -11,9 +11,9 @@
     ! Calcule les moyennes en x et y de la masse d'air dans chaque maille.
     ! Authors: P. Le Van, F. Hourdin.
 
+    USE comgeom, ONLY: alpha1, alpha2, alpha3, alpha4
     USE dimens_m, ONLY: iim, llm
     USE paramet_m, ONLY: iip1, iip2, ip1jm, ip1jmp1
-    USE comgeom, ONLY: alpha1, alpha2, alpha3, alpha4
 
     REAL, intent(in):: masse(ip1jmp1, llm)
     real, intent(out):: massebxy(ip1jm, llm)