--- trunk/phylmd/concvl.f	2018/02/05 10:39:38	254
+++ trunk/phylmd/concvl.f	2018/04/19 17:54:55	266
@@ -42,7 +42,7 @@
     REAL ma(klon, klev)
     real cape(klon) ! output (J / kg)
     INTEGER, intent(out):: iflag(klon)
-    REAL qcondc(klon, klev)
+    REAL, intent(out):: qcondc(klon, klev) ! in-cloud water content
     REAL pmflxr(klon, klev + 1)
     REAL, intent(out):: da(:, :) ! (klon, klev)
     REAL, intent(out):: phi(:, :, :) ! (klon, klev, klev)