Index: trunk/LMDZ.COMMON/libf/evolution/backup.F90
===================================================================
--- trunk/LMDZ.COMMON/libf/evolution/backup.F90	(revision 4135)
+++ trunk/LMDZ.COMMON/libf/evolution/backup.F90	(revision 4157)
@@ -95,5 +95,5 @@
 use atmosphere,       only: build4PCM_atmosphere
 use tracers,          only: build4PCM_tracers, nq
-use clim_state_rec,   only: write_restart, write_restartfi, write_restartpem
+use clim_state_rec,   only: write_restart, write_restartfi, write_restartevo
 use layered_deposits, only: layering
 
@@ -143,5 +143,5 @@
 
 ! Write restart files
-call write_restartpem(h2o_ice,co2_ice,tsoil_avg,TI,icetable_depth,icetable_thickness,ice_porefilling,h2o_ads_reg,co2_ads_reg,layerings_map)
+call write_restartevo(h2o_ice,co2_ice,tsoil_avg,TI,icetable_depth,icetable_thickness,ice_porefilling,h2o_ads_reg,co2_ads_reg,layerings_map)
 call write_restartfi(is_h2o_perice,h2o_ice4PCM,co2_ice4PCM,tsurf4PCM,tsoil4PCM,inertiesoil4PCM,albedo4PCM,emissivity4PCM,flux_geo4PCM)
 call write_restart(ps4PCM,pa4PCM,preff4PCM,q4PCM,teta4PCM,air_mass4PCM)
@@ -191,5 +191,6 @@
 ! CODE
 ! ----
-suffix = '_ts'//int2str(backup_idt)
+suffix = ''
+suffix = suffix//'_ts'//int2str(backup_idt)
 
 call print_msg('> Backup of "restart" files at dt = '//int2str(backup_idt),LVL_NFO)