--- trunk/Sources/phylmd/coefkz.f	2017/04/20 14:44:47	221
+++ trunk/Sources/phylmd/coefkz.f	2017/11/06 17:20:45	229
@@ -43,9 +43,8 @@
     ! Local:
 
     INTEGER knon ! nombre de points a traiter
-
-    INTEGER itop(size(coefm, 1))
-    ! (knon) numero de couche du sommet de la couche limite
+    INTEGER itop(size(coefm, 1)) ! (knon) numero de couche du sommet
+                                 ! de la couche limite
 
     ! Quelques constantes et options: