--- trunk/Sources/phylmd/ini_histins.f	2016/02/05 16:02:34	175
+++ trunk/Sources/phylmd/ini_histins.f	2016/03/16 14:42:58	183
@@ -9,6 +9,7 @@
     ! From phylmd/ini_histins.h, v 1.2 2005/05/25 13:10:09
 
     use clesphys, only: ecrit_ins
+    use clesphys2, only: conv_emanuel
     use dimens_m, only: iim, jjm, llm, nqmx
     use dimphy, only: klon
     use disvert_m, only: presnivs
@@ -260,7 +261,8 @@
             iim, (jjm + 1), nhori, 1, 1, 1, -99, &
             "inst(X)", zsto, zout)
 
-       !IM cf. AM 081204 END
+       if (conv_emanuel) CALL histdef(nid_ins, "ptop", "cloud top pressure", &
+            "Pa", iim, jjm + 1, nhori, 1, 1, 1, -99, "inst(X)", zsto, zout)
 
        ! Champs 3D:
 
@@ -296,6 +298,10 @@
             "kg m-2", iim, jjm + 1, nhori, llm, 1, llm, nvert, "inst(X)", &
             zsto, zout)
 
+       CALL histdef(nid_ins, "rhum", "Relative humidity", &
+            "", iim, jjm + 1, nhori, llm, 1, llm, nvert, "inst(X)", &
+            zsto, zout)
+
        DO it = 1, nqmx - 2
           ! champ 2D
           iq=it+2