Changeset 590 for LMDZ4/trunk/libf/phylmd/ini_histhf.h

Timestamp:

Feb 7, 2005, 5:41:35 PM (20 years ago)

Author:

Laurent Fairhead

Message:

Synchro avec LOOP PC
LF

File:

• LMDZ4/trunk/libf/phylmd/ini_histhf.h (modified) (1 diff)

LMDZ4/trunk/libf/phylmd/ini_histhf.h

@@ -113 +113 @@
      .                "ave(X)", zsto1,zout)
 c
-c
+c -- LOOP
          CALL histdef(nid_hf, "SWdownOR",
-     .                "Sfce incident SW radiation OR", "W/m^2",
-     .                iim,jjmp1,nhori, 1,1,1, -99, 32,
-     .                "ave(X)", zsto1,zout)
+     .                "Sfce incident SW down radiation OR", "W/m^2",
+     .                iim,jjmp1,nhori, 1,1,1, -99, 32,
+     .                "ave(X)", zsto1,zout)
+c
+         CALL histdef(nid_hf, "SWnetOR",
+     .                "Sfce incident SW net radiation OR", "W/m^2",
+     .                iim,jjmp1,nhori, 1,1,1, -99, 32,
+     .                "ave(X)", zsto1,zout)
+c -- LOOP
 c
          CALL histdef(nid_hf, "LWdownOR",