--- trunk/libf/phylmd/phytrac.f90	2009/07/31 15:18:47	22
+++ trunk/libf/phylmd/phytrac.f90	2009/12/14 15:25:16	23
@@ -486,7 +486,6 @@
       ! Variables local to the procedure:
       integer it
       integer itau_w   ! pas de temps ecriture
-      REAL zx_tmp_2d(iim, jjm+1), zx_tmp_3d(iim, jjm+1, llm)
       logical, parameter:: ok_sync = .true.
 
       !-----------------------------------------------------