Index: trunk/LMDZ.MARS/libf/phymars/conf_phys.F
===================================================================
--- trunk/LMDZ.MARS/libf/phymars/conf_phys.F	(revision 4066)
+++ trunk/LMDZ.MARS/libf/phymars/conf_phys.F	(revision 4067)
@@ -969,5 +969,5 @@
          call getin_p("albedo_h2o_cap",albedo_h2o_cap)
          write(*,*) " albedo_h2o_cap = ",albedo_h2o_cap
-         write(*,*) "water frist albedo ?"
+         write(*,*) "water frost albedo ?"
          albedo_h2o_frost=0.35
          call getin_p("albedo_h2o_frost",albedo_h2o_frost)
Index: trunk/LMDZ.MARS/libf/phymars/dyn1d/init_testphys1d_mod.F90
===================================================================
--- trunk/LMDZ.MARS/libf/phymars/dyn1d/init_testphys1d_mod.F90	(revision 4066)
+++ trunk/LMDZ.MARS/libf/phymars/dyn1d/init_testphys1d_mod.F90	(revision 4067)
@@ -665,5 +665,5 @@
     temp = teta(1:)
 else
-    read(3,*) header, (tsurf(1,j), j = 1,size(tsurf,2)), (temp(ilayer), ilayer = 1,nlayer)
+    read(3,*) header, (temp(ilayer), ilayer = 1,nlayer)
     close(3)
 endif
Index: trunk/LMDZ.MARS/libf/phymars/dyn1d/testphys1d.F90
===================================================================
--- trunk/LMDZ.MARS/libf/phymars/dyn1d/testphys1d.F90	(revision 4066)
+++ trunk/LMDZ.MARS/libf/phymars/dyn1d/testphys1d.F90	(revision 4067)
@@ -139,5 +139,5 @@
     endif
 endif
-if (therestart1D .and. .not. therestartfi) error stop 'There is a "start1D.txt" but no "startfi.nc". There might be problems for the initialization (for example ''qsurf'')!'
+if (therestart1D .and. .not. therestartfi) error stop 'There is a "start1D.txt" but no "startfi.nc". There might be problems for the initialization (for example ''qsurf'' and ''tsurf'')!'
 
 call init_testphys1d('start1D.txt','startfi.nc',therestart1D,therestartfi,ngrid,nlayer,odpref,nq,q, &
Index: trunk/LMDZ.MARS/libf/phymars/pbl_parameters_mod.F90
===================================================================
--- trunk/LMDZ.MARS/libf/phymars/pbl_parameters_mod.F90	(revision 4066)
+++ trunk/LMDZ.MARS/libf/phymars/pbl_parameters_mod.F90	(revision 4067)
@@ -149,5 +149,5 @@
 
       REAL tsurf_v(ngrid)                                           ! Virtual surface temperature, accounting for vapor flottability
-      REAL temp_v(ngrid)                                            ! Potential virtual air temperature in the frist layer, accounting for vapor flottability
+      REAL temp_v(ngrid)                                            ! Potential virtual air temperature in the first layer, accounting for vapor flottability
       REAL mu_h2o                                                   ! Molecular mass of water vapor (kg/mol)
       REAL tol_frost                                                ! Tolerance to consider the effect of frost on the surface
Index: trunk/LMDZ.MARS/libf/phymars/vdif_cd_mod.F90
===================================================================
--- trunk/LMDZ.MARS/libf/phymars/vdif_cd_mod.F90	(revision 4066)
+++ trunk/LMDZ.MARS/libf/phymars/vdif_cd_mod.F90	(revision 4067)
@@ -131,5 +131,5 @@
       REAL z1,zcd0                ! Neutral roughness (m) and Cd/Ch coefficient when call richls is not called 
       REAL tsurf_v(ngrid,nslope)  ! Virtual surface temperature, accounting for vapor flottability
-      REAL temp_v(ngrid)          ! Potential virtual air temperature in the frist layer, accounting for vapor flottability
+      REAL temp_v(ngrid)          ! Potential virtual air temperature in the first layer, accounting for vapor flottability
       REAL mu_h2o                 ! Molecular mass of water vapor (kg/mol)
       REAL tol_frost              ! Tolerance to consider the effect of frost on the surface
