Changeset 1374 for LMDZ4/trunk/libf/phylmd/write_histdayNMC.h

Timestamp:

May 4, 2010, 2:46:58 PM (14 years ago)

Author:

musat

Message:

Add logical flags ok_histNMC(3) to manage output of the
standard pressure files hist*NMC.nc
IM

File:

• LMDZ4/trunk/libf/phylmd/write_histdayNMC.h (modified) (2 diffs)

LMDZ4/trunk/libf/phylmd/write_histdayNMC.h

@@ -2 +2 @@
 ! $Header$
 !
-c     IF (ok_mensuel) THEN
+      IF (ok_histNMC(2)) THEN
 c
        ndex3d = 0
@@ -39 +39 @@
 c$OMP END MASTER
       endif
-
-c     ENDIF
+c
+      ENDIF ! (ok_histNMC(2)) THEN