Index: trunk/LMDZ.PLUTO/libf/dynphy_lonlat/phypluto/newstart.F
===================================================================
--- trunk/LMDZ.PLUTO/libf/dynphy_lonlat/phypluto/newstart.F	(revision 3762)
+++ trunk/LMDZ.PLUTO/libf/dynphy_lonlat/phypluto/newstart.F	(revision 3763)
@@ -535,5 +535,5 @@
         write(*,*) ''
         write(*,*) 'Please choose the relevant file',
-     &  ' (e.g. "surface_mars.nc")'
+     &  ' (e.g. "surface_pluto.nc")'
         write(*,*) ' or "none" to not use any (and set planetary'
         write(*,*) '  albedo and surface thermal inertia)'
Index: trunk/LMDZ.PLUTO/libf/phypluto/physiq_mod.F90
===================================================================
--- trunk/LMDZ.PLUTO/libf/phypluto/physiq_mod.F90	(revision 3762)
+++ trunk/LMDZ.PLUTO/libf/phypluto/physiq_mod.F90	(revision 3763)
@@ -1155,5 +1155,5 @@
       IF(calllott)THEN
         CALL calldrag_noro(ngrid,nlayer,ptimestep, &
-                           zplay,zplev,pt,pu,pv,zdtgw,zdugw,zdvgw)
+                           pplay,pplev,pt,pu,pv,zdtgw,zdugw,zdvgw)
 
         DO l=1,nlayer