Changeset 628 for LMDZ4/branches/IPSL-CM4_IPCC_branch/libf/phylmd/inc_cpl.h
- Timestamp:
- May 3, 2005, 5:00:37 PM (20 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/branches/IPSL-CM4_IPCC_branch/libf/phylmd/inc_cpl.h
r524 r628 18 18 INTEGER jpread, jpwrit 19 19 PARAMETER (jpread=0, jpwrit=1) 20 #ifndef CPP_PSMILE 20 21 CHARACTER*8 cl_writ(jpmaxfld), cl_read(jpmaxfld) 21 22 CHARACTER*8 cl_f_writ(jpmaxfld), cl_f_read(jpmaxfld) 22 23 COMMON / comcpl / cl_writ, cl_read, cl_f_writ, cl_f_read 24 #endif 23 25 ! -------------------------------------------------------------------
Note: See TracChangeset
for help on using the changeset viewer.