Changeset 447 for LMDZ.3.3/branches/rel-LF/libf/phylmd/ini_histday.h

Timestamp:

Jan 27, 2003, 3:27:20 PM (21 years ago)

Author:

lmdzadmin

Message:

Ajout cape_max, SWup, SWdn au TOA et SFC ciel clair IM

File:

• LMDZ.3.3/branches/rel-LF/libf/phylmd/ini_histday.h (modified) (1 diff)

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

@@ -206 +206 @@
      .                "ave(X)", zsto,zout)
 
+         CALL histdef(nid_day, "cape_max", "CAPE max.",
+     .                "J/Kg",
+     .                iim,jjmp1,nhori, 1,1,1, -99, 32,
+     .                capemaxcels, zsto,zout)
+
+         CALL histdef(nid_day, "SWupTOAclr",
+     .                "SWup clear sky at TOA","W/m2",
+     .                iim,jjmp1,nhori, 1,1,1,-99,
+     .                32, "ave(X)", zsto,zout)
+
+         CALL histdef(nid_day, "SWupSFCclr",
+     .                "SWup clear sky at surface","W/m2",
+     .                iim,jjmp1,nhori, 1,1,1,-99,
+     .                32, "ave(X)", zsto,zout)
+
+         CALL histdef(nid_day, "SWdnTOAclr",
+     .                "SWdn clear sky at TOA","W/m2",
+     .                iim,jjmp1,nhori, 1,1,1,-99,
+     .                32, "ave(X)", zsto,zout)
+
+         CALL histdef(nid_day, "SWdnSFCclr",
+     .                "SWdn clear sky at surface","W/m2",
+     .                iim,jjmp1,nhori, 1,1,1,-99,
+     .                32, "ave(X)", zsto,zout)
 
 c=================================================================