Changeset 626 for LMDZ4/trunk/libf/phylmd/inc_cpl.h

Timestamp:

Apr 29, 2005, 4:03:26 PM (19 years ago)

Author:

Laurent Fairhead

Message:

Modifications pour phasage avec OASIS3 AC
LF

File:

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

LMDZ4/trunk/libf/phylmd/inc_cpl.h

@@ -18 +18 @@
       INTEGER jpread, jpwrit
       PARAMETER (jpread=0, jpwrit=1)
+#ifndef CPP_PSMILE
       CHARACTER*8 cl_writ(jpmaxfld), cl_read(jpmaxfld)
       CHARACTER*8 cl_f_writ(jpmaxfld), cl_f_read(jpmaxfld)
       COMMON / comcpl / cl_writ, cl_read, cl_f_writ, cl_f_read
+#endif
 !     -------------------------------------------------------------------