Changeset 394 for LMDZ.3.3/branches/rel-LF/libf/phylmd/inc_cpl.h

Timestamp:

Jul 19, 2002, 11:58:18 AM (22 years ago)

Author:

lmdzadmin

Message:

Phasage avec les sources d'OM: rajout calving + character*8 sur les noms
LF

File:

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

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

@@ -17 +17 @@
       PARAMETER (jpread=0, jpwrit=1)
       CHARACTER*8 cl_writ(jpmaxfld), cl_read(jpmaxfld)
-      CHARACTER*6 cl_f_writ(jpmaxfld), cl_f_read(jpmaxfld)
+      CHARACTER*8 cl_f_writ(jpmaxfld), cl_f_read(jpmaxfld)
       COMMON / comcpl / cl_writ, cl_read, cl_f_writ, cl_f_read
 !     -------------------------------------------------------------------