--- trunk/dyn3d/Guide/Read_reanalyse/read_reanalyse.f	2014/09/19 11:41:35	114
+++ trunk/Sources/dyn3d/Guide/Read_reanalyse/read_reanalyse.f	2015/09/29 19:48:59	171
@@ -14,7 +14,7 @@
     USE paramet_m, ONLY: iip1, jjp1
     use reanalyse2nat_m, only: reanalyse2nat
 
-    integer timestep
+    integer, intent(in):: timestep
     real, intent(in):: psi(iip1, jjp1)
     real u(iip1, jjp1, llm), v(iip1, jjm, llm)
     real t(iip1, jjp1, llm), q(iip1, jjp1, llm)