--- trunk/libf/dyn3d/leapfrog.f90	2008/10/15 16:19:57	20
+++ trunk/libf/dyn3d/leapfrog.f90	2009/07/31 15:18:47	22
@@ -92,7 +92,8 @@
 
     REAL tppn(iim), tpps(iim), tpn, tps
 
-    INTEGER itau, itaufinp1
+    INTEGER itau ! index of the time step of the dynamics, starts at 0
+    integer itaufinp1
     INTEGER iday ! jour julien
     REAL time ! time of day, as a fraction of day length