Index: LMDZ5/trunk/libf/dyn3dpar/exner_milieu_p.F
===================================================================
--- LMDZ5/trunk/libf/dyn3dpar/exner_milieu_p.F	(revision 1520)
+++ LMDZ5/trunk/libf/dyn3dpar/exner_milieu_p.F	(revision 1521)
@@ -58,7 +58,7 @@
         ! check that vertical discretization is compatible
         ! with this routine
-        if (disvert_type.ne.1) then
+        if (disvert_type.ne.2) then
           call abort_gcm(modname,
-     &     "this routine should only be called if disvert_type==1",42)
+     &     "this routine should only be called if disvert_type==2",42)
         endif