Index: trunk/LMDZ.MARS/libf/phymars/dyn1d/testphys1d.F
===================================================================
--- trunk/LMDZ.MARS/libf/phymars/dyn1d/testphys1d.F	(revision 2977)
+++ trunk/LMDZ.MARS/libf/phymars/dyn1d/testphys1d.F	(revision 2980)
@@ -122,5 +122,4 @@
       REAL pks, ptif, w(nlayer)
       REAL qtotinit,qtot
-      real,allocatable :: mqtot(:)
       INTEGER ierr, aslun
       REAL tmp1(0:nlayer),tmp2(0:nlayer)
@@ -287,5 +286,4 @@
         allocate(dq(nlayer,nq))
         allocate(dqdyn(nlayer,nq))
-        allocate(mqtot(nq))
         allocate(tnom_transp(nq))