--- trunk/phylmd/transp.f	2019/01/24 17:19:06	323
+++ trunk/phylmd/transp.f	2019/02/06 15:58:03	324
@@ -8,15 +8,13 @@
 
     ! From LMDZ4/libf/phylmd/transp.F,v 1.1.1.1 2004/05/19 12:53:09
 
-    USE dimensions
-    USE dimphy
-    USE suphec_m
-    ! ======================================================================
     ! Auteur(s): Z.X.Li (LMD/CNRS)
     ! Date: le 25 avril 1994
     ! Objet: Calculer le transport total de l'energie et de la vapeur d'eau
-    ! ======================================================================
 
+    USE dimensions
+    USE dimphy
+    USE suphec_m
 
     REAL, INTENT (IN) :: paprs(klon, klev+1)
     REAL, INTENT (IN) :: t(klon, klev)