Index: LMDZ6/trunk/libf/phylmd/cvltr_noscav.F90
===================================================================
--- LMDZ6/trunk/libf/phylmd/cvltr_noscav.F90	(revision 3266)
+++ LMDZ6/trunk/libf/phylmd/cvltr_noscav.F90	(revision 3267)
@@ -39,4 +39,5 @@
   INTEGER                         :: i,k,j 
   REAL                            :: pdtimeRG
+  REAL                            :: smallest_mp
   real conserv
   real smfd
@@ -47,4 +48,6 @@
 ! calcul des tendances liees au downdraft
 ! =========================================
+!
+  smallest_mp = tiny(mp(1,1))
 !cdir collapse
   qfeed(:,it) = 0.
@@ -88,5 +91,5 @@
 !!              zmd(i,j,k)=zmd(i,j+1,k)*min(1.,mp(i,j)/mp(i,j+1))
 !!           ENDif
-           zmd(i,j,k)=zmd(i,j+1,k)*mp(i,j)/max(mp(i,j),max(mp(i,j+1),1.e-20))
+           zmd(i,j,k)=zmd(i,j+1,k)*mp(i,j)/max(mp(i,j),mp(i,j+1),smallest_mp)
         END DO
      END DO