- Timestamp:
- 2013-03-05T10:26:52+01:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2012/dev_MERGE_2012/NEMOGCM/NEMO/OPA_SRC/SBC/fldread.F90
r3764 r3826 706 706 #endif 707 707 708 IF ((lwp).AND.(ipi>ilendta*ipj)) CALL ctl_stop('fld_map problem with file dimension')709 708 710 709 IF(lwp) WRITE(numout,*) 'Dim size for ',TRIM(clvar),' is ', ilendta
Note: See TracChangeset
for help on using the changeset viewer.