Changeset 1089 for trunk/NEMO/TOP_SRC/trclec.F90
- Timestamp:
- 2008-06-09T10:33:47+02:00 (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/TOP_SRC/trclec.F90
r1077 r1089 92 92 IF(lwp) WRITE(numout,*) '~~~~~~~' 93 93 94 clname = 'namelist .passivetrc'94 clname = 'namelist_top' 95 95 CALL ctlopn( numnat, clname, 'OLD', 'FORMATTED', 'SEQUENTIAL', & 96 96 & 1, numout, .FALSE., 1 )
Note: See TracChangeset
for help on using the changeset viewer.