Changeset 486 for LMDZ.3.3/branches/rel-LF/libf/phylmd/ini_histmth.h

Timestamp:

Dec 15, 2003, 6:50:41 PM (21 years ago)

Author:

lmdzadmin

Message:

Phasage avec la version de Ionela
IM/LF

File:

• LMDZ.3.3/branches/rel-LF/libf/phylmd/ini_histmth.h (modified) (7 diffs)

LMDZ.3.3/branches/rel-LF/libf/phylmd/ini_histmth.h

@@ -116 +116 @@
      .                iim,jjmp1,nhori, 1,1,1, -99, 32, 
      .                "ave(X)", zsto,zout)
-c
-         CALL histdef(nid_mth, "solldown", "Down. IR rad. at surface", 
+cIM: 071003
+         CALL histdef(nid_mth,"LWdnSFC","Down. IR rad. at surface", 
+     .                "W/m2", iim,jjmp1,nhori, 1,1,1, -99, 32, 
+     .                "ave(X)", zsto,zout)
+cIM: 071003
+         CALL histdef(nid_mth,"LWupSFC","Upwd. IR rad. at surface", 
      .                "W/m2", iim,jjmp1,nhori, 1,1,1, -99, 32, 
      .                "ave(X)", zsto,zout)
@@ -263 +267 @@
      .                "ave(X)", zsto,zout)
 c
-         CALL histdef(nid_mth, "cldq", "Cloud liquid water path", "-",
-     .                iim,jjmp1,nhori, 1,1,1, -99, 32, 
+         CALL histdef(nid_mth,"cldq","Cloud liquid water path","Kg/m2",
+     .                iim,jjmp1,nhori, 1,1,1, -99, 32, 
+     .                "ave(X)", zsto,zout)
+cIM: 071003
+         CALL histdef(nid_mth,"lwp","Cloud water path","Kg/m2",
+     .                iim,jjmp1,nhori, 1,1,1, -99, 32, 
+     .                "ave(X)", zsto,zout)
+c
+         CALL histdef(nid_mth,"iwp","Cloud ice water path","Kg/m2",
+     .                iim,jjmp1,nhori, 1,1,1, -99, 32, 
+     .                "ave(X)", zsto,zout)
+cIM: 071003
+         CALL histdef(nid_mth,"lwcon","Cloud water content","Kg/Kg",
+     .                iim,jjmp1,nhori, klev,1,klev, nvert, 32, 
+     .                "ave(X)", zsto,zout)
+c
+         CALL histdef(nid_mth,"iwcon","Cloud ice water content","Kg/Kg",
+     .                iim,jjmp1,nhori, klev,1,klev, nvert, 32, 
      .                "ave(X)", zsto,zout)
 c
@@ -334 +354 @@
      .                iim,jjmp1,nhori, klev,1,klev,nvert, 32,
      .                "ave(X)", zsto,zout)
+cIM: 071003
+         CALL histdef(nid_mth,"wvap","Water vapor mixing ratio","Kg/Kg",
+     .                iim,jjmp1,nhori, klev,1,klev,nvert, 32,
+     .                "ave(X)", zsto,zout)
 c
          CALL histdef(nid_mth, "geop", "Geopotential height", "m",
@@ -374 +398 @@
 c
          CALL histdef(nid_mth, "oliq", "Liquid water content", "kg/kg",
+     .                iim,jjmp1,nhori, klev,1,klev,nvert, 32,
+     .                "ave(X)", zsto,zout)
+c
+         CALL histdef(nid_mth, "dtphy", "Physics dT", "K/s",
      .                iim,jjmp1,nhori, klev,1,klev,nvert, 32,
      .                "ave(X)", zsto,zout)
@@ -400 +428 @@
      .                iim,jjmp1,nhori, klev,1,klev,nvert, 32,
      .                "ave(X)", zsto,zout)
+cIM: 071003
+         CALL histdef(nid_mth, "dtlschr",
+     $       "Large-scale condensational heating rate", "K/s",iim,jjmp1
+     $       ,nhori, klev,1,klev,nvert, 32,"ave(X)", zsto,zout)
 c
          CALL histdef(nid_mth, "dqlsc", "Condensation dQ", "Kg/Kg/s",
@@ -442 +474 @@
      .                "ave(X)", zsto,zout)
 c
-         CALL histdef(nid_mth, "dtsw0", "SW radiation dT", "K/s",
+         CALL histdef(nid_mth, "dtsw0", "CS SW radiation dT", "K/s",
      .                iim,jjmp1,nhori, klev,1,klev,nvert, 32,
      .                "ave(X)", zsto,zout)
@@ -450 +482 @@
      .                "ave(X)", zsto,zout)
 c
-         CALL histdef(nid_mth, "dtlw0", "LW radiation dT", "K/s",
+         CALL histdef(nid_mth,"dtlw0","CS LW radiation dT","K/s",
      .                iim,jjmp1,nhori, klev,1,klev,nvert, 32,
      .                "ave(X)", zsto,zout)