Index: trunk/LMDZ.PLUTO/deftank/newstart/newscale.def
===================================================================
--- trunk/LMDZ.PLUTO/deftank/newstart/newscale.def	(revision 3732)
+++ trunk/LMDZ.PLUTO/deftank/newstart/newscale.def	(revision 3732)
@@ -0,0 +1,7 @@
+0
+n
+
+surface_pluto1440x720_ipag_flat.nc
+1321
+
+
Index: trunk/LMDZ.PLUTO/deftank/newstart/newscale_z2sig.sh
===================================================================
--- trunk/LMDZ.PLUTO/deftank/newstart/newscale_z2sig.sh	(revision 3732)
+++ trunk/LMDZ.PLUTO/deftank/newstart/newscale_z2sig.sh	(revision 3732)
@@ -0,0 +1,18 @@
+#!/bin/bash
+
+nlevel=151
+nlevel=201
+
+cp start0.nc start.nc
+cp startfi0.nc startfi.nc
+cp z2sig_27 z2sig.def
+rm start_archive.nc
+start2archive_32x24x27_phypluto_b17x23_seq.e
+cp z2sig_${nlevel}_v1 z2sig.def
+newstart_96x72x${nlevel}_phypluto_b17x23_seq.e < newstart.def
+mv restart.nc start.nc
+mv restartfi.nc startfi.nc
+#./expandstartfi.e
+
+
+
Index: trunk/LMDZ.PLUTO/libf/dynphy_lonlat/phypluto/lect_start_archive.F
===================================================================
--- trunk/LMDZ.PLUTO/libf/dynphy_lonlat/phypluto/lect_start_archive.F	(revision 3731)
+++ trunk/LMDZ.PLUTO/libf/dynphy_lonlat/phypluto/lect_start_archive.F	(revision 3732)
@@ -264,5 +264,5 @@
       write(*,*) '  Otherwise, set nsoilmx -in dimphys.h- to: ',nsoilold
       endif
-      write(*,*) "time lenght: ",timelen
+      write(*,*) "time length: ",timelen
       write(*,*)
 
@@ -596,4 +596,7 @@
  123  read(*,*,iostat=ierr) date
       if(ierr.ne.0) goto 123
+      if (timelen.eq.1) then
+        memo = 1
+      else
       memo = 0
       do i=1,timelen
@@ -615,4 +618,5 @@
         end do
         goto 123
+      endif
       endif