Index: trunk/LMDZ.MARS/libf/phymars/calltherm_interface.F90
===================================================================
--- trunk/LMDZ.MARS/libf/phymars/calltherm_interface.F90	(revision 577)
+++ trunk/LMDZ.MARS/libf/phymars/calltherm_interface.F90	(revision 592)
@@ -206,10 +206,10 @@
             r_aspect_thermals=0.7
 #else
-            IF ((ptimestep .lt. 3699.*24./96.) .and. (iradia .eq. 1)) THEN
+            IF ((ptimestep .le. 3699.*24./96.) .and. (iradia .eq. 1)) THEN
                nsplit_thermals=10
             ELSE
                nsplit_thermals=35
             ENDIF
-            r_aspect_thermals=1.5
+            r_aspect_thermals=1.
 #endif
             call getin("nsplit_thermals",nsplit_thermals)