--- trunk/phylmd/CV30_routines/cv30_undilute2.f90	2019/06/13 14:40:06	328
+++ trunk/phylmd/CV30_routines/cv30_undilute2.f90	2019/08/13 09:19:22	332
@@ -20,7 +20,9 @@
     USE dimphy, ONLY: klon, klev
     use SUPHEC_M, only: rcw, rlvtt, rcpd, rcpv, rv
 
-    integer, intent(in):: icb(:), icbs(:) ! (ncum)
+    integer, intent(in):: icb(:) ! (ncum) {2 <= icb <= nl - 3}
+
+    integer, intent(in):: icbs(:) ! (ncum)
     ! icbs is the first level above LCL (may differ from icb)
 
     real, intent(in):: tnk(:), qnk(:), gznk(:) ! (klon)