Index: trunk/mesoscale/LMD_MM_MARS/SIMU/in_lmdz_mars_newphys/compile
===================================================================
--- trunk/mesoscale/LMD_MM_MARS/SIMU/in_lmdz_mars_newphys/compile	(revision 116)
+++ trunk/mesoscale/LMD_MM_MARS/SIMU/in_lmdz_mars_newphys/compile	(revision 117)
@@ -28,4 +28,9 @@
 ny=48
 nz=25
+##################
+#tracers=2
+#nx=64
+#ny=48
+#nz=25
 ##################
 
Index: trunk/mesoscale/LMD_MM_MARS/SIMU/in_lmdz_mars_newphys/myGCM/launch_gcm
===================================================================
--- trunk/mesoscale/LMD_MM_MARS/SIMU/in_lmdz_mars_newphys/myGCM/launch_gcm	(revision 116)
+++ trunk/mesoscale/LMD_MM_MARS/SIMU/in_lmdz_mars_newphys/myGCM/launch_gcm	(revision 117)
@@ -17,5 +17,6 @@
 #startbase='/tmp7/aslmd/flush/'
 #startbase='/tmp7/aslmd/flush2/'
-startbase='/d6/vblmd/MERIDIANI_EXOMARS/starts_en_cours/tau05/'
+#startbase='/d6/vblmd/MERIDIANI_EXOMARS/starts_en_cours/tau05/'
+startbase='/d5/aslmd/LMD_MM_MARS_DATA/STARTBASE_64_48_25_t2dust_JBM/'
 ##################
 
Index: trunk/mesoscale/LMD_MM_MARS/SIMU/in_lmdz_mars_newphys/myGCM/run_mcd_3days
===================================================================
--- trunk/mesoscale/LMD_MM_MARS/SIMU/in_lmdz_mars_newphys/myGCM/run_mcd_3days	(revision 116)
+++ trunk/mesoscale/LMD_MM_MARS/SIMU/in_lmdz_mars_newphys/myGCM/run_mcd_3days	(revision 117)
@@ -17,5 +17,5 @@
 runnum=0 ## 0 whatever, this is just the way one counts successive runs
 runnum_obsolete=0
-daynum=61 #0 
+daynum=0 #61 #0 
 
 while [ ${daynum} -lt ${daylim} ]  
Index: trunk/mesoscale/LMD_MM_MARS/SRC/WRFV2/phys/module_lmd_driver.F
===================================================================
--- trunk/mesoscale/LMD_MM_MARS/SRC/WRFV2/phys/module_lmd_driver.F	(revision 116)
+++ trunk/mesoscale/LMD_MM_MARS/SRC/WRFV2/phys/module_lmd_driver.F	(revision 117)
@@ -1115,4 +1115,15 @@
 DEALLOCATE(output_tab3d)
 
+
+!!!!!!!
+!!!!!!! SPECIAL POUR AJOUTER UNE TACHE DE POUSSIERE (sparadrap)
+!!!!!!! ps: induit une erreur benigne sur la partie de pdq qui n'est pas zdqnorm
+!!!!!!! ps: la raison est que dt n'est pas passe dans meso_physiq
+!!!!!!!
+!IF (firstcall .EQV. .true.) THEN
+!  pdq(:,:,:) = pdq(:,:,:) / dt
+!ENDIF
+
+
 !---------------------------------------------------------------------------------!
 ! PHYSIQ TENDENCIES ARE SAVED TO BE SPLIT WITHIN INTERMEDIATE DYNAMICAL TIMESTEPS !
@@ -1178,5 +1189,5 @@
 ! (cf CO2 cycle in physics) !
 !---------------------------!
-PSFC(i,j)=PSFC(i,j)+pdpsrf(subs)  
+PSFC(i,j)=PSFC(i,j)+pdpsrf(subs)*dt    !!! here dt is needed
 
 !---------!
@@ -1185,5 +1196,5 @@
 #ifdef NEWPHYS
 SCALAR(i,kps:kpe,j,1)=0.
-SCALAR(i,kps:kpe,j,2:nq+1)=SCALAR(i,kps:kpe,j,2:nq+1)+pdq(subs,kps:kpe,1:nq)
+SCALAR(i,kps:kpe,j,2:nq+1)=SCALAR(i,kps:kpe,j,2:nq+1)+pdq(subs,kps:kpe,1:nq)*dt  !!! here dt is needed
 #else
 SELECT CASE (MARS_MODE)
@@ -1192,10 +1203,10 @@
 CASE(1)
         !!! Water vapor
-        SCALAR(i,kps:kpe,j,2)=SCALAR(i,kps:kpe,j,2)+pdq(subs,kps:kpe,nq)
+        SCALAR(i,kps:kpe,j,2)=SCALAR(i,kps:kpe,j,2)+pdq(subs,kps:kpe,nq)*dt  !!! here dt is needed
         !!! Water ice
-        SCALAR(i,kps:kpe,j,3)=SCALAR(i,kps:kpe,j,3)+pdq(subs,kps:kpe,nq-1)
+        SCALAR(i,kps:kpe,j,3)=SCALAR(i,kps:kpe,j,3)+pdq(subs,kps:kpe,nq-1)*dt  !!! here dt is needed
 CASE(2)
         !!! Dust 
-        SCALAR(i,kps:kpe,j,2)=SCALAR(i,kps:kpe,j,2)+pdq(subs,kps:kpe,nq)
+        SCALAR(i,kps:kpe,j,2)=SCALAR(i,kps:kpe,j,2)+pdq(subs,kps:kpe,nq)*dt  !!! here dt is needed
 CASE(3:)
         print *, 'OOOPS... not ready yet.'
@@ -1309,3 +1320,2 @@
 
 END MODULE module_lmd_driver
-