Index: LMDZ.3.3/trunk/libf/dyn3d/etat0_netcdf.F
===================================================================
--- LMDZ.3.3/trunk/libf/dyn3d/etat0_netcdf.F	(revision 8)
+++ LMDZ.3.3/trunk/libf/dyn3d/etat0_netcdf.F	(revision 9)
@@ -20,5 +20,5 @@
       REAL :: orog(iip1,jjp1), rugo(iip1,jjp1), masque(iip1,jjp1),
      . psol(iip1, jjp1), phis(iip1, jjp1)
-      REAL :: p3d(iip1, jjp1, llm)
+      REAL :: p3d(iip1, jjp1, llm+1)
       REAL :: uvent(iip1, jjp1, llm)
       REAL :: vvent(iip1, jjm, llm)