--- trunk/dyn3d/leapfrog.f	2018/12/10 15:54:30	313
+++ trunk/dyn3d/leapfrog.f	2019/03/13 15:53:40	325
@@ -36,7 +36,6 @@
     use nr_util, only: assert
     use writehist_m, only: writehist
 
-    ! Variables dynamiques:
     REAL, intent(inout):: ucov(:, :, :) ! (iim + 1, jjm + 1, llm) vent covariant
     REAL, intent(inout):: vcov(:, :, :) ! (iim + 1, jjm, llm) ! vent covariant
 
@@ -52,8 +51,6 @@
 
     ! Local:
 
-    ! Variables dynamiques:
-
     REAL pks(iim + 1, jjm + 1) ! exner au sol
     REAL pk(iim + 1, jjm + 1, llm) ! exner au milieu des couches
     REAL pkf(iim + 1, jjm + 1, llm) ! exner filtr\'e au milieu des couches