Changeset 1419 for LMDZ4/branches/LMDZ4_AR5/libf/phylmd/write_histhfNMC.h

Timestamp:

Jul 22, 2010, 5:19:06 PM (14 years ago)

Author:

musat

Message:

Modify levels for some outputs to diminsh the CMIP5 storage (JLD)
Add Hines GWD tendencies duhin, dvhin (F.Lott)
IM

File:

• LMDZ4/branches/LMDZ4_AR5/libf/phylmd/write_histhfNMC.h (modified) (2 diffs)

LMDZ4/branches/LMDZ4_AR5/libf/phylmd/write_histhfNMC.h

@@ -30 +30 @@
        CALL histwrite_phy(nid_hfnmc,"wap",itau_w,wwriteSTD3)
 c
+       IF (1.EQ.0) THEN
+c
        DO k=1, nlevSTD
         DO i=1, klon
@@ -60 +62 @@
        CALL histwrite_phy(nid_hfnmc,"TxT",itau_w,T2sumSTD(:,:,3))
 c
-c     ENDIF !type_run
+       ENDIF !(1.EQ.0) THEN
 c
       if (ok_sync) then