Index: /trunk/LMDZ.MARS/libf/phymars/meso_inc/meso_inc_inifisini.F
===================================================================
--- /trunk/LMDZ.MARS/libf/phymars/meso_inc/meso_inc_inifisini.F	(revision 245)
+++ /trunk/LMDZ.MARS/libf/phymars/meso_inc/meso_inc_inifisini.F	(revision 246)
@@ -88,4 +88,4 @@
 c It must be set now, because it is used afterwards
 c*****************************************************
-        dtphys=wdt*float(ptimestep)
-        print*,'Physical timestep (s) ',dtphys
+        dtphys=wdt*ptimestep 
+        print*,'Physical timestep (s) ',dtphys, ptimestep
Index: /trunk/LMDZ.MARS/libf/phymars/testphys1d.F
===================================================================
--- /trunk/LMDZ.MARS/libf/phymars/testphys1d.F	(revision 245)
+++ /trunk/LMDZ.MARS/libf/phymars/testphys1d.F	(revision 246)
@@ -431,9 +431,5 @@
 
 !Mars possible matter with dtphys in input and include!!!
-#ifdef MESOSCALE
-      CALL meso_inifis(1,llm,day0,daysec,dtphys,
-#else
       CALL inifis(1,llm,day0,daysec,dtphys,
-#endif
      .            lati,long,area,rad,g,r,cpp)
 c   Initialisation pour prendre en compte les vents en 1-D
@@ -618,9 +614,5 @@
 c       appel de la physique
 c       --------------------
-#ifdef MESOSCALE
-      CALL meso_physiq (1,llm,nqmx,
-#else
       CALL physiq (1,llm,nqmx,
-#endif
      ,     firstcall,lastcall,
      ,     day,time,dtphys,
