Index: trunk/LMDZ.COMMON/libf/dynphy_lonlat/phyvenus/newstart.F
===================================================================
--- trunk/LMDZ.COMMON/libf/dynphy_lonlat/phyvenus/newstart.F	(revision 2135)
+++ trunk/LMDZ.COMMON/libf/dynphy_lonlat/phyvenus/newstart.F	(revision 2405)
@@ -250,4 +250,9 @@
 c dans run.def
       CALL getin('planet_type',planet_type)
+      cpofT = .False.
+      if (planet_type.eq."venus") then
+        cpofT = .True.
+      endif
+      CALL getin('cpofT',cpofT)
       call ini_cpdet
 
@@ -1215,5 +1220,5 @@
 ! pour info:
 ! Si extension verticale, on impose u=0 au-dessus de lmold
-            if (presnivs(l).lt.presnivsold(lmold)) ucov( i,j,l ) = 0
+!           if (presnivs(l).lt.presnivsold(lmold)) ucov( i,j,l ) = 0
           end do
         end do
@@ -1232,5 +1237,5 @@
 ! pour info:
 ! Si extension verticale, on impose v=0 au-dessus de lmold
-            if (presnivs(l).lt.presnivsold(lmold)) vcov( i,j,l ) = 0
+!           if (presnivs(l).lt.presnivsold(lmold)) vcov( i,j,l ) = 0
           end do
           vcov( iip1,j,l ) = vcov( 1,j,l )