--- trunk/libf/dyn3d/leapfrog.f90	2008/07/25 19:59:34	13
+++ trunk/libf/dyn3d/leapfrog.f90	2008/08/07 12:29:13	18
@@ -46,7 +46,7 @@
     use pression_m, only: pression
     use pressure_var, only: p3d
 
-    integer nq
+    integer, intent(in):: nq
 
     ! Variables dynamiques:
     REAL vcov(ip1jm, llm), ucov(ip1jmp1, llm) ! vents covariants